
26/11/2003, 14:01
|
|
Estableces la conexion a la base de datos de esta forma:
Set conexion = Server.CreateObject ("ADODB.Connection")
conexion.open "driver={SQL Server};server=SERVIDOR;database=BASE DE DATOS;uid=USUARIO;pwd=CONTRASEÑA;"
SQL = "SELECT * FROM Usuarios"
Set TABLA = conexion.execute(SQL)
IF NOT TABLA.BOF THEN
Do while not TABLA.EOF
If (TABLA("CAMPO_EN_SQL") = VARIABLE then
VARIABLE_EN_ASP = TABLA("CAMPO_EN_SQL")
End If
TABLA.MoveNext
Loop
END IF
Última edición por ACHAVARRIA; 26/11/2003 a las 14:03 |