永发信息网

ASP表单保存页错误问题

答案:5  悬赏:40  手机版
解决时间 2021-06-07 06:33

<!--#include file="Include/conn.asp"-->
<!--#include file="Include/Nsql.asp"-->
<%
dim RegName,sex,Birth,National,Education,Credit,Remark,mycode,Email,Address
dim UserName,Telephone,Mobile,Poid
dim rs,sql
RegName=trim(request.form("RegName"))
sex=request.form("sex")
Birth=request.form("Birth")
National=request.form("National")
Education=trim(request.form("Education"))
Credit=trim(request.form("Credit"))
Remark=trim(request.form("Remark"))
UserName=trim(request.form("UserName"))
Address=trim(request.form("Address"))
Telephone=trim(request.form("Telephone"))
Mobile=trim(request.form("Mobile"))
Email=trim(request.form("Email"))
mycode=trim(request.form("mycode"))

if RegName="" or Birth="" or National="" or Address="" or Telephone="" then
Response.Write "<script language=javascript>alert('必填选项请输入,谢谢!');javascript:history.back();</script>"
Response.end()
end if
if mycode<>Session("getcode") then
Response.Write "<script language=javascript>alert('请输入正确验证码,谢谢!');javascript:history.back();</script>"
Response.end()
end if

set rs = server.createobject("adodb.recordset")
sql="select * from zhi_rui_s_po_Order"
rs.open sql,conn,1,3
rs.addnew
rs("RegName")=RegName
rs("sex")=sex
rs("Birth")=Birth
rs("National")=National
rs("Education")=Education
rs("Credit")=Credit
rs("Address")=Address
rs("Telephone")=Telephone
rs("Mobile")=Mobile
rs("Email")=Email
rs("Remark")=Remark
rs("AddTime")=now()
rs("LastLoginIP")=Request.ServerVariables("REMOTE_ADDR")
rs.update
rs.close
set rs=nothing
Call Alert ("恭喜你,网上报名提交成功!正在审核中","Regist.asp")
%>

以上代码是我表单的保存save页,可是运行就是错误。提示的错误是

Microsoft VBScript 编译器错误 错误 '800a0411'

名称重定义

?,行 0 dim RegName,sex,Birth,National,Education,Credit,Remark,mycode,Email,Address --------------------------------------------------------------^

该如何解决

最佳答案

查看
行 0 dim RegName,sex,Birth,National,Education,Credit,Remark,mycode,Email,Address --------------------------------------------------------------^
是否在


<!--#include file="Include/conn.asp"-->
<!--#include file="Include/Nsql.asp"-->
存在过。如果存在过的话,那重复代码是不可以的


全部回答

查看头部的两个包含文件,将重复定义的变量删除,或者注释掉

<% dim RegName,sex,Birth,National,Education,Credit,Remark,mycode,Email,Address

这一行去掉可以。。你有可能是在

<!--#include file="Include/conn.asp"--> <!--#include file="Include/Nsql.asp"-->

这个里面已经定义了这些名的。

建议你换一个名字。。比如RegName_u之类的。。

程序没错,是编写器系统错误了。

dim RegName,sex,Birth,National,Education,Credit,Remark,mycode,Email,Address dim UserName,Telephone,Mobile,Poid dim rs,sql

以上变量与

<!--#include file="Include/conn.asp"--> <!--#include file="Include/Nsql.asp"-->

页的变量重复

最有可能的是<!--#include file="Include/conn.asp"-->这个页

我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
现在还能不能邀请游戏人生
眼泪是甜还是咸
铁观音和普洱茶哪个好?
茶陵县株洲新世纪窗帘床上用品在什么地方啊,
为什么人都要寻找一个伴侣呢?为什么两个人的
怎样炼好蓝球
DNF怎么得到袖珍罐?
数学同类项的题
那个helofang什么意思
暗黑三泄密版下载
昨晚天天向上最后各主播播短信发送时的歌曲叫
系统漏洞是什么
卫滨区新乡琴朝乐器(滨河路)地址有谁知道?有
如何有效去除衣服上的口香糖
在那种场合结实朋友?
推荐资讯
手机飞信和电脑飞信有什么区别
广州一圣灵战士的项链能卖多少钱?
怎么我登陆139邮箱登陆不了的?
在婚纱店里一个人兼两个职业是不是就是不专业
冬天脸上起皮怎么办
怎么样能让眼睛变大,不化妆的
房屋征收和房屋拆迁有何区别?
诺基亚滑盖手机谁能给推荐一个2千左右的?
845GL主板
佳急送快递的首页是什么呢,怎么可以查询跟踪
杭州整形医院对于双眼皮修复怎么样呀
考拉的英文怎么读语音,考拉用英语怎么说
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?