不一定用C# 用VB,DOS命令等都可以!
解决方案 »
- ASP.net配合MYSQL做的登录模块登录成功,但是验证出问题,请帮忙
- 请大家帮忙看下代码
- StreamReader读取问题!~急
- c#2003+ sql2000 字段数目超过100的表扔进设计器时出错,少于100字段的表扔进设计器又可以了, 新手求救宋江阿。
- 一个月内有几个周一,大家集思广益
- 如何结束整个程序的执行?
- 什么是NBT框架?
- 模拟Web页面数据递交的问题!大家指教指教!3KU~~~
- 三层架构问题
- win form datagrid 不响应键盘事件(keyup,keydown),不知何故?
- 跪求如何使用c#实现算法的dll组件
- 制作ADDIN插件遇到一问题,若能解决,纯技术部分的代码与大家共享!!请对插件有了解的高人进来一看
只可以读取:下面是读取的程序:(引自陈建华)
Private Declare Function GetVolumeInformation Lib "kernel32.dll" Alias "GetVolumeInformationA" (ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, ByVal nVolumeNameSize As Integer, lpVolumeSerialNumber As Long, lpMaximumComponentLength As Long, lpFileSystemFlags As Long, ByVal lpFileSystemNameBuffer As String, ByVal nFileSystemNameSize As Long) As LongPublic Type SerHdInfo
strLabel As String
strType As String
serNum As String
End TypePublic Function GetSerialNumber(sRoot As String) As SerHdInfo
Dim lSerialNum As Long
Dim R As Long
Dim RevVal As SerHdInfo
RevVal.strLabel = String$(255, Chr$(0))
' 磁盘卷标
RevVal.strType = String$(255, Chr$(0))
' 文件系统类型
R = GetVolumeInformation(sRoot, strLabel, Len(strLabel), lSerialNum, 0, 0, strType, Len(strType))
RevVal.serNum = lSerialNum '序列号
GetSerialNumber = RevVal
End Function