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