Ayuda Urgente......UPDATE

[eruddy]

Estoy tratando de actualizar una base de Datos pero no me resulta. No me da nigun error pero en la Base de Datos no actualiza nada, si alguien me puede ayudar...el codigo que utilizo es el siguiente:

Código:

  <% 
Dim varId, varDropSitio, varAlarma, varFechaIA
varId=Request.QueryString("var")
varId = CInt(varId)

varDropSitio = request("DropSitio")
varAlarma = request("alarma")
varFechaIA = request("fechaIA")

	Dim Conn, Sql
 	Set Conn=Server.createobject("adodb.connection")
 	Conn.open "Conecction"
 	Sql="UPDATE  Tabla SET Sitio = '"& varDropSitio &"', Alarma = '"& varAlarma &"', IA_Date = '"& varFechaIA &"' WHERE Id="&varId&""
 	Conn.execute(Sql)
	
 	Set Conn = Nothing
	Response.Redirect "Admin.asp"

%>

¿¿¿Alguna idea???


Scorpion