Hi delphicus,
du hast den Code so:
Code:
//...
NetResource.dwType := RESOURCETYPE_DISK;
NetResource.lpLocalName := PChar(Laufwerk);
NetResource.lpRemoteName := PChar(Pfad);
NetResource.lpProvider := nil;
dwFlags := 0;
Laufwerk := 'x:';
//Pfad := '\\Rechnername\FreigabeOrdner';
Pfad := '\\127.0.0.1\C$';
Username := 'administrator';
Password := '********';
//...
Probier es mal so:
Code:
//...
Laufwerk := 'x:';
//Pfad := '\\Rechnername\FreigabeOrdner';
Pfad := '\\127.0.0.1\C$';
Username := 'administrator';
Password := '********';
NetResource.dwType := RESOURCETYPE_DISK;
NetResource.lpLocalName := PChar(Laufwerk);
NetResource.lpRemoteName := PChar(Pfad);
NetResource.lpProvider := nil;
dwFlags := 0;
//...
Beachte die Reihenfolge der einzelnen Anweisungen. Weiters koennte auch der Rueckgabewert von WNetAddConnection2 hilfreich sein.
Greetz
alcaeus