Cuestión : Trazando una impulsión de red en VB.NET o el acceso de una trayectoria de red protegida

Estoy intentando trazar una impulsión de red, puedo hacer tan si no hay username y la contraseña fijó en el directorio. Pero si hay un I consigue el código de error 1203 mientras que usa WNetAddConnection2.
que no puedo modificar el directorio para adaptarme a mi código, él tiene que ser la otra manera alrededor. el
Also me preguntaba si hay una manera de conexión con una trayectoria de red con un username y una contraseña y de preocupación de trazar una impulsión letter. Cualquier ayuda en la resolución de esto sería grandemente appreciated.
This es mi
And del código hasta ahora. que la trayectoria de red es \ \ impulsión \ carpeta \ SubFolder \ del so
class= > " claro " del
> del " codeSnippet " del class= del
class= " lineNumbers " del
class= del 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
el class= " del id= " codeSnippet697057 del 
Public " notpretty " declara _ de “WNetAddConnection2A” de la liberación “mpr.dll” de la función WNetAddConnection2 alias
    (lpNetResource de ByRef como NETRESOURCE, lpPassword de ByVal como lpUserName de la secuencia, de ByVal como dwFlags de la secuencia, de ByVal como número entero) como número entero

    El público declara _ de “WNetCancelConnection2A” de la liberación “mpr” de la función WNetCancelConnection2 alias
    (lpName de ByVal como dwFlags de la secuencia, de ByVal como fForce del número entero, de ByVal como número entero) como número entero


    Estructura pública NETRESOURCE
        dwScope público como número entero
        dwType público como número entero
        dwDisplayType público como número entero
        dwUsage público como número entero
        lpLocalName público como secuencia
        lpRemoteName público como secuencia
        lpComment público como secuencia
        lpProvider público como secuencia
    Estructura del extremo

    Const público ForceDisconnect como número entero = 1
    Const público RESOURCETYPE_DISK como de largo = &H1

    Función pública MapDrive (ByVal DriveLetter como secuencia, ByVal UNCPath como secuencia) como boleano

        Nr dévil como NETRESOURCE
        strUsername dévil como secuencia
        strPassword dévil como secuencia

        nr = nuevo NETRESOURCE
        nr.lpRemoteName = UNCPath
        'nr.lpLocalName = DriveLetter y “: ”
        strUsername = sUserName
        strPassword = sPassword 
        nr.dwType = RESOURCETYPE_DISK

        Resultado dévil como número entero
        resultado = WNetAddConnection2 (nr, strPassword, strUsername, 0)

        Si resultado = 0 entonces
            De vuelta verdad
        
            Falso de vuelta
        Terminar si
    Terminar la función

    Función pública UnMapDrive (ByVal DriveLetter como secuencia) como boleano
        Rc dévil como número entero
        rc = WNetCancelConnection2 (DriveLetter y “: ”, 0, ForceDisconnect)

        Si rc = 0 entonces
            De vuelta verdad
        
            Falso de vuelta
        Terminar si

    Terminar la función
class= del

Respuesta : Trazando una impulsión de red en VB.NET o el acceso de una trayectoria de red protegida

La única manera que consigo este error es cuando utilizo el username o la contraseña incorrecto. Éste es cómo mis miradas del ejemplo puestas simplemente en un botón. ASUS es la cuenta de usuario.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:

El submarino privado Button1_Click (remitente de ByVal como System.Object, ByVal e como System.EventArgs) dirige Button1.Click
        Nr dévil como NETRESOURCE = nada
        strUsername dévil como secuencia = String.Empty
        strPassword dévil como secuencia = String.Empty
        Resultado dévil como número entero = 0

        nr.lpRemoteName = “\ \ 192.168.1.109 \ parte”
        nr.lpLocalName = “R: ”
        strUsername = “ASUS”
        strPassword = “contraseña”
        nr.dwType = RESOURCETYPE_DISK

        resultado = WNetAddConnection2 (nr, strPassword, strUsername, 0)
        Console.WriteLine (resultado)

    Submarino del extremo
Otras soluciones  
 
programming4us programming4us