Du musst dich vorher mit WNetAddConnection2W mit dem Rechner verbinden.
Delphi-Quellcode:
function ConnectToNetworkDriveW(LocalName: WideString; RemoteName: wideString; Username: WideString; Password: WideString;
RestoreAtLogon: boolean): DWORD;
var
NetResource : TNetResourceW;
dwFlags : DWORD;
begin
dwFlags := 0;
ZeroMemory(@NetResource, sizeof(TNetResource));
with NetResource do
begin
dwType := RESOURCETYPE_ANY;
lpLocalName := PWideChar(LocalName);
lpRemoteName := PwideChar(RemoteName);
lpProvider := nil;
end;
if (RestoreAtLogon) then
dwFlags := dwFlags or CONNECT_UPDATE_PROFILE;
Result := WNetAddConnection2W(NetResource, PWideChar(Password), PWideChar(Username), dwFlags);
end;
Ich hoffe, zumindest, dass das die Richtige Funktion war. Habe ich lange nicht mehr gemacht.