| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 775 人关注过本帖
标题:求助:求高人指点,如何取消刷新父页面时提示重试或者取消呢?
取消只看楼主 加入收藏
ASP超级菜鸟
Rank: 1
来 自:北京
等 级:新手上路
帖 子:1
专家分:0
注 册:2009-12-25
结帖率:0
收藏
已结贴  问题点数:10 回复次数:0 
求助:求高人指点,如何取消刷新父页面时提示重试或者取消呢?
代码如下
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<script LANGUAGE="Javascript">
function new_price(AS_id,AS_name,AS_GG,AS_DJ)
{
    var strConnA;
    strConnA="价格修改.asp?AS_id="+AS_id;
    var strWin = window.showModalDialog(strConnA,'','dialogWidth=300px;status=no');  //关闭时刷新
     window.location.reload();   
}
</script>

<title>产品查询系统</title>
</head>
<%
strconn = "Driver={sql server};Server=(local);Database=northwind;uid=sa;pwd=gwtt@123"    '定义数据库驱动,sql服务器,数据库名......
set conn = server.createobject("adodb.connection")    '创建Connection对象
conn.CursorLocation = 3
conn.open strconn
response.write "<b>您输入的产品为:"&request.form("nameIn")&""
    sql="select productid,productname,quantityperunit,unitprice from products where "
    if request.form("B1") = "" then
    sql = sql & " 1>1 "
    else
    sql = sql & " 1=1 "
    end if
    If request.form("nameIn")<>"" then
    sql= sql & " and productname like '%" & request.form("nameIn") & "%'"
    End If
    If request.form("unitpricedown")<>"" and request.form("unitpriceup")<>""then
    sql= sql & " and unitprice between "&request.form("unitpricedown")&" and "&request.form("unitpriceup")&" order by unitprice"
    End If
    set rs= Conn.Execute(sql)
  %>   
<form name="form1" method="post" action="产品查询系统.asp">
    <p>产品名称<input type="text" name="nameIn" size="20" value=<%=request("nameIn")%>></p>
    <p>产品单价<input type="text" name="unitpricedown" size="7" value=<%=request("unitpricedown")%>>
    至<input type="text" name="unitpriceup" size="9" value="<%=request("unitpriceup")%>"></p>
    <p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<input type="submit" value="查询" name="B1"></p>
</form>

<table border="1" width="80%">
    <tr>
        <td width="7%" align="center">编号</td>
        <td width="30%" align="center">产品名称</td>
        <td width="30%" align="center">规格</td>
        <td width="23%" align="center">单价</td>
        <td width="16%" align="center">操作</td>
        </tr>
        

        <% DO while not rs.eof %>
        <tr>
        <td><%=rs("productID")%></td>
        <td><%=rs("productname")%></td>
        <td><%=rs("quantityperunit")%></td>
        <td><%=rs("unitprice")%></td>
        <td><input type="button" value="价格修改" name="B4" onclick="new_price(<%=rs("productID")%>)"></td>
        </tr>
        <% rs.MoveNext
           Loop
    %>


</table>
<p>  &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;  </p>
<% rs.Close %>
<% conn.Close %>
</html>
搜索更多相关主题的帖子: 提示 页面 高人 
2009-12-25 13:15
快速回复:求助:求高人指点,如何取消刷新父页面时提示重试或者取消呢?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016881 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved