Frage : Diagramm ein Netzlaufwerk in VB.NET oder im Zurückgreifen auf einen geschützten Netzweg

Ich versuche, ein Netzlaufwerk abzubilden, kann ich so tun, wenn es kein username gibt und Kennwort auf dem Verzeichnis gründete. Aber, wenn erhalten es ein I gibt, Störungscode 1203, bei der Anwendung von WNetAddConnection2.
, das ich das Verzeichnis nicht ändern kann, um meinem Code zu entsprechen, es, muss die andere Weise herum sein.
Also wunderte mich ich, wenn es eine Weise des Anschließens an einen Netzweg an ein username und an ein Kennwort und des Sorgens nicht um das Diagramm eines Antriebs letter gibt. Jede mögliche Hilfe, im Lösen dieses, würde groß appreciated.
This ist mein Code bis jetzt.
And sein, das der Netzweg so
\ \ Antrieb \ Faltblatt \ SubFolder \ ist 
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:
6:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:

Public erklären Bibliothek „mpr.dll“ der Funktions-WNetAddConnection2 alias „WNetAddConnection2A“ _
    (ByRef lpNetResource als NETRESOURCE, ByVal lpPassword als Schnur, ByVal lpUserName als Schnur, ByVal dwFlags als ganze Zahl) als ganze Zahl

    Öffentlichkeit erklären Bibliothek „mpr“ der Funktions-WNetCancelConnection2 alias „WNetCancelConnection2A“ _
    (ByVal lpName als Schnur, ByVal dwFlags als ganze Zahl, ByVal fForce als ganze Zahl) als ganze Zahl


    Allgemeine Struktur NETRESOURCE
        Allgemeines dwScope als ganze Zahl
        Allgemeines dwType als ganze Zahl
        Allgemeines dwDisplayType als ganze Zahl
        Allgemeines dwUsage als ganze Zahl
        Allgemeines lpLocalName als Schnur
        Allgemeines lpRemoteName als Schnur
        Allgemeines lpComment als Schnur
        Allgemeines lpProvider als Schnur
    Enden-Struktur

    Allgemeines Const ForceDisconnect als ganze Zahl = 1
    Allgemeines Const RESOURCETYPE_DISK als lang = &H1

    Allgemeine Funktion MapDrive (ByVal DriveLetter als Schnur, ByVal UNCPath als Schnur) wie Boolesch

        Schwaches nr als NETRESOURCE
        Schwaches strUsername als Schnur
        Schwaches strPassword als Schnur

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

        Schwaches Resultat als ganze Zahl
        Resultat = WNetAddConnection2 (nr, strPassword, strUsername, 0)

        Wenn Resultat = 0 dann
            Rückhol ausrichten
        Sonst
            Rückholfalsches
        Beenden wenn
    Funktion beenden

    Allgemeine Funktion UnMapDrive (ByVal DriveLetter als Schnur) wie Boolesch
        Schwaches rc als ganze Zahl
        rc = WNetCancelConnection2 (DriveLetter u. „: “, 0, ForceDisconnect)

        Wenn rc = 0 dann
            Rückhol ausrichten
        Sonst
            Rückholfalsches
        Beenden wenn

    Funktion beenden

Antwort : Diagramm ein Netzlaufwerk in VB.NET oder im Zurückgreifen auf einen geschützten Netzweg

Die einzige Weise, die ich diese Störung erhalte, ist, wenn ich das falsche username oder das Kennwort verwende. Dieses ist wie meine Beispielblicke, die einfach in einen Knopf gelegt werden. ASUS ist das Benutzerkonto.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:

Privates Unterseeboot Button1_Click (ByVal Absender als System.Object, ByVal e als System.EventArgs) behandelt Button1.Click
        Schwaches nr als NETRESOURCE = nichts
        Schwaches strUsername als Schnur = String.Empty
        Schwaches strPassword als Schnur = String.Empty
        Schwaches Resultat als ganze Zahl = 0

        nr.lpRemoteName = „\ \ 192.168.1.109 \ Anteil“
        nr.lpLocalName = „R: “
        strUsername = „ASUS“
        strPassword = „Kennwort“
        nr.dwType = RESOURCETYPE_DISK

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

    Enden-Unterseeboot
Weitere Lösungen  
 
programming4us programming4us