%@LANGUAGE = VBScript %> <% DBug = TRUE%> <% session("theState") = "user" on error resume next dim mySQL, connTemp, rsTemp, rsCount, pid call opendb() Set rsTemp = Server.CreateObject("ADODB.Recordset") %>