Configurar conexion a base de datos

[univercity]

Bueno tu codigo es mas para una cnsulta especifica, por lo general:



Set con = Server.CreateObject("ADODB.Connection")
Set rst = Server.CreateObject("ADODB.recordset")



dim cnn,rst
' Creamos la conexión a la base de datos sin DSN
set cnn = Server.CreateObject("ADODB.Connection")
set rst = Server.CreateObject("ADODB.RecordSet")


strProvider="Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\prefac") & "\Inicio_capital.mdb;"




para insertar
sql="SELECT * FROM tutabla"


para modificar

sql = "select * FROM tabla1 WHERE id=" & request.querystring ("id") & ""


para borrar
sql = "select * FROM tutabla WHERE id=" & request.querystring ("id") & ""

no es mucho mas que eso


espero te haya aclarado algo el panorama...








y luego de eso modificas y borras