<%
//Set conn = Server.CreateObject("ADODB.Connection")
conn.Open (Application("dbconnect"))
set rs = Server.CreateObject("ADODB.recordset")
rs.Open "Update Bidsprizes set lastbidtime = '2006/10/25 17:36:00' where id=1",conn
rs.Open "Select lastbidtime from Bidsprizes where id=1;", conn
for each x in rs.Fields
//Response.Write(x.name)
//Response.Write(" = ")
query=x.value
// Response.Write(x.value & "
")
Response.Write(query)
next
rs.Close
conn.Close
%>