在2000及NT中的声明如下:(在2000中试验成功过)
Public Declare Function NetShareDel Lib "netapi32.dll" _
(ServerName As Byte, _
NetName As Byte, _
ByVal Reserved As Long) As Long
代码提示:
dim bytServerName() as byte
dim sServerName as string
sServerName = "\\CPT_Name"
bytServerName = sServerName & vbNullString
NetShareDel bytServerName ,(类似),0
但我在98中怎么也试不通,如有答案时希望也能告诉我。EMAIL:[email protected]
Public Declare Function NetShareDel Lib "netapi32.dll" _
(ServerName As Byte, _
NetName As Byte, _
ByVal Reserved As Long) As Long
代码提示:
dim bytServerName() as byte
dim sServerName as string
sServerName = "\\CPT_Name"
bytServerName = sServerName & vbNullString
NetShareDel bytServerName ,(类似),0
但我在98中怎么也试不通,如有答案时希望也能告诉我。EMAIL:[email protected]
RmDir "你的网络驱动器"