29/01/2002, 12:37
|
 | | | Fecha de Ingreso: diciembre-2001
Mensajes: 601
Antigüedad: 23 años, 5 meses Puntos: 2 | |
| Select + Update = ?
es posible realizar esta accion?
'pedimos la id
id = Request.QueryString("id")
Dim conn, SQL,rs,LOG
'creamos conexion y recordset
Set Conn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")
'conectamos a la bd
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" & "DBQ=" & Server.MapPath("mibase.mdb") & ";"
SQL="UPDATE flash SET Clicks = Clicks + 1 WHERE Id = "&id&" ;"
Conn.Execute(SQL)
LOG="SELECT id,nombre,alto,ancho,Descripcion FROM flash WHERE id='"&id&"';"
Conn.Execute(LOG)
esta bien? |