RE:comandos para conectar unidades de red
En www.ambsoftware.com hay este codigo:
Conectarse y desconectarse de una unidad de red
Declare Function WNetAddConnection2 Lib "mpr.dll" Alias "WNetAddConnection2A" (lpNetResource As NETRESOURCE, ByVal lpPassword As String, ByVal lpUserName As String, ByVal dwFlags As Long) As Long
Declare Function WNetCancelConnection2 Lib "mpr.dll" Alias "WNetCancelConnection2A" (ByVal lpName As String, ByVal dwFlags As Long, ByVal fForce As Long) As Long
Type NETRESOURCE
dwScope As Long
dwType As Long
dwDisplayType As Long
dwUsage As Long
lpLocalName As String
lpRemoteName As String
lpComment As String
lpProvider As String
End Type
Public Const RESOURCETYPE_ANY = &H0
Public Const RESOURCETYPE_DISK = &H1
Public Const RESOURCETYPE_PRINT = &H2
Public Const RESOURCETYPE_UNKNOWN = &HFFFF
Sub ConectarUnidadRed(Unidad As String)
Dim Disco As NETRESOURCE, Res As Long
Disco.lpRemoteName = Unidad 'Dispositivo al que conectarse en formato UNC
Disco.dwType = RESOURCETYPE_DISK ' Tipo de dispositivo
Disco.lpLocalName = UnidadDisponible ' Esta línea la sustituyes por la letra que necesites "F:"
Respuesta = WNetAddConnection2(Disco, "", "", 0)
End Sub
Sub DesconectarUnidadRed(Unidad As String)
WNetCancelConnection2 Unidad, 0, True ' Puedes enviar como Unidad un UNC o una normal "F:"
End Sub
Saludos desde Lima