WNETCONNECTION

[RAaBe]

Hallo zusammen.

Mit folgendem Code komme ich nicht weiter:

Code: Alles auswählen

; CHANGE THESE PATHS TO SUIT!

remote$ = "\\GBG\@00 Arbeitshilfen\Dsdb\"      ; Remote path
local$ = "Z:"                                       ; Local drive to be 'created'

DefType.NETRESOURCE res

res\dwType = #RESOURCETYPE_DISK
res\lpLocalName = @local$
res\lpRemoteName = @remote$
res\lpProvider = #NULL

If WNetAddConnection2_ (res, #NULL, #NULL, 0) = #NO_ERROR

    MessageRequester ("Cool!", "Connected -- check My Computer!", #MB_ICONINFORMATION)

    WNetCancelConnection2_ (local$, #CONNECT_UPDATE_PROFILE, 0)

Else

    MessageRequester ("Cool!", "Couldn't connect -- check paths and network!", #MB_ICONWARNING)

EndIf

Wie bekomme ich den Code lauffähig unter 4.6?

Es soll sich eigentlich beim Verbinden mit LW Z ein Dialog öffnen, wo ich Benutzername und Passwort eingeben kann.

Vielleicht hat ja auch jemand einen besseren Code für mich?

MfG

Reinhard

[ts-soft]

Code: Alles auswählen

OpenWindow(0, #PB_Ignore, #PB_Ignore, 640, 480, "")
WNetConnectionDialog_(WindowID(0), #RESOURCETYPE_DISK)
Delay(5000)
WNetDisconnectDialog_(WindowID(0), #RESOURCETYPE_DISK)

While WaitWindowEvent() ! 16 : Wend 

[RAaBe]

Danke Thomas für die schnelle Antwort.

Das LW war ja schon mal verbunden, ich suche den Dialog wo nur noch nach Benutzer und PW gefragt wird!

Reinhard