Link to home
Start Free TrialLog in
Avatar of jhmoen
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 & "',UnstableReactiveMaxSolid='" & 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_followupU.asp, line 60 WHICH IS THE SECOND LINE OF MY STATMENT
& "',ContactUSUPhone='" & ContactUSUPhone & "',ContactHomePhone='" & ContactHomePhone & "',ContactEmail='" & ContactEmail & "',AltContactName='" & AltContactName & _
ASKER CERTIFIED SOLUTION
Avatar of fritz_the_blank
fritz_the_blank
Flag of United States of America image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of jhmoen
jhmoen

ASKER

NOW I GET SYNTAX ERROR IN UPDATE STATEMENT,
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='" & WaterReactiveMaxSolid & _
        "',UnstableReactiveMaxLiq='" & UnstableReactiveMaxLiq & "',UnstableReactiveMaxSolid='" & 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)



Avatar of jhmoen

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.

Avatar of jhmoen

ASKER

I got it.
My WHERE clause was missing the (') marks around them.

THE FINAL:
 " WHERE BuildingName = '" & BuildingName & "' AND RoomID = '" & RoomID & "'"