FoxPro/Visual FoxPro - usuario

   
Vista:

usuario

Publicado por Rey (22 intervenciones) el 17/08/2010 14:18:38
Buenos días

De antemano agradezco su atencion

Mi pregunta es muy concreta que variable debo y como lo debo hacer para tomar desde mi programa Vfp el usuario conque ingreso al equipo por windwows


En verdad agradeceria su colaboracion


Rey
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:usuario

Publicado por Edgar Zambrano (31 intervenciones) el 18/08/2010 20:45:52
#DEFINE NO_ERROR 0

DECLARE INTEGER IsUserAnAdmin IN shell32

DECLARE INTEGER WNetGetUser IN mpr;
INTEGER lpName, STRING @lpUserName, INTEGER @lpnLength

LOCAL lcUser, lnBufsize
lnBufsize = 250
lcUser = Repli(Chr(0), lnBufsize)

IF WNetGetUser(0, @lcUser, @lnBufsize) = NO_ERROR
? "Nombre de Usuario:", SUBSTR(lcUser, 1, AT(Chr(0),lcUser)-1)
? "Es Administrador:", Iif(IsUserAnAdmin()=0, "No", "Si")
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

RE:usuario

Publicado por Rey (22 intervenciones) el 18/08/2010 23:29:11
Gracias Edgar
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