Imports System.Runtime.InteropServices
public class NetworkDriveConnectionDialog
Const RESOURCETYPE_DISK As Short = 1
Private Declare Function WNetConnectionDialog Lib "mpr.dll" (ByVal hwnd As Integer, ByVal dwType As Integer) As Integer
Public Shared Sub Main
WNetConnectionDialog(0, RESOURCETYPE_DISK)
End Sub
End Class
|