28,403
社区成员
发帖
与我相关
我的任务
分享对象不支持此属性或错误：'request.form'
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file= "admin.asp"-->
<!--#include file= "inc/conn.asp"-->
<!--#include file= "../inc/function.asp"-->
<%
dim rsBig,sqlBig
dim BigClassName
if request.form("AddBigClass") = "添 加" then
request.Form("BigClassName") = BigClassName
if BigClassName = "" then
call errorHisrtoryBack("主类名称不能空，请重新输入")
end if
set rsBig = server.CreateObject("adodb.recordset")
sqlBig = "select * from BigClass where BigClassName = '"&BigClassName&"'"
rsBig.open sqlBig,conn,1,3
if not rsBig.bof and not rsBig.eof then
call errorHisrtoryBack ("主类名称已经存在，请重新输入")
end if
rsBig.addnew
rsBig("BigClassName") = BigClassName
reBig.update
rsBig.close
set rsBig = nothing
end if
%>
<!--#include file = "inc/head.asp"-->
</head>
<body>
<div id="AddClass">
<h1> 添加主类</h1>
<form name="BigClass" id="BigClass" method="post" action="Class_Add.asp" >
<table>
<tr><td class="Addtitle">主类名称：</td>
<td><input type="text" name="BigClassName" id="BigClassName" class="ClassName" /></td>
</tr>
<tr><td class="Addtitle"></td>
<td><input type="submit" name="AddBigClass" id="AddBigClass" value="添 加" class="Add" /></td>
</tr>
</table>
</form>
</body>
</html>
<!--#include file= "admin.asp"-->
<!--#include file= "inc/conn.asp"-->
<!--#include file= "../inc/function.asp"-->
<%
dim rsBig,sqlBig
dim BigClassName
if request.form("AddBigClass") = "添 加" then
request.Form("BigClassName") = BigClassName
if BigClassName = "" then
call errorHisrtoryBack("主类名称不能空，请重新输入")
end if
set rsBig = server.CreateObject("adodb.recordset")
sqlBig = "select * from BigClass where BigClassName = '"&BigClassName&"'"
rsBig.open sqlBig,conn,1,3
if not rsBig.bof and not rsBig.eof then
call errorHisrtoryBack ("主类名称已经存在，请重新输入")
end if
rsBig.addnew
rsBig("BigClassName") = BigClassName
reBig.update
rsBig.close
set rsBig = nothing
end if
%>
<!--#include file = "inc/head.asp"-->
</head>
<body>
<div id="AddClass">
<h1> 添加主类</h1>
<form name="BigClass" id="BigClass" method="post" action="Class_Add.asp" >
<table>
<tr><td class="Addtitle">主类名称：</td>
<td><input type="text" name="BigClassName" id="BigClassName" class="ClassName" /></td>
</tr>
<tr><td class="Addtitle"></td>
<td><input type="submit" name="AddBigClass" id="AddBigClass" value="添 加" class="Add" /></td>
</tr>
</table>
</form>
</body>
</html>
...全文
请发表友善的回复…
发表回复
xiaohu0515 2010-07-18
- 打赏
- 举报
request.Form("BigClassName") = BigClassName
此时BigClassName是空值。我可没这么赋值过。应当是反过来吧？
BigClassName=request.Form("BigClassName")
此时BigClassName是空值。我可没这么赋值过。应当是反过来吧？
BigClassName=request.Form("BigClassName")
ChinaXtHuLang 2010-07-18
- 打赏
- 举报
[Quote=引用 5 楼 xiaohu0515 的回复:]
request.Form("BigClassName") = BigClassName
此时BigClassName是空值。我可没这么赋值过。应当是反过来吧？
BigClassName=request.Form("BigClassName")
[/Quote]
YES
request.Form("BigClassName") = BigClassName
此时BigClassName是空值。我可没这么赋值过。应当是反过来吧？
BigClassName=request.Form("BigClassName")
[/Quote]
YES
myth_sunny 2010-07-17
- 打赏
- 举报
提示错误在13行。
2321zhf 2010-07-17
- 打赏
- 举报
request.Form("BigClassName") = BigClassName
jackey07 2010-07-17
- 打赏
- 举报
有点无语
sy_binbin 2010-07-17
- 打赏
- 举报
if request.form("AddBigClass") = "添 加" then
BigClassName = request.Form("BigClassName")
BigClassName = request.Form("BigClassName")
