Pergunta : Traçando uma movimentação de rede em VB.NET ou em alcançar um trajeto de rede protegido

Eu estou tentando traçar uma movimentação de rede, eu posso fazer assim se não há nenhum username e a senha setup no diretório. Mas se há um I começ o código de erro 1203 ao usar WNetAddConnection2.
que eu não posso modificar o diretório para serir meu código, ele tem que estar a outra maneira ao redor. o
Also eu queria saber se há uma maneira de conexão a um trajeto de rede com um username e uma senha e de preocupação sobre o traço de uma movimentação letter. Toda a ajuda em resolver isto seria extremamente appreciated.
This é meu
And que do código até agora. o trajeto de rede é \ do so
\ movimentação \ dobrador \ SubFolder \
class= > " desobstruído " do
> do " codeSnippet " do class= do
class= " lineNumbers " do
class= do
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:
o class= " do id= " codeSnippet697057 do
Public " notpretty " declara o _ de “WNetAddConnection2A” do liberal “mpr.dll” da função WNetAddConnection2 aliás
    (lpNetResource de ByRef como NETRESOURCE, lpPassword de ByVal como o lpUserName da corda, do ByVal como dwFlags da corda, do ByVal como o inteiro) como o inteiro

    O público declara o _ de “WNetCancelConnection2A” do liberal “radar de potência média” da função WNetCancelConnection2 aliás
    (lpName de ByVal como dwFlags da corda, do ByVal como o fForce do inteiro, do ByVal como o inteiro) como o inteiro


    Estrutura pública NETRESOURCE
        dwScope público como o inteiro
        dwType público como o inteiro
        dwDisplayType público como o inteiro
        dwUsage público como o inteiro
        lpLocalName público como a corda
        lpRemoteName público como a corda
        lpComment público como a corda
        lpProvider público como a corda
    Estrutura da extremidade

    Const público ForceDisconnect como o inteiro = 1
    Const público RESOURCETYPE_DISK como por muito tempo = &H1

    Função pública MapDrive (ByVal DriveLetter como a corda, ByVal UNCPath como a corda) como bôoleano

        Nr não ofuscante como NETRESOURCE
        strUsername não ofuscante como a corda
        strPassword não ofuscante como a corda

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

        Resultado não ofuscante como o inteiro
        resultado = WNetAddConnection2 (nr, strPassword, strUsername, 0)

        Se resultado = 0 então
            Do retorno retificar
        Mais
            Falso do retorno
        Terminar se
    Terminar a função

    Função pública UnMapDrive (ByVal DriveLetter como a corda) como bôoleano
        Rc não ofuscante como o inteiro
        rc = WNetCancelConnection2 (DriveLetter & “: ”, 0, ForceDisconnect)

        Se rc = 0 então
            Do retorno retificar
        Mais
            Falso do retorno
        Terminar se

    Terminar a função
class= do

Resposta : Traçando uma movimentação de rede em VB.NET ou em alcançar um trajeto de rede protegido

A única maneira que eu começ este erro é quando eu uso o username ou a senha errada. Isto é como meus olhares do exemplo coloc simplesmente em uma tecla. ASUS é o cliente de usuário.
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
O submarino confidencial Button1_Click (remetente de ByVal como System.Object, ByVal e como System.EventArgs) segura Button1.Click
        Nr não ofuscante como NETRESOURCE = nada
        strUsername não ofuscante como a corda = o String.Empty
        strPassword não ofuscante como a corda = o String.Empty
        Resultado não ofuscante como o inteiro = 0

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

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

    Submarino da extremidade
Outras soluções  
 
programming4us programming4us