set conn = server.CreateObject("ADODB.Connection")
conn.ConnectionTimeout=120
conn.Open("Provider=sqloledb;Data Source=(local);Initial Catalog=myDatabase;Integrated Security=SSPI")

sql = "update myTable set zipCode = 91839 where ID = 12345"
conn.execute(sql)

sql = "update myTable set zipCode = 02930 where ID = 67890"
conn.execute(sql)