联机/中断网络磁盘驱动器对话框-技术开发专区

联机/中断网络磁盘驱动器对话框

作者：ITPUB论坛编辑： nancy 2008-04-28 00:00

【IT168技术文档】

此范例是利用 API 来开启「联机/中断网络磁盘驱动器对话框」，我们必须使用 mpr.dll API 函式库的 WNetConnectionDialog 及 WNetDisconnectDialog 函式来完成，以下的 TAPIMpr 类别为操作 mpr.dll 函式库类别。

   1:      ''' <summary>

2:      ''' 网络芳邻相关函式库(mpr.dll)。

3:      ''' </summary>

4:      Public NotInheritable Class TAPIMpr
5:
6:         Public Enum EResourceType As Integer
7:              ''' <summary>

8:              ''' 何任资源。

9:              ''' </summary>

10:              RESOURCETYPE_ANY = &H0
11:              ''' <summary>

12:              ''' 网络磁盘驱动器。

13:              ''' </summary>

14:              RESOURCETYPE_DISK = &H1
15:              ''' <summary>

16:              ''' 网络打印机。

17:              ''' </summary>

18:              RESOURCETYPE_PRINT = &H2
19:              ''' <summary>

20:              ''' 未知。

21:              ''' </summary>

22:              RESOURCETYPE_UNKNOWN = &HFFFFFFFF
23:          End Enum
24:
25:          ''' <summary>

26:          ''' 联机网络磁盘驱动器对话框。

27:          ''' </summary>

28:          <DllImport("mpr.dll", CharSet:=CharSet.Auto)> _
29:          Public Shared Function WNetConnectionDialog(ByVal hwnd As IntPtr, ByVal Type As EResourceType) As Integer
30:          End Function
31:
32:          ''' <summary>

33:          ''' 中断网络磁盘驱动器对话框。

34:          ''' </summary>

35:          <DllImport("mpr.dll", CharSet:=CharSet.Auto)> _
36:          Public Shared Function WNetDisconnectDialog(ByVal hwnd As IntPtr, ByVal Type As EResourceType) As Integer
37:          End Function
38:
39:      End Class

关注我们