ASP的Form提交问题（请教，在线等）

Clove 2003-12-27 03:32:32
一个页面有两个form
现在要本页自己提交（自刷新）后取其中一个
form里面的hidden input的值
该用什么格式
For Example
两个form
<form name="frm_add" id="frm_add" method="post">
<form name="frm_list" id="frm_list" method="post">
要从frm_list里面取
Flag=Request.Form("frm_list").("Flag")肯定不对
格式应该是什么？
求教
...全文
396 11 打赏 收藏 转发到动态 举报
写回复
用AI写文章
11 条回复
切换为时间正序
请发表友善的回复…
发表回复
Clove 2003-12-28
  • 打赏
  • 举报
 回复
我要是能用一个form还不用一个了
问题就是其中一个写在组件里面了
传递还需要一个
黑马潇潇
我的另外一个form里面的内容不能改动
没办法

cdsun 2003-12-27
  • 打赏
  • 举报
 回复
你传递到其他页面就是了嘛

两个form弄两个页面传递就好了阿

别给自己找麻烦
moeryang 2003-12-27
  • 打赏
  • 举报
 回复
<form name="frm_add" id="frm_add" method="post">
<input type='hidden' name='Flag' id='Flag' value="">
</form>
<form name="frm_list" id="frm_list" method="post">
<input type='hidden' name='_Flag' id='Flag' value="">
</form>
现在提交以后要取出Flag
Flag=Request.Form("Flag")提示类型不匹配
应该什么格式
你可以用个脚本
frm_list._Flag=frm_add.Flag
frm_list.submit
Clove 2003-12-27
  • 打赏
  • 举报
 回复
Dim StyleID '样式单ID
DIm sSql '列表显示语句
Dim SysID '当前登陆人ID
Dim Flag '如果使用查询则取出的标记1,项目;2，任务;3，按人员--项目;4，按人员--任务
Dim TempSql '查询页传回的Sql
Dim con
Dim xEcPage
SysID=GetVar("SysID")
StyleID=GetVar("StyleID")
With Request
Flag=.Form("Flag")
TempSql=.Form("TempSql")
End With

If TempSql="" Then
sSql="SElECT a.CsysCode,a.CItemName,b.CPerName AS MasterName,a.DBeginDate AS BeginDate,a.DendDate AS EndDate,a.CbriefIntro AS Memo FROM o_Item As a LEFT JOIN b_person AS b ON a.CMasterPer=b.CperSysCode WHERE a.Bdelete='0' order by a.DBeginDate desc"
Flag=1
Else
sSql=TempSql
response.write ssql&"----"&flag
If Flag=2 Then
con = "任务名称|负责人|资源|开始日期|结束日期|内容"
ElseIf Flag=4 Then
con = "任务名称|负责人|开始日期|结束日期|内容"
ElseIf Flag=5 Then
con = "任务名称|被考核人|考核人|考核分数|考核时间"
End If
End If

Call CreateAdoConnection()
Set dbrst=dbcnn.Execute(sSql)
%>
<html>
<head>

<link rel="stylesheet" type="text/css" href="../../../css/<%=StyleId%>/list.css">
<link rel="stylesheet" type="text/css" href="../../../css/<%=StyleId%>/button.css">
<link rel="stylesheet" type="text/css" href="../../../css/XTreeTable.css">
<script language="javascript" src="../../../inc/Function/Client/FlipPage.js"></script>
<script language="javascript" src="../../../inc/Function/Client/XTreeTable3.js"></script>
<meta NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</head>
<body>

<table border="0" width="90%" align="center">
<tr align="right" id="menubar">
<td>
<label for="btn_query" accesskey="Q"><input type="Image" src="../../../images/button/btn_query.gif" name="btn_query" id="btn_query" value="查询(Q)" style="height:22" onclick="query 28,15">
<label for="btn_help" accesskey="H"><input type="Image" src="../../../images/button/btn_help.gif" name="btn_help" id="btn_help" value="帮助(H)" style="height:22" onclick="help(22)">
<label for="btn_exit" accesskey="X"><input type="Image" src="../../../images/button/btn_exit.gif" name="btn_exit" id="btn_exit" value="退出(X)" style="height:22" onclick="doExit()">
</td>
</tr>
</table>
<form name="frm_cl" id="frm_cl" method="post">
<input type='hidden' name='TempSql' id='querystr' value="">
<input type='hidden' name='Flag' id='Flag' value="">
</form>
<%
If Flag=2 Then
Set xEcPage = server.CreateObject("EcoaCreatePage.EcPage")
With xEcPage
.connectstring = Application("CnnStr")
.CreateList "000010007",ssql,"class=listtable",1,con
End With
Set xEcPage=Nothing
elseIf Flag=1 or Flag=3 Then%>
<script language="JavaScript">
//表单的Title
XTreeTable_Create("名称^40%|负责人^10%^|开始日期^10%|结束日期^10%|内容^30%");
</script>

<%while (not dbrst.eof)%>
<script language="JavaScript">

XTreeTable_InsertRow("<%=dbrst("csyscode")%>","","<%=IIf(IsNull(dbrst("CitemName")), "", Trim(dbrst("CitemName")))%>^<%=Replace(IIf(IsNull(dbrst("Memo")), "", "简介："&Trim(dbrst("Memo"))),VBNewLine,"")%>|<%=Trim(dbrst("MasterName"))%>|<%=Trim(dbrst("BeginDate"))%>|<%=Trim(dbrst("EndDate"))%>|<%=Trim(dbrst("Memo"))%>","");
</script>
<%
dbrst.movenext
wend
dbrst.close
set dbrst=nothing
ElseIf Flag=5 Then
Set xEcPage = server.CreateObject("EcoaCreatePage.EcPage")
With xEcPage
.connectstring = Application("CnnStr")
.CreateList "000010007",ssql,"class=listtable",1,con
End With
Set xEcPage=Nothing
End If
%>


</body>
</html>

其中createPage组件里面写死了包含一个Frm_list的form
在dialog里面有一个window.returnvalue 本页取回,然后自刷新提交，只能用两个不用的form
没办法
下面是包含页面的查询函数
Sub query(width,height)
Dim sqlstr,count,temp
sqlstr=""
sqlstr=trim(window.showModalDialog("query.asp",0,"dialogWidth:"& width &";dialogheight:"& height))
if len(sqlstr)<>0 then
Temp=Split(Trim(sqlstr),"/")
Flag=Temp(0)
sSql=Temp(1)
With Document
.all("Flag").value=Flag
.all("TempSql").value=sSql
.all("frm_cl").action="list.asp"
.all("frm_cl").Submit()
End With
End If
End Sub
求教，救命啊
birdtree 2003-12-27
  • 打赏
  • 举报
 回复
难道你两个FORM一起提交吗？如果这样，何必两个FORM，一个不是更好。
如果不是一起提交，用不同的变量接受不同NAME的值，不就区分开了。
Clove 2003-12-27
  • 打赏
  • 举报
 回复
很感谢你
但是不敢存储的问题
flag什么的无所谓，我就是为了说明一种情况
怎么从两个Form中区分出其中一个Form里面的hidden的input
当然是在提交以后的接收页面
birdtree 2003-12-27
  • 打赏
  • 举报
 回复
我具体也不太清楚。不过你试一下以下的方法。
1、更换变量flag,把它改成其他名字，我记得好象flag是系统自用的。（如果不是，别见小，我做PHP，对ASP不是很了解）.
2、如果是写入数据库的时候出现这样的问题，那就是你的字段属性设置的问题，把字段属性改成一致就好了。
不知道行不行。
Clove 2003-12-27
  • 打赏
  • 举报
 回复
页面里面有两个Form
<form name="frm_add" id="frm_add" method="post">
<input type='hidden' name='Flag' id='Flag' value="">
</form>
<form name="frm_list" id="frm_list" method="post">
</form>
现在提交以后要取出Flag
Flag=Request.Form("Flag")提示类型不匹配
应该什么格式
birdtree 2003-12-27
  • 打赏
  • 举报
 回复
能不能说清楚点，不太明白
Clove 2003-12-27
  • 打赏
  • 举报
 回复
有没有人来啊
Clove 2003-12-27
  • 打赏
  • 举报
 回复
有没有人来
已经加分了
网页自动提交Form表单的方法
要想使用sendcloud平台发送邮件给客户，就必须调用他们的API接口进行批量发送，那么问题来了。sendcloud提供了好几种编程语言可以调用API进行发送，有PHP、python、C#等几种，但上述语言我都不太懂，虽然代码不复杂...
ASP.NET提交表单
http://zhidao.baidu.com/question/254757134.html ...ASP.NET提交表单。...最近做ASP.NET网页，才开始学习。在提交表单的时候出了问题。很是费解，请教各位。 当我使用web控件的时候，提交表单的时候
html form多动作,ASP.net MVC 一个表单提交多个动作，多个表单提交一个动作，多个表单分别提交到不同的动作...
请教各位朋友：1、在一个视图中有一个表单。如何把这个表单提交到多个动作？(即表单同时具备有:提交到Index()和Create()动作的功能。)一个表单：@using(Html.BeginForm()){}多个动作：public ActionResult Index(){...
手动提交代替asp.net的button控件提交
这样我们可以不再给Submit()方法返回ture和false，在需要提交的时候直接写 _doPostBack('按钮id','')来把form表单手动提交，代码如下 asp,net控件部分： <asp:Button runat="server" CssClass="btn btn-...
小范笔记：ASP.NET Core API 基础知识与Axios前端提交数据
晚上回到宿舍后，对 WebApi 的知识查漏补缺，主要补充了 WebAPi 的一些方法、特性等如何与前端契合，如何利用工具测试 API 、Axios 请求接口。 本文主要写 WebApi 前端请求数据到 API 、后端返回处理结果，不涉及...
ASP

28,406

社区成员

356,946

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章