Asp y sql

22/04/2009 - 00:59 por A.M.F. | Informe spam
Hola donde puedo encontrar paginas donde pueda ver ejemplos de asp con sql
server:
- Select , Update...
- vincular select con tablas, combobox, textbox

Gracias
Luis
 

Leer las respuestas

#1 MEVB
22/04/2009 - 15:29 | Informe spam
Hola AMF

Aqui una breve guía de ASP vs ADO

'1ro. crear un archivo global.asa con esto:
sub Application_onStart
'Esto para usar el ODBC creado en Panel de Control
Application("ODBC") =
"dsn=nombre_odbc;uid=usuario_sql;pwd=contraseña_sql;Database=nombra_basedatos;"
'Para otros estilos de conexion ver:
'http://www.able-consulting.com
end sub




'2do. abrir la conexion en cada ASP así:
dim Connect
set Connect = Server.CreateObject("ADODB.Connection")
Connect.ConnectionTimeout = 1000
Connect.Open Application("ODBC")




'3ro. opciones de actualizacion
'Para este caso se asume que tienes una página (ASP o HTML) con un:
'<FORM name=x method=post action=actualizar.asp> y que el codigo esta en
'la pagina "actualizar.asp"

'Crear
SQL = "INSERT INTO Nombre_tabla (descripcion) values ('" &
Request.Form("descripcion") & "')"

'Eliminar
SQL = "DELETE Nombre_tabla WHERE codigo in (" & Request.Form("codigo") & ")"
Connect.Execute(SQL)

'Modificar
SQL = "UPDATE Nombre_tabla SET descripcion = '" &
Request.Form("descripcion") & "'"
SQL = SQL & " WHERE codigo = " & Request.Form("codigo")

'Ejecutar el SQL
Connect.Execute(SQL)




4to. abrir recordset

dim Data, SQL
set Data = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM Nombre_tabla"
Data.Open SQL, Connect, 0, 1
if not Data.EOF then

end if
do until Data.EOF
Data.moveNext
loop
Data.Close




5to. IMPORTANTE, siempre blanquear (liberar) las variables objeto

Data.Close
Connect.Close
set Data = nothing
set Connect = nothing

Salu2
MV


"A.M.F." escribió en el mensaje
news:
Hola donde puedo encontrar paginas donde pueda ver ejemplos de asp con sql
server:
- Select , Update...
- vincular select con tablas, combobox, textbox

Gracias
Luis

Preguntas similares