Microsoft VBScript runtime error '800a01a8'
Object required: ''
/real-estate/uptest.asp, line 96
El error me lo marca en esta línea:
GobjConnect.Execute(SQL2)
Este es el scrip:
gsConnect = " Driver={MySQL};SERVER=localhost;DATABASE=Items;UID =ra;PASSWORD=web"
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open gsConnect
If Request.Cookies("Counter")=1 then
SQL="INSERT INTO fotos(ITEMID,ITEMOWNER,CATEGORYID,"&Imagen&","&Com entario&") VALUES("&Request.Cookies("ItemID")&","&Request.Coo kies("ItemOwner")&","&Request.Cookies("categoryId" )&",'"&NombreFichero& "','"&up.Form("nombre")&"')"
SQL2="UPDATE auctions SET IMAGEURL='"&NombreFichero&"' WHERE ITEMID="&Request.Cookies("ItemID")
response.write SQL
response.write SQL2
GobjConnect.Execute(SQL2)
Else
SQL="UPDATE fotos SET "&Imagen&"='"&NOmbreFichero& "',"&Comentario&"='"&up.Form("nombre")&"' WHERE ID="&Request.Cookies("Ultimo")
End If
'Call OpenDBConn
RESPONSE.WRITE SQL
GobjConnect.Execute(SQL)
SQL_ULTIMO="SELECT * FROM fotos ORDER BY ID DESC"
SET RS_ULTIMO=GobjConnect.Execute(SQL_ULTIMO)
Response.Cookies("Ultimo")=RS_ULTIMO("ID")
Que falta?
gracias