• Home
 · 
• Windows System Services
 · 
• MAP NETWORK DRIVE WITH VB

MAP NETWORK DRIVE WITH VB

Well the simple way to map network drives with vb.

API Declarations
Declare Function WNetAddConnection Lib "mpr.dll" Alias "WNetAddConnectionA" (ByVal lpszNetPath As String, ByVal lpszPassword As String, ByVal lpszLocalName As String) As Long
Declare Function WNetCancelConnection Lib "mpr.dll" Alias "WNetCancelConnectionA" (ByVal lpszName As String, ByVal bForce As Long) As Long


Rate MAP NETWORK DRIVE WITH VB

• 1
• 2
• 3
• 4
• 5

(11(11 Vote))

Private Sub cmdConnect_Click()
  Dim x As Long
  x = WNetAddConnection("\\CPU1\C\WINDOWS\DESKTOP", "", "R:")
  If x <> 0 Then
    MsgBox "connect failed"
  End If
End Sub
Private Sub cmdDisconnect_Click()
  Dim x As Long
  x = WNetCancelConnection("R:", 0)
  If x <> 0 Then
    MsgBox "Disconnect failed"
  End If
End Sub