How to map/break network disks

The following program segment simulates mapping/interrupting network disks in My Network Places and my computer. is the "Map/Interrupt Network Disk" question box, so that users according to their own computer situation, to determine the network disk to be connected to map to their own disk? Which one is the corresponding disk to interrupt?

Please add the following declaration and module to the declaration area:

Private Declare Function WNetConnectionDialog Lib "mpr.dll" _
(ByVal hwnd As Long, ByVal dwType As Long) As Long
Private Declare Function WNetDisconnectDialog Lib "mpr.dll" _
(ByVal hwnd As Long, ByVal dwType As Long) As Long
Sub ShowMapDrives(hwnd As Long)
　 WNetConnectionDialog hwnd, 1
End Sub
Sub ShowUnMapDrives(hwnd As Long)
　 WNetDisconnectDialog hwnd, 1
End Sub
'程序中使用方式如下：
Private Sub Command1_Click()
　 '出现 映射网络磁盘 问话框
　 ShowMapDrives Me.hwnd
End Sub

Private Sub Command2_Click()
　 '出现 中断网络磁盘 问话框
　 ShowUnMapDrives Me.hwnd
End Sub