asp兼容性问题

maranad 2008-12-05 10:50:43
<%
dim saleid
if Request("sid")<>"" then
saleid=Request("sid")
end if

dim rs,sql
set rs=server.CreateObject("adodb.recordset")
sql = "select * from oper"
rs.open sql,conn,1,3
rs.addnew
rs("saleid") = saleid
rs("opershren") = request.form("shren")
rs("opertel") = request.form("tel")
rs("opermobile") = request.form("mobile")
rs("operadd") = request.form("add")
rs("operdet") = request.form("det")
rs("operzt") = 1
rs.update
operid = rs("operid")
rs.close
set rs=nothing

dim prors,prosql
set prors=server.createobject("adodb.recordset")
prosql="update oform set operid='"& operid &"',oformzt=true where oformzt=false"
prors.open prosql,conn,1,3


Response.redirect "pro_operpostok.asp?operid="&operid&""

%>


在ie7顺利执行,ie6用了很长时间,是哪里有问题吗?
...全文
33 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
草原可可 2008-12-05
没找到错误啊
难道form提交处理不一样
再用其他浏览器测试下呢
回复
virgo2008 2008-12-05
貌似没有错误!
回复
maranad 2008-12-05
<form id="form" name="form" method="post" action="pro_tooperok.asp">
<input name="shren" type="text" id="shren" size="12" maxlength="10" />
<input name="tel" type="text" id="tel" size="18" />
<input name="mobile" type="text" id="mobile" size="18" />
<input name="add" type="text" id="add" size="102" maxlength="100" />
<textarea name="det" id="det"></textarea>
<input name="operprice" type="hidden" value="<%= price %>" /><input name="Submit" type="submit" value=" 确认 "/>

这是form
回复
lobster_lshj 2008-12-05
貌似没问题,只是有些地方优化一下更好

sql = "select * from oper"
rs.open sql,conn,1,3

这里这句sql
sql = "select * from oper where 1=2"
这样会更快一点,因为你没有查询条件的时候会返回所有记录回来,但我们要进行的是一条插入操作,所以不需要返回结果集,于是加上1=2的条件返回0结果集这样速度快一些

set prors=server.createobject("adodb.recordset")
prosql="update oform set operid='"& operid &"',oformzt=true where oformzt=false"
prors.open prosql,conn,1,3

这句
update语句不需用返回结果集,用conn.execute就可以了
conn.execute prosql
回复
相关推荐
发帖
ASP
创建于2007-09-28

2.8w+

社区成员

ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
申请成为版主
帖子事件
创建了帖子
2008-12-05 10:50
社区公告
暂无公告