十万火急的问题,为什么表单提交的action值没有被传递

xingon 2004-04-10 08:15:43
editf.asp?action=1&id=<%=m%>
是什么原因我表单中的这个action没有被传递,而且怪的是提示错误是
Microsoft JET Database Engine 错误 '80040e14'

语法错误 (操作符丢失) 在查询表达式 'id=' 中。

/web/editf.asp, 行7



<!--#include file="conn.asp"-->
<%
if session("m")<>"" or session("dj")<>"" then
m=request("id")
set rs=server.createobject("adodb.recordset")
sql="select * from free where id="&m
rs.open sql,conn,1,1
action=request("action")
if action=1 then
call edit()
end if
sub eidt()
title=request("title")
url=request("url")
language=request("language")
m=request("1")
big=request("big")
q=request("sql")
pl=replace(request("pl"),vbcrlf,"<br>")
t=request("id")
set rs1=server.createobject("adodb.recordset")
sql1="select * from free where id="&t
rs1.open sql1,conn,1,2
rs1("title")=title
rs1("url")=url
rs1("language")=language
rs1("type")=m
rs1("space")=big
rs1("sql")=q
rs1("pl")=pl
rs1("adder")=session("m")
rs1("time")=date()
rs1.update
response.write"<script>alert('资源修改成功');window.location.href='free.asp';</script>"
response.end
end sub
%>
<script language=vbscript>
sub chk
if form.title.value=empty then
Msgbox"请输入网站标题"
document.form.title.focus()
exit sub
elseif form.url.value=empty then
msgbox"请您网站连接"
document.form.url.focus()
exit sub
elseif instr(form.url.value,"http://")<1 then
msgbox"连接必须包含http://"
document.form.url.focus()
exit sub
elseif form.big.value="" then
msgbox"请空间大小"
document.form.big.focus()
exit sub
elseif form.sql.value="" then
msgbox"请填写数据库大小类型"
document.form.sql.focus()
exit sub
elseif form.pl.value="" then
msgbox"请填写必要的介绍"
document.form.pl.focus()
exit sub
else
form.submit
end if
end sub

</script>


<html>

<head>
<style type="text/css">
A:link,A:active,A:visited{TEXT-DECORATION:none ;Color:#006600}
A:hover{TEXT-DECORATION: underline;Color:#009900}

BODY{
FONT-SIZE: 12px;
COLOR: #000000;
FONT-FAMILY: 宋体;
background-color: #FFFFFF;
scrollbar-face-color: #dbeedd;
scrollbar-highlight-color: #FFFFFF;
scrollbar-shadow-color: darkseagreen;
scrollbar-3dlight-color: #dbeedd;
scrollbar-arrow-color: darkseagreen;
scrollbar-track-color: #f3faf4;
scrollbar-darkshadow-color: #f3faf4;
background-image: url("myweb2/skin/more/lvbgcolor.gif");
}
TD{
font-family: 宋体;
font-size: 12px;
line-height: 15px;
}
th
{
background-color: #a9d46d;
background-image: url("myweb2/skin/blue/h3.gif");
COLOR: ##E4E5E7;
font-size: 12px;
font-weight:bold;
}
td.TableTitle2
{
background-color: #E4E5E7;
}
td.TableBody1
{
background-color: #E4E5E7;
}
td.TableBody2
{
background-color: #E4E5E7;
}
td.TopDarkNav
{
background-image: url("myweb2/skin/blue/h12.gif");
}
td.TopLighNav
{
background-image: url("myweb2/skin/blue/h1.gif");
}
td.TopLighNav1
{
background-image: url("myweb2/skin/blue/h2.gif");
}
td.TopLighNav2
{
background-color:#FFFFFF
}
.tableBorder1
{
width:97%;
border: 1px;
background-color: #a9d46d;
}
.tableBorder2
{
width:97%;
border: 1px #83BB37 solid;
background-color: #e3f1d1;
}

#TableTitleLink A:link, #TableTitleLink A:visited, #TableTitleLink A:active {
COLOR: #E4E5E7;
TEXT-DECORATION: none;
}
#TableTitleLink A:hover {
COLOR: #FFFFFF;
TEXT-DECORATION: underline;}

input,select,Textarea{
font-family:Tahoma,Verdana,宋体; font-size: 12px; line-height: 15px;}
}
.normalTextSmall
{
font-size : 11px;
color : #000000;
font-family: Verdana, Arial, Helvetica, sans-serif;
}
</style>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta name="Microsoft Theme" content="none, default">
<meta name="Microsoft Border" content="none, default">
</head>

<body topmargin="1" leftmargin="2">
<form action="editf.asp?action=1&id=<%=m%>" name=form >
<div align="center">
<center>
<table border="1" width="500" bordercolor="#008000" cellspacing="0" cellpadding="0" bordercolorlight="#008000" bordercolordark="#FFFFFF" height="248">
<tr>
<td width="496" height="15" bgcolor="#60BD77" colspan="2"> </td>
</tr>
<tr>
<td width="119" height="13">网站标题</td>
<td width="375" height="13">
<p align="center"><input type="text" name="title" size="20" value="<%=rs("title")%>">  *</td>
</tr>
<tr>
<td width="119" height="10">网站连接</td>
<td width="375" height="10">
<p align="center"><input type="text" name="url" size="20" value="<%=rs("url")%>"> *</td>
</tr>
<tr>
<td width="119" height="19">国别</td>
<td width="375" height="19" align="center"><input type="text" name="language" size="20" value="<%=rs("language")%>"></td>
</tr>
<tr>
<td width="119" height="7">所属分类</td>
<td width="375" height="7" align="center"><select size="1" name="1">
<% set rs1=server.createobject("adodb.recordset")
sql1="select * from freeclass"
rs1.open sql1,conn,1,1
do while not rs1.eof
%>
<option selected><%=rs1("class")%></option>
<%
rs1.movenext
loop
%>
</select>  原来类型为<%=rs("type")%> *</td>
</tr>
<tr>
<td width="119" height="21">空间大小</td>
<td width="375" height="21" align="center"><input type="text" name="big" size="20" value="<%=rs("space")%>">*</td>
</tr>
<tr>
<td width="119" height="12">数据库大小</td>
<td width="375" height="12" align="center"><input type="text" name="sql" size="20" value="<%=rs("sql")%>">*</td>
</tr>
<tr>
<td width="119" height="106">
<p align="center">评论<font color="#FF0000">(必写)</font></td>
<td width="375" height="106" valign="top"><textarea rows="6" name="pl" cols="59"><%=rs("pl")%></textarea></td>
</tr>
<tr>
<td width="494" height="28" colspan="2">
<p align="center"><input type="button" onclick=chk value="提交" name="B1"> <input type="reset" value="全部重写" name="B2"></td>
</tr>
</table>
</center>
</div>
</form>
<%else
response.write"注意您的权限够吗"
end if

%>
</body>

</html>
</script>
...全文
32 点赞 收藏 13
写回复
13 条回复
切换为时间正序
请发表友善的回复…
发表回复
xingon 2004-04-10
不是这样的问题,问题主要是忘写了method=post
问题已经解决
感谢各位支持哈
回复
makestar 2004-04-10
我以前也遇到过这个问题好象,a href= ......可以
form 中不可以
回复
amwje123 2004-04-10
要写完整的.. 注意引号

a href="editf.asp?action=1&id=<%=m%>"
回复
mqmelon 2004-04-10
ID无值,m没有被传递。
回复
look4sword 2004-04-10
你根本没有id这个变量传过去
回复
jiffer 2004-04-10
应该改成:

if action="1" then
回复
你response.write(m)看看m应该没有值
if action="1" then
回复
TrueAndFalse 2004-04-10
如果没有的话, 那就要从上一个传值的页面找问题罗
回复
lxlx00 2004-04-10
Microsoft JET Database Engine 错误 '80040e14' 是指sql语句出错(字段名错误,或数据类型不匹配),你看看有没有哪句出错了。比如说这句有没有问题呢:sql="select * from free where id="&m
回复
xingon 2004-04-10
根本是提交的时候没有传递action的值,与放在那里暂时还没有关系啊
回复
baby21st 2004-04-10
action=request("action")把它放在最上面
然后加个
if action <> "" then
action = cint(action)
end if
回复
xingon 2004-04-10
没有
回复
TrueAndFalse 2004-04-10
so....lang....
你打印一下 action 和 id 看看有没有值啊
回复
发动态
发帖子
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
社区公告
暂无公告