PureBoard

Verfasst: **26.09.2012 19:38**

Hallo zusammen.

Mit folgendem Code komme ich nicht weiter:

; 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

Verfasst: **26.09.2012 19:53**

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

Verfasst: **26.09.2012 20:03**

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

PureBoard

WNETCONNECTION

WNETCONNECTION

Re: WNETCONNECTION

Re: WNETCONNECTION