⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 gouwuche2.asp

📁 实现了
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>

<!--#include file="conn.asp"-->
<%
set rs1=server.CreateObject("adodb.recordset")
rs1.open"select*from hw",conn
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>商品列表</title>
<style type="text/css">
<!--
body,td,th {
	font-size: 12px;
}
a:link {
	color: #000000;
	text-decoration: none;
}
a:visited {
	text-decoration: none;
	color: #000000;
}
a:hover {
	text-decoration: none;
	color: #FF0000;
}
a:active {
	text-decoration: none;
	color: #FF0000;
}
-->
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
function ApplyXPOverStyle(obj,color,color2,addborder) { 
	 obj.style.backgroundColor = color;
	 obj.style.borderColor = color2;
    if (addborder=='true') {obj.style.borderStyle='solid';obj.style.borderWidth='1px'}
}

function ApplyXPOutStyle(obj) {
	obj.style.backgroundColor = '';
	if (navigator.appName == 'Netscape') { obj.style.borderColor = 'EBEBEB'; } else { 
	obj.style.borderColor = ''; }
	obj.style.borderStyle = '';
}

function Advance_openBrWindow(theURL,winName,features,theMode) { //v2.0
switch(theMode) {
	case 0:	window.open(theURL,winName,features);break;
	case 1: window.showModalDialog(theURL,winName,features);break;
	case 2: window.showModelessDialog(theURL,winName,features);break;
	}
}
//-->
</script>
<script id="chromeless" src="wind_chromeless_2.1.js"></script>
</head>

<body>
<form name="form1" method="post" action="">
  <div align="center">
    <table width="500" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td bgcolor="#000000"><table width="500" height="33" border="0" cellpadding="2" cellspacing="1">
            <tr align="center" bgcolor="#3366FF">
              <td colspan="5">商品列表</td>
            </tr>
            <tr align="center" bgcolor="#3366FF">
              <td>商品名称</td>
              <td>单价</td>
              <td>商品编号</td>
              <td>购买数量</td>
              <td>删除?</td>
            </tr>
            <%DO while not rs1.eof%>
            <tr bgcolor="#77BBFF"  onMouseOver="ApplyXPOverStyle(this,'#E1FDFF','','false')" onMouseOut="ApplyXPOutStyle(this)">
              <td><div align="center" ><a href="javascript:;" title="点击查看商品详细信息"  onClick="Advance_openBrWindow('wh_xx.asp?id=<%=(rs1.Fields.Item("hw_id").Value)%>','商品详细信息','width=400,height=250,left=300,top=300',0)"><%=(rs1.Fields.Item("hw_name").Value)%></a></div></td>
              <td><div align="center"><%=(rs1.Fields.Item("hw_cash").Value)%></div></td>
              <td><%=(rs1.Fields.Item("hw_id").Value)%></td>
              <td><div align="center">
                <select name="select">
                  <option value="1" selected>1</option>
                  <option value="2">2</option>
                  <option value="3">3</option>
                  <option value="4">4</option>
                  <option value="5">5</option>
                  <option value="6">6</option>
                  <option value="7">7</option>
                  <option value="8">8</option>
                  <option value="9">9</option>
                </select>
              </div></td>
              <td><div align="center"><a href="#">删除</a></div></td>
            </tr><%
		rs1.movenext
		loop
		%>
            <tr bgcolor="#77BBFF">
              <td colspan="5"><div align="right">
                <input type="submit" name="Submit" value="确定下定单">
                <input type="submit" name="Submit" value="修改">
                <input type="submit" name="Submit2" value="继续购买">
              </div></td>
            </tr>
            
        </table></td>
      </tr>
    </table>
  </div>
</form>
</body>
</html>
<%
rs1.Close()
Set rs1 = Nothing
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -