拒绝了对对象'customers'(数据库'master',所有者'dbo')的SELECT权限。

[mengqingren2008]

<%
dim sql,conn,rs,htmlcode
%>
<!--#include file="includes/dbconn.inc"-->
<%
dim htmlcode
username = request.form("username")
password = request.form("password")
realname = request.form("realname")
phone = request.form("phone")
email = request.form("email")
add = request.form("add")
city = request.form("city")
state = request.form("state")
zip = request.form("zip")
call openDB()
sql="select username from customers where username='"&username&"'"
set rs=conn.execute(sql)
if not rs.eof then
htmlcode="the username you choosed has been used by others please choose an other username"
htmlcode=htmlcode&"<a href=""regist.asp""><<back</a>"
response.write htmlcode
else
sql="insert into customers(username,password,realname,phone,email,add,city,state,zip) values ('"
sql=sql&username&"','"&password&"','"&realname&"','"&phone&"','"&email&"','"&add&"','"&city&"','"&state&"',"&zip&")"
set rs=conn.execute(sql)
sql="select Max(idcustomer) as idcust from customers"
set rs=conn.execute(sql)
Session("idcustomer")=rs("idcust")
call closeDB()
response.redirect "orderverify.asp"
end if
call closeDB()
%>