晕了~晕了~~大家来看看这个ASP怎么来写

piaoyi_online 2009-12-17 10:09:51
要测试功能:
提交后的新价格比数据库里的价格高的话,就用新价格来替换~

今天写下面的程序竟然不行~ - -
(这两个价格进行判断的时候竟然一样,也就是说先用提交的价格替换了数据库的价格后,再对这两个价格进行判断)
55555555555555555555555555555555555555555555555555555555

<!--#include file="conn.asp"-->
<%
NewPrice=cint(request.Form("price"))+cint(request.Form("addPrice"))

sql="select * from I_Chemo where carID='Focus'"
rs.open sql,conn,1,1
P_Price=rs("price")
CarID=rs("carID")
response.Write(rs("price"))
RS.CLOSE
set rs=nothing

sql="select * from I_Chemo where carID='Focus'"
rs.open sql,conn,1,3
if NewPrice>P_Price then
rs("price")=NewPrice
response.Write("ok!")
rs.update
else
response.Write("worry!")
end if
response.Write(rs("price"))
rs.close

%>
<form method="post" style="margin:0">
<input type="hidden" value="<%=CarID%>" name="carID">
<input type="hidden" value="<%=P_Price%>" name="price">
<h3>目前价格:<span class="red"><%=P_Price%>元</span></h3>
<div class="price">现加价:<select name="addPrice">
<%
for i=1 to 10
response.Write("<option value='"& i &"'>+"& i &"元</option>")
next
%>
</select></div>
<input type="image" src="images/pai.gif" onclick="submit()" />
<br />
离竞拍结束还有:<span id="ViewLeave"></span><br />
</form>
...全文
115 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
piaoyi_online 2009-12-23
  • 打赏
  • 举报
回复
最后找到是因为<input type="image" src="images/pai.gif" onclick="submit()" /> ,而造成的~~具体什么原因也不知道~

反正最后用<input type="submit" /> 然后用CSS来把按钮变成图片就好了~~

谢谢你~
yan11cn 2009-12-17
  • 打赏
  • 举报
回复
最好再把P_Price 和CarID声明下。。。
yan11cn 2009-12-17
  • 打赏
  • 举报
回复
<%
NewPrice=cint(request.Form("price"))+cint(request.Form("addPrice"))

sql="select * from I_Chemo where carID='Focus'"
rs.open sql,conn,1,1
P_Price=rs("price")
CarID=rs("carID")
response.Write(rs("price"))
RS.CLOSE
set rs=nothing

sql="select * from I_Chemo where carID='Focus'"
rs.open sql,conn,1,3
if NewPrice>P_Price then
rs("price")=NewPrice
response.Write("ok!")
rs.update
else
response.Write("worry!")
end if
response.Write(rs("price"))
rs.close

%>
替换成下面的试试看:
<%
NewPrice=cint(request.Form("price"))+cint(request.Form("addPrice"))
set rs=server.createobject("adodb.recordset")
sql="select * from I_Chemo where carID='Focus'"
rs.open sql,conn,1,3
P_Price=rs("price")
CarID=rs("carID")
'response.Write(rs("price"))
if NewPrice>P_Price then
rs("price")=NewPrice
P_Price=NewPrice
response.Write("ok!")
rs.update
else
response.Write("worry!")
end if
'response.Write(rs("price"))
rs.close
%>
【新人注意:下载后评价,CSDN会把下载分还给你!切记!不放心的请看完下面:】 ==================== 我死,声明几点: 1.我对骂人的人十分无奈也无语,素质低就不要出来丢人了; 2.资源是我觉得好才放上来跟大家分享的,简易便携,平时带到机房或者测试都很方便,这个完整纯净的版本现在网上已经不好找了,要么就是广告捆绑什么的一堆; 3.至于下载分,只要你评论了,不仅退还所有分还多送1分,CSDN的老规矩,怕什么。我也要下资源,赚点积分而已; 4.病毒的问题已经解释过很多遍了(见简介),信不信装不装凭自己判断,请少数人注意文明,低碳生活,谢谢大家; 5.没用过的可以先看评论~多翻几页,相信你会找到答案。诚请先试用后评价,祝您使用愉快,谢谢! ======================================== 关于有人说资源是“盗取来的”:哦,好吧,我被你打败了。你真的很逗,事实上你可以联系原作者,让他亲自发送到你邮箱。 我先声明这个的确不是我的程序,是网上收集来的,拿来给大家分享。CSDN上的资源很多都是转载分享的,如果还是不放心大家尽可以自己上网找,名字见标题上的几个都可以,别打错。很好的软件,很多软件站都有搜藏,但是我下过发现很多不完整或者有垃圾广告插件乱七八糟的。 关于报毒的问题:这个没有办法,因为不是正常的网站访问程序,没有安装认证的安全策略,觉得心里别扭的只能安装IIS、阿帕奇之类的大玩意了,我是不喜欢配置太麻烦才用的这个,简单无需配置。但是个人保证:安全无毒!而且无垃圾。本人已经使用三年了~杀软也就在安装时报个警,安装好再开杀软好了,就没事了。敬请放心使用! 本人一向凭着谨慎的态度上传资源,如有担心,您可以在下载先使用后再评论,出了问题再差评就是!别误导别人。 详细的介绍还看简介,祝您使用愉快,谢谢! ============================================================ 【简介】 小旋风ASP服务器,适合学习ASP的时候用。帮你构建asp网页服务器,希望能给你帮助。 因为很多人都是装的Windows XP HOME版的操作系统(囧,我的XP_Pro_SP3装IIS也出错,包括505、501错误一大堆,com密码什么的网上讲的头头是道,可是怎么试都出错,难道真是RP - -),不能装IIS(会报这样那样的错误),这个正好派上用场,做好网页后再复制到IIS服务器上就可以运行了。具体使用方法简单,里面附有说明文档! 小旋风ASPWeb2005服务器是在NETBOX核心下开发的一套简洁(只有1M多点)强大(完全支持ACCESS,SQL数据库)的ASPWEB服务器,使用这个软件的您完全可以抛弃体积庞大的WINNT,WIN2000服务器系统及漏洞百出的IIS了。现在你可以在任何一个系统上调试和发布您的ASP程序了。目前测试通过的操作系统为:Windows 98;Windows 98 SE;Windows ME;Windows NT+IE4;Windows 2000;Windows XP;Windows .NET Server。 注意:安装时有些杀毒软件会检测它有病毒,不过事实上并不是,安装的时候先把杀毒软件暂停一下,等装好后再打开。我一直用的,没有任何问题,请放心使用! ==================================================================================

28,406

社区成员

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

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