
13/12/2002, 23:00
|
 | | | Fecha de Ingreso: diciembre-2002 Ubicación: Ahora aqui
Mensajes: 485
Antigüedad: 22 años, 5 meses Puntos: 0 | |
Talvez esto te sirva <%
StrConn="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & SERVER.MAPPATH("tubase.mdb")
%>
<%
select case Request.querystring("edit")
case "edit"
Call edit
Case Else
Call edit
End Select
sub edit
Set objConn = Server.CreateObject ("ADODB.Connection")
objConn.Open StrConn
Set objRec2 = Server.CreateObject ("ADODB.Recordset")
%>
<%
strSql = "update tutabla set [nombre]='" & request.querystring("nombre") & "',[edad]='" & request.querystring("edad") & "',[descripcion]='" & request.querystring("descripcion") & "' where [id]= " & request.querystring("id")
objConn.Execute (StrSql)
Set objRec2 = Nothing
objConn.Close
Set objConn = Nothing
end sub
%> |