jhmoen
asked on
another bad update
MY UPDATE:
'Update any user defined Emergency Response Information
sql = "UPDATE EmergencyResponse SET (FloorNum='" & FloorNum & "', RoomDesc='" & RoomDesc & "',UMC='" & UMC & "',ContactName='" & ContactName & _
& "',ContactUSUPhone='" & ContactUSUPhone & "',ContactHomePhone='" & ContactHomePhone & "',ContactEmail='" & ContactEmail & "',AltContactName='" & AltContactName & _
& "',AltContactUSUPhone='" & AltContactUSUPhone & "',AltContactHomePhone='" & AltContactHomePhone & "',FireExtLocation='" & FireExtLocation & "',MSDSInfoLocation='" & MSDSInfoLocation & _
& "',NumFumeHoods='" & NumFumeHoods & "',NumBioCabinets='" & NumBioCabinets & "',FlamCombustMaxLiq='" & FlamCombustMaxLiq & "',FlamCombustMaxSolid='" & FlamCombustMaxSolid & _
& "',CorrosiveMaxLiq='" & CorrosiveMaxLiq & "',CorrosiveMaxSolid='" & CorrosiveMaxSolid & "',OxidizerMaxLiq='" & OxidizerMaxLiq & "',OxidizerMaxSolid='" & OxidizerMaxSolid & _
& "',PeroxidesMaxLiq='" & PeroxidesMaxLiq & "',PeroxidesMaxSolid='" & PeroxidesMasSolid & "',WaterReactiveMaxLiq='" & WaterReactiveMaxLiq & "',WaterReactiveMaxSolid=' " & WaterReactiveMaxSolid & _
& "',UnstableReactiveMaxLiq= '" & UnstableReactiveMaxLiq & "',UnstableReactiveMaxSoli d='" & UnstableReactiveMaxSolid & "',AcuteToxicMaxLiq='" & AcuteToxicMaxLiq & "',AcuteToxicMaxSolid='" & AcuteToxicMaxSolid & _
& "',CRToxinsMaxLiq='" & CRToxinsMaxLiq & "',CRToxinsMaxSolid='" & CRToxinsMaxSolid & "',Isotopes='" & Isotopes & "',InfectiousBio='" & InfectiousBio & _
& "',Power='" & Power & "',Other='" & Other & "',UpdateDate='" & UpdateDate & _
& "' WHERE BuildingName = " & BuildingName & " AND RoomID = " & RoomID & ")"
oConn.Execute(sql)
ERROR:
Error Type:
Microsoft VBScript compilation (0x800A03EA)
Syntax error
/testhazform/emergency_fol lowupU.asp , line 60 WHICH IS THE SECOND LINE OF MY STATMENT
& "',ContactUSUPhone='" & ContactUSUPhone & "',ContactHomePhone='" & ContactHomePhone & "',ContactEmail='" & ContactEmail & "',AltContactName='" & AltContactName & _
'Update any user defined Emergency Response Information
sql = "UPDATE EmergencyResponse SET (FloorNum='" & FloorNum & "', RoomDesc='" & RoomDesc & "',UMC='" & UMC & "',ContactName='" & ContactName & _
& "',ContactUSUPhone='" & ContactUSUPhone & "',ContactHomePhone='" & ContactHomePhone & "',ContactEmail='" & ContactEmail & "',AltContactName='" & AltContactName & _
& "',AltContactUSUPhone='" & AltContactUSUPhone & "',AltContactHomePhone='" & AltContactHomePhone & "',FireExtLocation='" & FireExtLocation & "',MSDSInfoLocation='" & MSDSInfoLocation & _
& "',NumFumeHoods='" & NumFumeHoods & "',NumBioCabinets='" & NumBioCabinets & "',FlamCombustMaxLiq='" & FlamCombustMaxLiq & "',FlamCombustMaxSolid='" & FlamCombustMaxSolid & _
& "',CorrosiveMaxLiq='" & CorrosiveMaxLiq & "',CorrosiveMaxSolid='" & CorrosiveMaxSolid & "',OxidizerMaxLiq='" & OxidizerMaxLiq & "',OxidizerMaxSolid='" & OxidizerMaxSolid & _
& "',PeroxidesMaxLiq='" & PeroxidesMaxLiq & "',PeroxidesMaxSolid='" & PeroxidesMasSolid & "',WaterReactiveMaxLiq='" & WaterReactiveMaxLiq & "',WaterReactiveMaxSolid='
& "',UnstableReactiveMaxLiq=
& "',CRToxinsMaxLiq='" & CRToxinsMaxLiq & "',CRToxinsMaxSolid='" & CRToxinsMaxSolid & "',Isotopes='" & Isotopes & "',InfectiousBio='" & InfectiousBio & _
& "',Power='" & Power & "',Other='" & Other & "',UpdateDate='" & UpdateDate & _
& "' WHERE BuildingName = " & BuildingName & " AND RoomID = " & RoomID & ")"
oConn.Execute(sql)
ERROR:
Error Type:
Microsoft VBScript compilation (0x800A03EA)
Syntax error
/testhazform/emergency_fol
& "',ContactUSUPhone='" & ContactUSUPhone & "',ContactHomePhone='" & ContactHomePhone & "',ContactEmail='" & ContactEmail & "',AltContactName='" & AltContactName & _
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
An insert with same table, same exact dims, etc. works perfectly.
An issue with this update.
Once again, can't see what I am missing. I thought the extra & was what I was missing, but apparently not.
An issue with this update.
Once again, can't see what I am missing. I thought the extra & was what I was missing, but apparently not.
ASKER
I got it.
My WHERE clause was missing the (') marks around them.
THE FINAL:
" WHERE BuildingName = '" & BuildingName & "' AND RoomID = '" & RoomID & "'"
My WHERE clause was missing the (') marks around them.
THE FINAL:
" WHERE BuildingName = '" & BuildingName & "' AND RoomID = '" & RoomID & "'"
ASKER
This is driving me nuts...can you see anything. I output it and it looks great....but page will not display.
'Update any user defined Emergency Response Information
sql = "UPDATE EmergencyResponse SET (FloorNum='" & FloorNum & "', RoomDesc='" & RoomDesc & "',UMC='" & UMC & "',ContactName='" & ContactName & _
"',ContactUSUPhone='" & ContactUSUPhone & "',ContactHomePhone='" & ContactHomePhone & "',ContactEmail='" & ContactEmail & "',AltContactName='" & AltContactName & _
"',AltContactUSUPhone='" & AltContactUSUPhone & "',AltContactHomePhone='" & AltContactHomePhone & "',FireExtLocation='" & FireExtLocation & "',MSDSInfoLocation='" & MSDSInfoLocation & _
"',NumFumeHoods='" & NumFumeHoods & "',NumBioCabinets='" & NumBioCabinets & "',FlamCombustMaxLiq='" & FlamCombustMaxLiq & "',FlamCombustMaxSolid='" & FlamCombustMaxSolid & _
"',CorrosiveMaxLiq='" & CorrosiveMaxLiq & "',CorrosiveMaxSolid='" & CorrosiveMaxSolid & "',OxidizerMaxLiq='" & OxidizerMaxLiq & "',OxidizerMaxSolid='" & OxidizerMaxSolid & _
"',PeroxidesMaxLiq='" & PeroxidesMaxLiq & "',PeroxidesMaxSolid='" & PeroxidesMaxSolid & "',WaterReactiveMaxLiq='" & WaterReactiveMaxLiq & "',WaterReactiveMaxSolid='
"',UnstableReactiveMaxLiq=
"',CRToxinsMaxLiq='" & CRToxinsMaxLiq & "',CRToxinsMaxSolid='" & CRToxinsMaxSolid & "',Isotopes='" & Isotopes & "',InfectiousBio='" & InfectiousBio & _
"',Power='" & Power & "',Other='" & Other & "',UpdateDate='" & UpdateDate & _
"' WHERE BuildingName = " & BuildingName & " AND RoomID = " & RoomID & ")"
oConn.Execute(sql)