FoxPro/Visual FoxPro - Para super capos en FOX

 
Vista:

Para super capos en FOX

Publicado por extremo (78 intervenciones) el 22/10/2002 22:29:17
Hola foxeros

Necesito hacer una rutina que me entregue datos sobre las conexiones que tiene un pc a distintas unidades de red y si por alguna razon se desconecta el pc de alguna de ellas, que esta rutina sea capaz de volver a conectarla.... no pido la rutina sino el comando o la API que se usa y si pueden una idea de como empezar

De antemano les doy las gracias

Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Para super capos en FOX

Publicado por Santi (1 intervención) el 25/10/2002 01:48:25
&& Para conectarse a una unidad de red

DECLARE INTEGER WNetAddConnection IN WIN32API;
STRING @lpzRemoteName, STRING @lpzPassword,;
STRING @lpzLocalName

&& Santi -> para conectarse a una unidad de red
lcSerUni = "W" o "W:"
lcRutIni= "W:\Ruta\"
IF ! GetPrivStr (tgcBasDat [01], "Servidor", "", @lcSerUni, LEN (lcSerUni), gcWintsa) > 0
RETURN .F.
ELSE
lcSerUni = ALLTRIM (STRTRAN (lcSerUni, CHR (0), ""))
loWshNet = CREATEOBJECT ('WScript.Network')
loWshNet.MapNetworkDrive (LEFT (lcRutIni, 02), lcSerUni, .T.)

IF ! DIRECTORY (lcRutIni)
RETURN .F.
ENDIF

ENDIF
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar