为什么老是提交两次呢,烦死啦100 分

goodoycg 2005-12-02 02:30:28
<!--#INCLUDE file="data.asp" -->
<html>
<head>
<title></title>
<link href="css/style.css" rel="stylesheet" type="text/css">
</head>
<script language="Javascript" >
function PressKey()
{
if(window.event.keyCode==13)
{
document.form1.op.value='Send'
this.document.form1.submit();
// document.form1.Submit.Click();
}

}
function SetFocus()
{
document.form1.message.focus();
}

</script>

<%
on error resume next

op = request("op") ''客户的操作
if(vartype(op) < 2 or op = "")then
op="newcome"
end if
Select case op

Case "newcome"
'会议编号
Session("MeetingNo") = int(Request("MeetingNo"))
'此会议人数加1
dim MeetingManCountNewCome()
redim MeetingManCountNewCome(Application("MeetingCount") - 1)
for i = 0 to Application("MeetingCount") - 1
MeetingManCountNewCome(i) = Application("MeetingManCount")(i)
next
MeetingManCountNewCome(Session("MeetingNo") - 1) = MeetingManCountNewCome(Session("MeetingNo") - 1) + 1
Application.lock
Application("MeetingManCount") = MeetingManCountNewCome
Application.UnLock()
''进入会场提示
dim msgNewCome()
redim msgNewCome(Application("MeetingCount") - 1)
for i = 0 to Application("MeetingCount") - 1
msgNewCome(i) = Application("msg")(i)
next
msgNewCome(Session("MeetingNo") - 1 ) =cstr(time()) & "<font color=blue>" & " " & Session("Rname") & "：" & "</font>" & " " & "<font color=green>进入会场</font>" & "<br>" & msgNewCome(Session("MeetingNo") - 1 )
Application.lock
Application("msg") = msgNewCome
Application.UnLock()

Case "Send"

''会议是否结束
if(Application("MeetingStart")(Session("MeetingNo") - 1) = 0 )then
response.Redirect("welcome.asp")
end if
''发出信息
if(request("message") <> "" and vartype(request("message")) >=2)then
dim msgsend()
redim msgsend(Application("MeetingCount") - 1)
for i = 0 to Application("MeetingCount") - 1
msgsend(i) = Application("msg")(i)
next
'Application("submit")= Application("submit") + 1
msgsend(Session("MeetingNo") - 1) = cstr(time()) & "<font color=blue>" & " " & Session("Rname") & "： " & "</font>" & Server.htmlEncode(request("message")) & "<br>" & msgsend(Session("MeetingNo") - 1)
Application.lock
Application("msg")=msgsend
Application.unlock
end if



Case "Exit"
''此会议人数减1
dim MeetingManCountExit()
redim MeetingManCountExit(Application("MeetingCount") - 1)
for i = 0 to Application("MeetingCount") - 1
MeetingManCountExit(i) = Application("MeetingManCount")(i)
next
MeetingManCountExit( Session("MeetingNo") - 1 ) = MeetingManCountExit( Session("MeetingNo") - 1 ) - 1
Application.lock
Application("MeetingManCount") = MeetingManCountExit
Application.UnLock()

''退出会场提示
dim msgExit()
redim msgExit(Application("MeetingCount") - 1)
for i = 0 to Application("MeetingCount") - 1
msgExit(i) = Application("msg")(i)
next
msgExit(Session("MeetingNo") - 1) = cstr(time()) & "<font color=blue>" & " " & Session("Rname") & "：" & "</font>" & "<font color=red> 退出会场</font>" & "<br>" & msgExit(Session("MeetingNo") - 1)
Application.lock
Application("msg") = msgExit
Application.unlock

response.redirect("welcome.asp")


Case ELse

End Select
%>
<body leftmargin="0" topmargin="0" background="images/mainSkinBG.gif" OnLoad="SetFocus();">
<%''if(Application("MeetingStart") = 1) then %>
<table cellspacing="0" cellpadding="0" class=css2 width="100%" align="center" height="100%" bgcolor="#D9D491">
<form method="post" name= "form1" action="chat.asp">
<tr bgcolor="D9D491"><td align="right" valign="top" class="title" ><iframe name=chat frameborder="no" class=css0 width="100%" height="100%" src="chattext.asp"></iframe></td></tr>
<tr valign="top" bgcolor="D9D491">
<td height="25" align="left" valign="middle" > <b>我要发言</b>：
<input type="text" name="message" size="60" onkeydown="JavaScript:PressKey();">
<input type="hidden" name="op" value="" >
<input type="submit" name="Submit" value="发 言" accesskey="S" OnClick="vbscript:Document.all.form1.op.value='Send'"><font color="#FF0000">Alt+S</font>
<% if(Application("Meetinger")(Session("MeetingNo") - 1) = Session("Rname")) then %>
<input type="submit" name="Submit2" value="结束会议" class=css0 onclick="vbscript:Document.all.form1.op.value='EndMeeting'">
<%else%>
<input type="submit" name="Submit3" value="退 出" class=css0 OnClick="vbscript:Document.all.form1.op.value='Exit'">
<% end if %>
</td>
</tr>
</form>
</table>
<%'end if%>
</body>
</html>
<script language="javascript">
document.form1.op.value='';
</script>

...全文
140 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
starytx 2005-12-02
  • 打赏
  • 举报
 回复
你把提交按钮的type设为submit，不要用那个回车提交表单的函数，如果有验证表单的函数就在form中添加onsubmit="return 验证函数;"
AVAmyZ 2005-12-02
  • 打赏
  • 举报
 回复
直接在脚本里面做提交的动作得了，<input>就不要有submit的动作了。
goodoycg 2005-12-02
  • 打赏
  • 举报
 回复
我怀疑是那个提交按钮正好有焦点,我一回车触发了二个事件!
goodoycg 2005-12-02
  • 打赏
  • 举报
 回复
ybfqlyq(/*-YBFQ ResTarTing......-*\) (
问题是解决了
我好像只提交了一次啊
我在文本框中按回车时让表单提交一次啊,
另一次我又是怎样提交的呢?烦麻解释一下,我过会就结贴
masong_1978 2005-12-02
  • 打赏
  • 举报
 回复
帮你up
goodoycg 2005-12-02
  • 打赏
  • 举报
 回复
to ivee(ivee) ( )
我刚才试了下,好像还是会提交两次,真的不知道怎么搞的
ivee 2005-12-02
  • 打赏
  • 举报
 回复
<input type="submit" name="Submit" value="发 言" accesskey="S" OnClick="vbscript:Document.all.form1.op.value='Send'">

改成

<input type="button" name="Submit" value="发 言" accesskey="S" OnClick="vbscript:Document.all.form1.op.value='Send' document.all.form1.submit()">
ybfqlyq 2005-12-02
  • 打赏
  • 举报
 回复
<input type="text" name="message" size="60" onkeydown="JavaScript:PressKey();">
<input type="hidden" name="op" value="" >
<input type="submit" name="Submit" value="发 言" accesskey="S" OnClick="vbscript:Document.all.form1.op.value='Send'"><font color="#FF0000">Alt+S</font>
function PressKey()
{
if(window.event.keyCode==13)
{
document.form1.op.value='Send'
this.document.form1.submit();
// document.form1.Submit.Click();
}

}

那個函數你都已經提交啦。。你這邊又多了一個提交的動作。所以有兩個提交的動作了。
GitHub提交代码超时解决方案 | 配置SSH连接
众所周知，GitHub是我们程序员在上班或者学习的时候经常会逛的一个地方[手动狗头]，而且如果我们想参与开源项目的话，GitHub也是一个很好的平台。可问题是，提交代码到GitHub总是超时，简直烦死😭😭。有时候我们在Gitee上看到一个好的开源项目想要参加，但是别人可能只是从GitHub同步到Gitee的，Gitee上的社区完全没人交流，那这种情况下，想参与项目贡献还是得去GitHub才行😖🤐。为什么我们访问GitHub这么慢呢？
关于在Flink上多次提交任务导致OOM
最近在开发Flink任务过程当中发现了一个比较奇怪的问题，在Flink上多次提交任务后会出现一个OOM的异常，意思是Flink的内存已经满了，无法再提交新的任务。如下： 其中有这么一句： 该异常确实是多次提交任务后出现的，不禁让人怀疑： 为了验证这个怀疑，就不得不先了解Flink的类加载机制。在Flink中，有两种类加载机制：因为Flink是基于JVM的，所以先回顾下JVM的类加载机制在JVM中，一个类加载的过程大致分为加载、链接（验证、准备、解析）、初始化5个阶段。而我们通常提到类的加载，就是指利用类加
jquery easyui的datagrid在初始化的时候会请求两次URL？
　　我们项目前端用的是jquery easyui，刚开始使用datagrid加载列表初始化时总是请求两次URL，这让人非常不解，怎么总是请求两次呢？数据一多，加载速度明显变慢，通过查资料才知道原来是重复声明了datagrid导致的。 　　具体解析：html代码中利用class声明了datagrid，导致easyUI解析class代码的时候先解析class声明中的datagrid，这样组件就请求了...
「转」为什么我提交的数据分析报告总是被领导K？
咱们先来设想一个场景，一个会议室里坐满了人，正在做报告的年轻人西装笔挺，头发书的一丝不苟，PPT上列满了数据和图表，他正在论证一个什么东西。年轻人讲了很多，可是在台下听报告的一个穿着随意的大佬，有点不耐烦了：“你不用说那么多，我就问你几个问题。” 大佬问了几个问题，年轻人马上被难住，于是大佬否决了年轻人的整个方案。 我们对这个场景并不陌生，这可能是一次数据分析会，一次跟主管的建模方案汇报，或是...
解决git每次提交都需要输入密码
之前使用git的时候每次都需要输入密码，输入一次两次还好，每次都输入真的恨不得砸电脑，相信各位小伙伴都需到过和我一样的问题，今天我们就来说说这个问题： 首先，如果我们git clone的下载代码的时候是连接的https://而不是git@git (ssh)的形式，当我们操作git pull/push到远程的时候，总是提示我们输入账号和密码才能操作成功，频繁的输入账号和密码会很麻烦，也特别烦恼。 解决办法： 进入你的项目目录，输入： git config --global credential.helper
ASP

28,406

社区成员

356,946

社区内容

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

加载中

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

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

+ 用AI写文章