注册版块,连接数据库提示错误.大家帮忙看看..

[fujunlin]

注册页面没问题,注册验证是出现错误..
验证页代码如下:
<!--#include file="head.inc"-->
<!--#include file="../login/dbconn.asp"-->
<center>
<TABLE bgColor=#9c0000 border=0 cellPadding=0 cellSpacing=0 width="750">
<TBODY>
<TR>
<TD> </TD>
<TD><IMG height=20 src="../pict/regiline.gif" width=20></TD>
<TD align=left class=f12 valign=bottom width="20%"><b><font color="#ffffff"> 环球商务网会员注册</font></TD>
<TD bgColor=#ffffff><IMG height=20 src="../pict/table.gif" width=20></TD>
<TD align=left bgColor=#ffffff width="80%">  <IMG src="../pict/blue.gif" height=10 width=10><b>[注册环球会员]</b>  <IMG src="../pict/blue.gif" height=10 width=10><a href="modify_info.asp">[会员资料修改]</a>  <IMG src="../pict/blue.gif" height=10 width=10>[会员服务条款]  <IMG src="../pict/blue.gif" height=10 width=10><a href="serve.asp">[会员服务内容]</a>  <IMG src="../pict/blue.gif" height=10 width=10><a href="../default.asp">[返回环球首页]</a></TD>
</TR>
</TBODY>
</TABLE>
<TABLE bgColor=#9c0000 border=0 cellPadding=0 cellSpacing=0 width="750">
<TBODY>
<TR>
<TD><IMG height=2 src="../pict/shim.gif" width=10></TD>
</TR>
</TBODY>
</TABLE>
<script LANGUAGE="JavaScript">
function goHist(a)
{
history.go(a);
}
</script>
<%
set rs=server.CreateObject ("adodb.recordset")
sql="select * from qyml where user='"&request("user")&"'"
rs.open sql,conn,1,3
if not rs.eof then
%>
<table border="0" cellspacing="0" width="100%" cellpadding="0">
<tr>
<td width="100%" height="250" valign="middle" align="center"><font color="#000000" class=f12><b>该户名已经存在，请点击返回按钮，重新填写用户名。</b><form method="post"><input type="button" VALUE="返回" onClick="goHist(-1)"></form></font>
</td>
</tr>
</table>
<%else%>
<%
set myrs=server.CreateObject ("adodb.recordset")
mysql="select * from qyml where qymc='"&request("qymc")&"'"
myrs.open mysql,conn,1,3
if not myrs.eof then
%>
<table border="0" cellspacing="0" width="100%" cellpadding="0">
<tr>
<td width="100%" height="250" valign="middle" align="center"><b>您的公司信息已经存在，请不要重复提交。<a href="login.asp"><font color="#ff6600">登录系统！</a></b></font>
</td>
</tr>
</table>
<%
else
rs.addnew
rs("user")=request.form("user")
rs("pass")=request.form("pass")
rs("question")=request.form("question")
rs("answer")=request.form("answer")
rs("qymc")=request.form("qymc")
rs("qylb")=request.form("qylb")
rs("qyxz")=request.form("qyxz")
rs("zczj")=request.form("zczj")
rs("frdb")=request.form("frdb")
rs("ygrs")=request.form("ygrs")
rs("zh")=request.form("zh")
rs("bank")=request.form("bank")
rs("nyye")=request.form("nyye")
rs("zycp")=request.form("zycp")
rs("qyjj")=request.form("qyjj")
rs("sf")=request.form("sf")
rs("city")=request.form("city")
rs("sortid")=request.form("sortid")
rs("typeid")=request.form("typeid")
rs("post")=request.form("post")
rs("address")=request.form("address")
rs("phone")=request.form("phone")
rs("fax")=request.form("fax")
rs("email")=request.form("email")
rs("web")=request.form("web")
rs("name")=request.form("name")
rs("ch")=request.form("ch")
rs("bm")=request.form("bm")
rs("zw")=request.form("zw")
rs("hybz")=request.form("hybz")
rs.update
rs.close
set rs=noting
conn.close
set conn=nothing
%>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=740>
<TBODY>
<TR>
<TD background=images/f_t_b.gif height=24 width=282> 
<B><FONT face=arial>A&V </FONT>认证</B></FONT></TD>
<TD bgColor=#3b6fe3 width=250> </TD>
<TD><IMG height=24 src="images/f_t_1.gif" width=198></TD>
</TR>
</TBODY>
</TABLE>
<TABLE border=0 cellPadding=10 cellSpacing=10 width=740>
<TBODY>
<TR>
<TD align=left><FONT color=#cc0000><B>恭喜！您已注册成为<%=Abbreviation%>会员！</B></FONT>我们将对您的信息进行审核，您现在就可以使用部分免费服务，如“查阅/发布信息”、“查阅/发布产品”、“商务论坛”、“行业资讯”。立刻进入互动互信的<%=Abbreviation%>，享受商人的乐趣。</FONT></TD>
</TR>
</TBODY>
</TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width=740>
<TBODY>
<TR>
<TD colSpan=2><IMG height=61 src="images/word_trust_2.gif" width=238><IMG height=61 src="images/word_trust_2_1.gif" width=291></TD>
</TR>
<TR>
<TD><IMG height=73 src="images/word_trust_2_2.gif" width=238><BR><IMG height=70 src="images/word_trust_2_3.gif" width=238></TD>
<TD align=middle>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="85%">
<TBODY>
<TR>
<TD>
<DIV align=left class=f2><B>请注意阅读：</B></DIV>
<TABLE border=0 cellPadding=5 cellSpacing=0 class=f2 width="100%">
<TBODY>
<TR>
<TD class=f2 vAlign=top width="5%">1、</TD>
<TD class=f2 width="95%">免费浏览商业机会、免费发布/修改您的商业机会；</TD></TR>
<TR>
<TD class=f2 vAlign=top>2、</TD>
<TD class=f2>免费浏览产品信息、免费发布/修改产品信息；</TD>
</TR>
<TR>
<TD class=f2>3、</TD>
<TD class=f2>免费浏览公司信息、免费加入/修改您的公司信息。</TD>
</TR>
<TR>
<TD class=f2 colspan=2><b>商机无限 尽在<%=Abbreviation%>！ 带您走进全新的商务平台！</b></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
<TR>
<TD colSpan=2><IMG height=2 src="images/word_trust_2_4.gif" width=659></TD>
</TR>
</TBODY>
</TABLE>
<%end if%>
<%end if%>
<!--#include file="../end.inc"-->




提示错误如下:


HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务

--------------------------------------------------------------------------------

技术信息（用于支持人员）

错误类型：
Microsoft VBScript 编译器错误 (0x800A0411)
名称重定义
/000/login/dbconn.asp, line 2, column 4
dim conn
---^


浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)

网页：
POST 470 ??? /000/login/Register_Confirm.asp

POST Data:
user=wfyplss&pass=2965025&confirmPassword=2965025&question=asdfasdf&answer=fasdfasdf&name=asdfasdfasd&ch=%CF%C8%C9%FA&zw=asdfasdfasdf&bm=asdfasdf&address=asdfasdfasdfasdfasdfa&post=321000&sf=%BA%DA%C1 . . .

时间：
2005年5月7日, 22:31:51


连接页面:
<%
dim conn
dim connstr
on error resume next
connstr="DBQ="+server.mappath("../fpdb/Database.asa")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>


真不知道那出了问题,浏览器怎么会提示变量声明错误呢????

[mingyuexingguang]

看下 <!--#include file="head.inc"--> 是不是声明变量了

[menrock]

应该是<!--#include file="head.inc"-->里面声明过

[lovebeyondforever]

同意楼上的

[fujunlin]

是的,HEAD.INC是声明过了.
因为注册系统没把我注册的信息写进数据库.
我以为是他们故意不声明,代码里面那句是我加上去的,重复声明了...
对于ASP我只是懂点皮毛.也是若干年前的事了,朋友找我帮忙做ASP电子商务网毕业设计,最近饿补,没什么效果,时间紧,决定改网上的源代码,就是错误太多了.
我改的是防阿里巴巴的,为什么会注册不进去呢?

[fujunlin]

大家帮帮我吧,我的QQ:4194624.

[menrock]

重复声明就把其中一个去掉或换名称