Ver Mensaje Individual
  #5 (permalink)  
Antiguo 15/02/2006, 08:39
roroland
 
Fecha de Ingreso: enero-2002
Ubicación: Mar del Plata
Mensajes: 243
Antigüedad: 23 años, 4 meses
Puntos: 0
MIL GRACIAS POR TU AYUDA....

Estoy probando tu codigo, pero me da el siguiente error:

Microsoft VBScript runtime error '800a01a8'

Object required: 'conn'
/artists3_v.asp, line 385


Debo definir conn ? Disculpa que mis conocimientos sean tan basicos, pero no se como seguir.

Los votos o clicks los guardo en una tabla que se llama "fotogatti.top_artists", el recordset se llama "num_votes", el campo numerico que quiero que registre el click se llama "voto". En vez de "id", el campo que define que registro se actualiza se llama "order_name".
Aqui debajo te adjunto el codigo del recordset num_votes y debajo tu script modificado:

<%
Dim num_votes
Dim num_votes_numRows

Set num_votes = Server.CreateObject("ADODB.Recordset")
num_votes.ActiveConnection = MM_Eomtest_STRING
num_votes.Source = "SELECT * FROM fotogatti.top_artists WHERE order_name = '" + Replace(num_votes__MMColParam, "'", "''") + "'"
num_votes.CursorType = 0
num_votes.CursorLocation = 2
num_votes.LockType = 1
num_votes.Open()

num_votes_numRows = 0
%>
<%
sql="select voto From fotogatti.top_artists where order_name="&order_name&""
set rs=conn.execute(sql)
voto=rs(voto)+1
sql="update fotogatti.top_artists set order_name="&order_name&", voto="&voto&""
set rsupdate=conn.execute(sql)
%>
Te agradecere cualquier ayuda que me puedas dar.

MIL GRACIAS DE NUEVO !

Última edición por roroland; 15/02/2006 a las 09:12