Set DBConn9 = Server.CreateObject("ADODB.Connection")
Set oRS9 = DBConn9.Execute("INSERT INTO users (name, pass, email) VALUES ('" & name & "','" & pass & "','" & email & "');")
if DBConn9.errors.count> 0 then
for counter = 0 to DBConn9.errors.count
response.write "Database Error #" & DBConn9.errors(counter).number & " -> " & DBConn9.errors(counter).description & "<br>"
set DBConn9 = nothing