Pedir password y servidor de Sql Server

Yoban:

Esta es una rutina para validar la entrada a SQL Server, espero te sea de
utilidad:

****************************************************************************
*********************************************

Parameter Conexion(nSer, nUsu, nPas)

nC="driver=SQL
Server;SERVER="+Allt(nSer)+";UID="+Allt(nUsu)+";PWD="+Allt(nPas)+";APP=Siste
ma;WSID="+Allt(nSer)+";DATABASE=BaseDatos"
If nC < 1
=Messagebox("No hubo conexión con la Base de Datos.
Verifique...",16,_Screen.Caption)
ELSE
SQLSETPROP(nConect,'DispWarnings',.T.)
Endif

Return nC

****************************************************************************
*********************************************

Saludos,

Gerardo Mejicano

"Yoban R." escribió en el mensaje
news:%

Hola todos !!!
estoy haciendo una aplicacion para trabajar con tablas de Sql Server,
solamente necesito validar el acceso a la DB de Sql server cuando un

usuario

quiera conectarse desde mi aplicacion de Vfp.

Saludos y gracias





Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.698 / Virus Database: 455 - Release Date: 02/06/2004