
21/02/2003, 16:06
|
 | | | Fecha de Ingreso: noviembre-2001 Ubicación: santiago de shilli
Mensajes: 2.554
Antigüedad: 23 años, 4 meses Puntos: 0 | |
y si hace esto?
Código:
<%
' ** Dar un valor a ID_SECCION
strSQLCheck = "SELECT ID_SECCION FROM GAMES_SECC WHERE ID_JUEGO=" & txtGameID &" ORDER BY ID_SECCION DESC"
Set MRC = MyConn.Execute(strSQLCheck)
txtSeccNewID = MRC("ID_SECCION") + 1
strSQLAdd = "SELECT ID_JUEGO, ID_SECCION, SECCION, LINK_SECCION, INFO, AUTOR_ID FROM GAMES_SECC"
MRC.open strSQLAdd, MyConn, ,3
MRC.addnew
MRC("ID_JUEGO") = txtGameID
MRC("ID_SECCION") = txtSeccNewID
MRC("SECCION") = txtSecc
MRC("LINK_SECCION") = left(3, txtSecc)
MRC("INFO") = txtHover
MRC("AUTOR_ID") = session("usrID")
MRC.Update
%>
<% End If %>
MRC.Close
Set MRC = Nothing
sino cambio tu codigo po un update... yo no paso este cosa del :AddNew |