请问这是什么错误,请看代码,十万火急
当我输入ID时,即使是数据库中没有的记录也提示"经销商ID已经存在,请重新输入",为什么呢?
<%
ID=request.form("ID")
Dealer=request.form("Dealer")
CompanyName=request.form("CompanyName")
Area=request.form("Area")
AccountName=request.form("AccountName")
Bank=request.form("Bank")
AccountNo=request.form("AccountNo")
Tel=request.form("Tel")
Fax=request.form("Fax")
Contact=request.form("Contact")
sql = "select ID from Dealer where ID='"& ID &"'"
set check = conn.Execute(sql)
if check.eof then
Response.Write ("经销商ID已经存在,请重新输入")
else
sqlAdd="insert into Dealer(ID,CompanyName,Dealer,Area,AccountName,Bank,AccountNo,Tel,Fax)"
sqlAdd=sqlAdd & "values('"& ID &"','"& Dealer &"','"& CompanyName &"','"& Area &"','"& AccountName &"','"& Bank &"','"& AccountNo &"','"& Tel &"','"& Fax &"')"
sqlAddPwd="insert into tblUser(UserID,Pwd)"
sqlAddPwd=sqlAddPwd & "values('"& ID &"','"& ID &"')"
'response.write sqlAdd & "<P>"
'response.end
Set rs = conn.execute (sqlAdd)
Set Pwdrs = conn.execute (sqlAddPwd)
response.redirect("admin_info_add.asp")
end if
%>