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

📄 xx.asp

📁 这是书上的代码
💻 ASP
字号:
🔍 
<%@ LANGUAGE="VBSCRIPT"%>
<html>
<head>
<title>企业供需信息查询</title>
<meta content="text/html; charset=gb2312" http-equiv="Content-Type">
<meta content="Microsoft FrontPage 4.0" name="GENERATOR">
</head>
<script language="javascript">
function mOvr(src,clrOver) { if (!src.contains(event.fromElement)) { src.style.cursor = 'hand'; src.bgColor = clrOver; }}
function mOut(src,clrIn) { if (!src.contains(event.toElement)) { src.style.cursor = 'default'; src.bgColor = clrIn; }} 
</script>
<body bgcolor="#FFFFFF">
<div align="center"><%
' Get request value
valgxbh = request.QueryString("gxbh")
snian=year(date())
syue=month(date())
sri=day(date())
if len(syue)=1 then
syue= "0" & syue
end if
if len(sri)=1 then
sri= "0" & sri
end if
valfbrq=snian & "-" & syue & "-" & sri 
val_snian=request("snian1")
val_syue=request("syue1")
val_sri=request("sri1")
valjzrq=val_snian & "-" & val_syue & "-" & val_sri 
 ' Define SQL string
Set lrs = Server.CreateObject("ADODB.Recordset")
sqlstr = "select username, gxbh,fbrq,jzrq,gq,dwmc,spmc,ggxh,jndw,shuliang,jiage,cd,bz,jhdd,jhfs,hy,xqh,lxr,lxdh,fax,wz,email,bzsm from gqk where (gxbh="&valgxbh&")"
lrs.Open sqlstr, "DSN=js_dsn; UID=sa; PWD=; DATABASE=js"
 'response.write sqlstr
%>
<div align="center"><center>
<table border="0" cellPadding="0" cellSpacing="0" height width="98%">
  <tr>
    <td vAlign="top" width="78%">
      <div align="center"><center><table
      height width="654">
        <tr>
          <td><%
      ' Display count in a table 
               count=0
             Do While Not lrs.EOF 
                   count=count+1
                  lrs.MoveNext
              Loop
             If count=0 then %>
<div align="center"><center><p><font color="Blue" size="4"><strong>　</strong></font></p>
          </center></div><div align="center"><center><p><font color="Blue" size="4"><strong>对不起，没有找到相应的信息</strong></font> 
<% Else %>
<%lrs.MoveFirst
     ' Display data in a table 
          Do While Not lrs.EOF %>          <br>
           </td>
        </tr>
      </table>
      </center></div><div align="center"><center><table width="456" bgcolor="#d4d4d4" border="1"
      cellspacing="0" cellpadding="0" bordercolorlight="#ffffff" bordercolordark="#ffffff">
        <tr>
          <td bgColor="#5294E7" colSpan="2" height="34" width="95%" align="center"><div
          align="center"><center><p><big><font color="#ffffff" face="隶书">供需信息查询</font></big></td>
        </tr>
         <tr align="middle">
              <td width="166" height="24" align="left"><font size="2"><span class="small13">用户名</span></font></td>
              <td width="303" height="24" align="left"><span class="small13"><font size="2"><%=Trim(lrs(0))%></font>
              <font color="#000000" size="2"></font></span></td>
        </tr> 
        <tr align="middle">
              <td width="166" height="12" align="left"><font size="2"><span class="small13">供需编号</span></font></td>
              <td width="303" height="12" align="left"><font size="2"><span class="small13"><%=Trim(lrs(1))%></font> 
              <font color="#000000"></font></span></td>
            </tr>      
          <tr align="middle">
              <td width="166" height="12" align="left"><font size="2"><span class="small13">发布日期</span></font></td>
              <td align="left" height="26" width="190"><font size="2"><% = valfbrq %></td>
              </tr>
            <tr align="middle">
              <td width="166" height="12" align="left"><font size="2"><span class="small13">截止日期</span></font></td>
              <td align="left" height="26" width="190"><font class="formstyle" size="2"> <%=Trim(lrs(3))%>
             </font><font size="2" color="#000000"></font></td>
            </tr>
            <tr align="middle">
              <td width="166" height="24" align="left"><font size="2"><span class="small13">供/需方</span></font></td>
              <td width="303" height="24" align="left"><font color="#000000" size="2"><%=Trim(lrs(4))%></font></span></td>
            </tr>
            <tr align="middle">
              <td width="166" height="24" align="left"><font size="2"><span class="small13">单位名称</span></font></td>
              <td width="303" height="24" align="left"><font size="2"><span class="small13"><%=Trim(lrs(5))%></span></font></td>
            </tr>
             <tr align="middle">
              <td width="166" height="12" align="left"><font size="2"><span class="small13">商品名称</span></font></td>
              <td width="303" height="12" align="left"><span class="small13"><font size="2"><%=Trim(lrs(6))%></font>
              <font color="#000000" size="2"></font></span></td>
            </tr>
            <tr align="middle">
              <td width="166" height="12" align="left"><font size="2"><span class="small13">规格型号</span></font></td>
              <td width="303" height="12" align="left"><font size="2"><span class="small13"><%=Trim(lrs(7))%></span>
              </font></td>
            </tr>
            <tr align="middle">
              <td width="166" height="24" align="left"><font size="2"><span class="small13">计量单位</span></font></td>
              <td width="303" height="24" align="left"><font size="2"><span class="small13"><%=Trim(lrs(8))%></span></font></td>
            </tr>
            <tr align="middle">
              <td width="166" height="12" align="left"><font size="2"><span class="small13">数量</span></font></td>
              <td width="303" height="12" align="left"><font size="2"><span class="small13"><%=Trim(lrs(9))%>
              </span></font></td>
            </tr>
            <tr align="middle">
              <td width="166" height="28" align="left"><font size="2"><span class="small13">参考单价</span></font></td>
              <td width="303" height="28" align="left"><font size="2"><span class="small13"><%=Trim(lrs(10))%>元</span>
              </font></td>
            </tr>
            <tr align="middle">
              <td width="166" height="24" align="left"><font size="2"><span class="small13">产地</span></font></td>
              <td width="303" height="24" align="left"><span class="small13"><font size="2"><%=Trim(lrs(11))%></font>
              <font color="#000000" size="2"></font></span></td>
            </tr>
             <tr align="middle">
              <td width="166" height="12" align="left"><font size="2"><span class="small13">包装</span></font></td>
              <td width="303" height="12" align="left"><font size="2"><span class="small13"><%=Trim(lrs(12))%></span>
              </font></td>
            </tr>
            <tr align="middle">
              <td width="166" height="24" align="left"><font size="2"><span class="small13">交货地点</span></font></td>
              <td width="303" height="24" align="left"><font size="2"><span class="small13"><%=Trim(lrs(13))%>
              </span></font></td>
            </tr>
            <tr align="middle">
              <td width="166" height="24" align="left"><font size="2"><span class="small13">交货方式</span></font></td>
              <td width="303" height="24" align="left"><font size="2"><span class="small13"><%=Trim(lrs(14))%>
              </span></font></td>
            </tr>
            <tr align="middle">
              <td width="166" height="24" align="left"><font size="2"><span class="small13">归口行业</span></font></td>
              <td width="303" height="23" align="left"><font size="2"><span class="small13">
                <%=Trim(lrs(15))%></span></font></td>
            </tr>
            <tr align="middle">
              <td width="166" height="12" align="left"><font size="2"><span class="small13">现/期货</span></font></td>
              <td width="303" height="12" align="left"><font size="2"><span class="small13"><%=Trim(lrs(16))%></font></span></td>
            </tr>
            </tr>
            <tr align="middle">
              <td width="166" height="28" align="left"><font size="2"><span class="small13">联系人</span></font></td>
              <td width="303" height="28" align="left"><font size="2"><span class="small13"><%=Trim(lrs(17))%></font>
              <font color="#000000" size="2"></font></span></td>
            <tr align="middle">
              <td width="166" height="24" align="left"><font size="2"><span class="small13">联系电话</span></font></td>
              <td width="303" height="24" align="left"><span class="small13"><font size="2"><%=Trim(lrs(18))%></font>
              <font color="#000000" size="2"></font></span></td>
            </tr>
            <tr align="middle">
              <td width="166" height="24" align="left"><font size="2"><span class="small13">传真号码</span></font></td>
              <td width="303" height="24" align="left"><font size="2"><span class="small13"><%=Trim(lrs(19))%>
              </span></font></td>
            </tr>
            <tr align="middle">
              <td width="166" height="24" align="left"><font size="2"><span class="small13">网址</span></font></td>
              <td width="303" height="24" align="left"><font size="2"><span class="small13"><%if lrs(20)<>"" then%>               
              <big><a href="http://<%=Trim(lrs(20))%>" target="_blank"> <%=Trim(lrs(20))%></a></big>
                    <% end if%></span></font></td>
            </tr>
            <tr align="middle">
              <td width="166" height="24" align="left"><font size="2"><span class="small13">E-MAIL</span></font></td>
              <td width="303" height="24" align="left"><span class="small13"><font size="2"><%if lrs(21)<>"" then%> 
              <big><a href="mailto:<%=Trim(lrs(21))%>" target="_blank"> <%=Trim(lrs(21))%></a></big>
                    <% end if%><BR></td>
            </tr>
            <tr align="middle">
              <td width="166" height="46" align="left" valign="top"><font size="2"><span class="small13">备注说明</span></font><p>　</p></td>
              <td width="303" height="54" align="left"><span class="small13"><font size="2"><%=Trim(lrs(22))%></font><font color="#000000" size="2"></font></span></td>
            </tr>
           </table>
          </center></div>
    </form>
    </td>
  </tr>
</TBODY>
</table>
</center></div>
<%lrs.MoveNext
              Loop%>
<%End If%>
<hr align="center" color="#d6eefa" noShade SIZE="1">
<div align="center"></div>
</body>
</html>

⌨️ 快捷键说明

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