Einzelnen Beitrag anzeigen

fnhofm

Registriert seit: 16. Mär 2006
Ort: Nürnberg
25 Beiträge
 
Delphi XE2 Professional
 
#1

Verbindung zu ... Dialog mit WNetAddConnection3

  Alt 20. Nov 2008, 09:09
Hallo,

ich versuche mit der Funktion WNetAddConnection3 (aus der Unit Windows) den Dialog "Verbindung zu ..." anzuzeigen um mit dem benötigten Server zu verbinden.

Delphi-Quellcode:

  if not DirectoryExists(ExtractFileDir(Edit1.Text)) then
  begin

    with NetResource do
    begin
      dwType := RESOURCETYPE_DISK;
      lpLocalName := nil;
      lpRemoteName := '\\uxservsmb\homes';
      lpProvider := nil;
    end;

    Return := WNetAddConnection3(Form1.Handle, NetResource, nil, 'fnhofm',
      CONNECT_INTERACTIVE or CONNECT_PROMPT);
Das klappt soweit auch.

Nun mein Problem:
Dieser Code erzeugt den Dialog aus Anhang "Mit WNetConnection3.jpg".
Rot unterstrichen kann man sehen das der Dialog versucht mich "nur" zum Server zu verbinden.
Freigegeben ist für mich aber das Verzeichnis homes, d.h. ich muss als Benutzername homes\fnhofm eingeben damit die Verbindung funktioniert.

Im Anhang "Im Explorer.jpg" sieht man den Dialog den der Explorer anzeigt wenn ich auf das gemappte Laufwert für dieses Verzeichnis klicke.

Wie kann ich ebenfalls den Dialog anzeigen der versucht mich auf \\server\verzeichnis zu verbinden und nicht nur auf den server?

Vielen Dank im Voraus.

Gruß
Miniaturansicht angehängter Grafiken
im_exploerer_167.jpg   mit_wnetconnection3_125.jpg  
  Mit Zitat antworten Zitat