autenticar foxpro contra windows

26/04/2006 - 21:37 por oficios | Informe spam

Estimados:
Necesito ayuda con lo siguiente, he buscado, pero no he encontrado,
espero que aqui me den una mano.

Tengo una pequeña aplicacion que se conecta a un servidor sqlserver mediante
odbc, a la cual hago referencia desde el mismo programa, eso funciona bien.
Luego necesito que el usuario al loguearse con mi programa
validarlos(usuario y contraseña) contra los mismo parametros que utilizó
para conectarse a la red mediante windows. Sólo si esta validacion es
correcta le permitire al usuario continuar con la ejecucion del programa.

Gracias.
atte.
Rafael Vásquez B.

Siga el debate

2 respuestas

Tengo una respuesta

Preguntas similare

Leer las respuestas

#1 oficios

30/04/2006 - 19:05 | Informe spam

Hector:
Mi agradecido por tu orientacion, con esto soluciono mi problema.

atte.
Rafael Vasque B.

"Hector Quiñones" escribió en el mensaje
news:

Hola Rafael
Para que la conexion a SQL sea validada con Windows, lo que debes hacer es
crear en SQL tantos inicios de sesion como usuarios tengas en Windows, a
todos ellos marcar como Autenticación de Windows.
No debes usar OBDC, te conectarias por ejmplo:

IF SQLSetProp(0,"DispLogin",3) > 0
ENDIF
lcDSNLess="DRIVER={SQL Server};SERVER=tuservidor;DATABASE=tubase_sql;UID> ;PWD= ;Trusted_Connection=Yes"
gnConnHandle=sqlstringconnect(m.lcDSNLess)
IF gnConnHandle <= 0
= AERROR(aErrorArray)
= MESSAGEBOX(aErrorArray(2), 16, 'Error de conexión SQL Server')
=SQLDISCONNECT(0)
ELSE
cSource= SQLGETPROP(gnconnHandle, "datasource")
* =MESSAGEBOX("Base de datos = "+cSource,0,"Resultado de conección")
ENDIF

Sin embargo existe otra forma de restringir, en SQL creas un usuario
estandar XXX con autenticación de SQl Server y contraseña YYY, lo sabras
solo tu, esta validacion lo haces al momento de realizar la conexion
utilizas el mismo codigo, sin crear OBDC.
IF SQLSetProp(0,"DispLogin",3) > 0
ENDIF
lcDSNLess="DRIVER={SQL
Server};SERVER=tuservidor;DATABASE=tubase_sql;UID=XXX ;PWD=YYY"
gnConnHandle=sqlstringconnect(m.lcDSNLess)

If
Else
Endif
La validacion de ingreso a tu aplicacion lo puedes tener en tu propio
programa, en el Portal existen varios ejemplos muy interesantes y de
diferente complejidad.

Hector

PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

Responder a este mensaje

#2 Hector Quiñones

30/04/2006 - 23:10 | Informe spam

Hola Rafael
Para que la conexion a SQL sea validada con Windows, lo que debes hacer es
crear en SQL tantos inicios de sesion como usuarios tengas en Windows, a
todos ellos marcar como Autenticación de Windows.
No debes usar OBDC, te conectarias por ejmplo:

IF SQLSetProp(0,"DispLogin",3) > 0
ENDIF
lcDSNLess="DRIVER={SQL Server};SERVER=tuservidor;DATABASE=tubase_sql;UID;PWD= ;Trusted_Connection=Yes"
gnConnHandle=sqlstringconnect(m.lcDSNLess)
IF gnConnHandle <= 0
= AERROR(aErrorArray)
= MESSAGEBOX(aErrorArray(2), 16, 'Error de conexión SQL Server')
=SQLDISCONNECT(0)
ELSE
cSource= SQLGETPROP(gnconnHandle, "datasource")
* =MESSAGEBOX("Base de datos = "+cSource,0,"Resultado de conección")
ENDIF

Sin embargo existe otra forma de restringir, en SQL creas un usuario
estandar XXX con autenticación de SQl Server y contraseña YYY, lo sabras
solo tu, esta validacion lo haces al momento de realizar la conexion
utilizas el mismo codigo, sin crear OBDC.
IF SQLSetProp(0,"DispLogin",3) > 0
ENDIF
lcDSNLess="DRIVER={SQL
Server};SERVER=tuservidor;DATABASE=tubase_sql;UID=XXX ;PWD=YYY"
gnConnHandle=sqlstringconnect(m.lcDSNLess)

If
Else
Endif
La validacion de ingreso a tu aplicacion lo puedes tener en tu propio
programa, en el Portal existen varios ejemplos muy interesantes y de
diferente complejidad.

Hector

PortalFox :: Nada corre como un zorro
http://www.portalfox.com

PortalFox - NNTP Forum Gateway

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida