strsql="Select * From Voti_Sondaggio where data=" & date() & " and ip='" & ip & "'"
rs.open strsql, conn,3
if rs.eof then
rs.close
io ho questa query
e se non mi trova nulla mi deve chiudere il record e poi deve fare questo, invece se trova il record pieno non lo deve fare come faccio?
a me fa sempre e cmq questa operazione
strsql="Select * From Voti_Sondaggio"
rs.Open strsql,conn,3,3
rs.AddNew
rs("id_sondaggio")=id_sondaggio
rs("voto")=voto
rs("data")=date()
rs("ip")=request.servervariables("remote_host")
rs.Update
rs.close
strsql="Select * From Sondaggi where id_sondaggio=" & id_sondaggio
rs.Open strsql,conn,3,3
titolo=rs("titolo")
sondaggi_opzione_1=rs("opzione_1")
sondaggi_opzione_2=rs("opzione_2")
sondaggi_opzione_3=rs("opzione_3")
sondaggi_opzione_4=rs("opzione_4")
rs.close
strsql="Select * From Statistica_Voti where id_sondaggio=" & id_sondaggio
rs.Open strsql,conn,3,3
statistica_opzione_1=rs("opzione_1")
statistica_opzione_2=rs("opzione_2")
statistica_opzione_3=rs("opzione_3")
statistica_opzione_4=rs("opzione_4")
rs.close
strsql="Select * From Statistica_Voti where id_sondaggio=" & id_sondaggio
rs.Open strsql,conn,3,3
if voto=sondaggi_opzione_1 then
statistica_opzione_1=statistica_opzione_1 + 1
rs("opzione_1")=statistica_opzione_1
end if
if voto=sondaggi_opzione_2 then
statistica_opzione_2=statistica_opzione_2+1
rs("opzione_2")=statistica_opzione_2
end if
if voto=sondaggi_opzione_3 then
statistica_opzione_3=statistica_opzione_3+1
rs("opzione_3")=statistica_opzione_3
end if
if voto=sondaggi_opzione_4 then
statistica_opzione_4=statistica_opzione_4+1
rs("opzione_4")=statistica_opzione_4
end if
rs.update
rs.close
strsql="Select * From Statistica_Voti where id_sondaggio=" & id_sondaggio
rs.Open strsql,conn,3,3
statistica_opzione_1=rs("opzione_1")
statistica_opzione_2=rs("opzione_2")
statistica_opzione_3=rs("opzione_3")
statistica_opzione_4=rs("opzione_4")
rs.close
strsql="Select * From Sondaggi where id_sondaggio=" & id_sondaggio
rs.Open strsql,conn,3,3
sondaggi_opzione_1=rs("opzione_1")
sondaggi_opzione_2=rs("opzione_2")
sondaggi_opzione_3=rs("opzione_3")
sondaggi_opzione_4=rs("opzione_4")
rs.close
%>

Rispondi quotando