菜鸟级问题！！！36行报错！！！

diyghost 2003-10-20 10:58:10

错误类型：
Microsoft VBScript 编译器错误 (0x800A03F9)
/temp/1-2.asp, 第 36 行, 第 68 列
if request("name")<>"" and request("age")<>"" and request("fom")<>""
-------------------------------------------------------------------^

浏览器类型：
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0; DigExt)

页：
GET /temp/1-2.asp

时间：
2003年10月17日, 22:34:06

详细信息：
Microsoft 支持

<% option explicit %>
<% response.buffer=true%>
<html>
<head>
<title>添加朋友</title>
</head>
<body background="image/bg.gif" text="#000000" topmargin="20">
<center><p style="font-size:24pt;font-weiht">添加新朋友</p></center>
<table width="50%" cellspacing="1" align="center" border="1">
<form action="" method="post" name="form1">
<tr>
<td>姓名</td><td> <input type="text" name="name" size="16"> </td>
</tr>
<tr>
<td>年龄</td><td> <input type="text" name="age" size="16"> </td>
</tr>
<tr>
<td>户口</td><td> <input type="text" name="from" size="16"> </td>
</tr>
<tr>
<td >学校</td><td> <input type="text" name="scholl" size="16"> </td>
</tr>
<tr>
<td >姓别</td><td> <input type="text" name="sex" size="16"> </td>
</tr>
<tr>
<td >手机</td><td> <input type="text" name="mbl" size="16"> </td>
</tr>
<tr>
<td align="center" colspan="2"><input type="submit" value="完成"></td>
</tr>
</form>
</table>
<%
'如果上面信息填全了，就可以显示下面的页面否则，会给出错信息
if request("name")<>"" and request("age")<>"" and request("from")<>"" and request("scholl")<>"" request("sex")<>"" and request("mbl")<>"" then
'以下连上数据库建立一个connection对象实例db
dim db
set db=server.createobject("adodb.connection")
db.Open "DBQ="&Server.Mappath("fried.mdb")&";DRIVER={Microsoft Access Driver (*.mdb)};" '相对路径
'以下加新记录
dim strsql,varname,varage,varfrom,varscholl,varsex.valmbl
varname=request("name")
varage=request("age")
varfrom=request("form")
varscholl=request("scholl")
varsex=request("sex")
valmbl=request("mbl")
strsql="insert into mblink(name,age,from,scholl,sex,mbl) values('"&varname&"','"&varage&"','"&varfrom&"','"&varscholl&"',
'"&varsex&"','"&varsex&"','"&varmbl&"')"
db.execute(strsql)
response.redirect"index.asp"
else
response.write"信息填得不完整"
end if
%>
<body>
</html>

...全文

62 11 打赏收藏转发到动态举报

写回复

用AI写文章

11 条回复

切换为时间正序

请发表友善的回复…

发表回复

pazll 2003-10-21

打赏
举报

呵呵，你太粗心大意了；
基本上都是饭的低级错误；

gmlxf 2003-10-20

打赏
举报

mblink(name,age,from,scholl,sex,mbl)里面才6个字段，但是你的values()里面却有7个？

insert into t(col1,col2,col3) values('a','b','c')
一定要个数对应相同才可以的。

而且如果你的字段是数字的话，你要去掉"'"号。

diyghost 2003-10-20

打赏
举报

这是我第一次写程式！42行逗号我打成句号了。。
不过又有情况唉！11
误类型：
Microsoft VBScript 编译器错误 (0x800A0409)
/temp/1-2.asp, 第 49 行, 第 121 列
strsql="insert into mblink(name,age,from,scholl,sex,mbl) values('"&varname&"','"&varage&"','"&varfrom&"','"&varscholl&"',
------------------------------------------------------------------------------------------------------------------------^

浏览器类型：
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0; DigExt)

页：
GET /temp/1-2.asp

时间：
2003年10月17日, 23:12:51

详细信息：
Microsoft 支持

49行如下代码：
strsql="insert into mblink(name,age,from,scholl,sex,mbl) values('"&varname&"','"&varage&"','"&varfrom&"','"&varscholl&"',
'"&varsex&"','"&varsex&"','"&varmbl&"')"

diyghost 2003-10-20

打赏
举报

谢谢楼上的。
我加上and 了现在又出现新的错误。42行
烛光说对了，现在36行不报错了。
不过42行报如下错误！
错误类型：
Microsoft VBScript 编译器错误 (0x800A0401)
/temp/1-2.asp, 第 42 行, 第 50 列
dim strsql,varname,varage,varfrom,varscholl,varsex.valmbl
-------------------------------------------------^

浏览器类型：
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0; DigExt)

页：
GET /temp/1-2.asp

时间：
2003年10月17日, 23:01:14

详细信息：
Microsoft 支持

42行代码如下：
dim strsql,varname,varage,varfrom,varscholl,varsex.valmbl

gmlxf 2003-10-20

打赏
举报

你在("scholl")<>""后少了"and"
if request("name")<>"" and request("age")<>"" and request("from")<>"" and request("scholl")<>"" and request("sex")<>"" and request("mbl")<>"" then

eduxh 2003-10-20

打赏
举报

if request.form("name")<>"" and request.form("age")<>"" and request.form("from")<>"" and request.form("scholl")<>"" request.form("sex")<>"" and request.form("mbl")<>"" then
____________________________________
看到了，少了一个and

diyghost 2003-10-20

打赏
举报

改为request.form后报错依旧！！111
错误类型：
Microsoft VBScript 编译器错误 (0x800A03F9)
/temp/1-2.asp, 第 36 行, 第 116 列
if request.form("name")<>"" and request.form("age")<>"" and request.form("from")<>"" and request.form("scholl")<>"" request.form("sex")<>"" and request.form("mbl")<>"" then
-------------------------------------------------------------------------------------------------------------------^

浏览器类型：
Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0; DigExt)

页：
GET /temp/1-2.asp

时间：
2003年10月17日, 22:59:27

详细信息：
Microsoft 支持

gmlxf 2003-10-20

打赏
举报

你在("scholl")<>""后少了"and"
if request("name")<>"" and request("age")<>"" and request("from")<>"" and request("scholl")<>"" and request("sex")<>"" and request("mbl")<>"" then

diyghost 2003-10-20