参考:
sql = "insert into shop_user(username,userpassword,useremail,adddate) values('"&uname&"','"&pwd&"','"&uemail&"','"&adddate&"')"
on error resume next
conn.execute(sql)
If err.number=0 then
Response.Write "<script language='javascript'>alert('恭喜您,注册成功!');location.href='index_shop.asp';</script>"
Else
Response.Write "<script language='javascript'>alert('对不起,注册失败!');</script>"
End if