Questione : Tracciando un azionamento di rete in VB.NET o nell'accesso del percorso di rete protettivo

Sto provando a tracciare un azionamento di rete, posso agire in tal modo se non ci è username e la parola d'accesso installasse sull'indice. Ma se ci è un I ottiene il codice di errore 1203 mentre usando WNetAddConnection2.
che non posso modificare l'indice per essere adatto al mio codice, esso deve essere l'altro senso intorno.
Also stavo domandando se ci è un senso di collegamento ad un percorso di rete con un username e una parola d'accesso e di non preoccuparsi per il tracciato dell'azionamento letter. Tutto l'aiuto nella risoluzione del questo sarebbe notevolmente appreciated.
This è il mio
And che di codice finora. il percorso di rete è \ \ azionamento \ dispositivo di piegatura \ SubFolder \
del so
class= > " libero " 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:
il class= " del id= " codeSnippet697057 del
Public " notpretty " dichiara il _ “di WNetAddConnection2A„ di movimento di liberazione “mpr.dll„ di funzione WNetAddConnection2 altrimenti detto
    (lpNetResource di ByRef come NETRESOURCE, lpPassword di ByVal come lpUserName di ByVal, della stringa come dwFlags di ByVal, della stringa come numero intero) come numero intero

    Il pubblico dichiara il _ “di WNetCancelConnection2A„ di movimento di liberazione “mpr„ di funzione WNetCancelConnection2 altrimenti detto
    (lpName di ByVal come dwFlags di ByVal, della stringa come fForce di ByVal, di numero intero come numero intero) come numero intero


    Struttura pubblica NETRESOURCE
        dwScope pubblico come numero intero
        dwType pubblico come numero intero
        dwDisplayType pubblico come numero intero
        dwUsage pubblico come numero intero
        lpLocalName pubblico come stringa
        lpRemoteName pubblico come stringa
        lpComment pubblico come stringa
        lpProvider pubblico come stringa
    Struttura dell'estremità

    Const pubblico ForceDisconnect come numero intero = 1
    Const pubblico RESOURCETYPE_DISK come lungamente = &H1

    Funzione pubblica MapDrive (ByVal DriveLetter come stringa, ByVal UNCPath come stringa) come booleano

        Nr fioco come NETRESOURCE
        strUsername fioco come stringa
        strPassword fioco come stringa

        nr = nuovo NETRESOURCE
        nr.lpRemoteName = UNCPath
        'nr.lpLocalName = DriveLetter & “: „
        strUsername = sUserName
        strPassword = sPassword 
        nr.dwType = RESOURCETYPE_DISK

        Risultato fioco come numero intero
        risultato = WNetAddConnection2 (nr, strPassword, strUsername, 0)

        Se risultato = 0 allora
            Di ritorno allineare
        Altrimenti
            Falso di ritorno
        Concluder se
    Concludere la funzione

    Funzione pubblica UnMapDrive (ByVal DriveLetter come stringa) come booleano
        Rc fioco come numero intero
        rc = WNetCancelConnection2 (DriveLetter & “: „, 0, ForceDisconnect)

        Se rc = 0 allora
            Di ritorno allineare
        Altrimenti
            Falso di ritorno
        Concluder se

    Concludere la funzione
class= del

Risposta : Tracciando un azionamento di rete in VB.NET o nell'accesso del percorso di rete protettivo

L'unico senso che ottengo questo errore è quando uso il username o la parola d'accesso errato. Ciò è come i miei sguardi di esempio disposti semplicemente in un tasto. ASUS è il cliente di utente.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
Il sommergibile riservato Button1_Click (mittente di ByVal come System.Object, ByVal e come System.EventArgs) tratta Button1.Click
        Nr fioco come NETRESOURCE = niente
        strUsername fioco come stringa = String.Empty
        strPassword fioco come stringa = String.Empty
        Risultato fioco come numero intero = 0

        nr.lpRemoteName = “\ \ 192.168.1.109 \ parte„
        nr.lpLocalName = “R: „
        strUsername = “ASUS„
        strPassword = “parola d'accesso„
        nr.dwType = RESOURCETYPE_DISK

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

    Sommergibile dell'estremità
Altre soluzioni  
 
programming4us programming4us