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

📄 checkgysindex.asp

📁 企业进销存管理系统 企业级别的进销存管理系统
💻 ASP
字号:
<%
path=request.servervariables("path_info")
set conn=server.createobject("adodb.connection")
set rs=server.createobject("adodb.recordset")
conn.open application("dsn")
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>显示供应商查询信息</title>
<link href="../style.css" rel="stylesheet" type="text/css">
</head>
<body> 
<%
if request("tptsel")<>"" then 
tj=request("tptsel")
lname=request("qname")
jname=request("sel")
session("tj")=tj
session("lname")=lname
session("jname")=jname
end if
%> 
<%'查询
   if session("tj")="=" then
sql="select * from tab_gysinfo where "&session("jname")&"='"&session("lname")&"'"
end if
   if session("tj")="like" then
sql="select * from tab_gysinfo where "&session("jname")&" like '%"&session("lname")&"%'"
end if
    if session("tj")="all" then 
 sql="select * from tab_gysinfo"
end if 
rs.open sql,conn,1,3
if rs.eof then%> 
<script language="javascript">
alert("您输入的供应商不存在!请用like查询!")
history.back(1)
</script> 
<%response.end() 
end if %> 
<%'分页
rs.pagesize=3
page=clng(request("page"))
if page<1 then	page=1
if page>rs.pagecount then page=rs.pagecount
	rs.absolutepage=page
for i=1 to rs.pagesize%> 
<table width="590" height="58" border=1 align="center" cellpadding=-1 cellspacing=0 bordercolor=#ffffff 
                  bordercolorlight=#0099ff bordercolordark=#ffffff> 
  <tr bgcolor="#dddddd"> 
    <td colspan="2" bgcolor="#D9ECFF"><font color="#336699">供应商全称: <%=rs("name")%> </font></td> 
    <td bgcolor="#D9ECFF" width="185"><font color="#336699">简称: <%=rs("jc")%> </font></td> 
  </tr> 
  <tr bgcolor="#dddddd"> 
    <td width="208" bgcolor="#D9ECFF" height="14"><font color="#336699">地址: <%=rs("address")%> </font></td> 
    <td width="189" bgcolor="#D9ECFF" height="14"><font color="#336699">邮政编码: <%=rs("bianma")%> </font></td> 
    <td bgcolor="#D9ECFF" width="185" height="14"><font color="#336699">电话: <%=rs("tel")%> </font></td> 
  </tr> 
  <tr bgcolor="#dddddd"> 
    <td width="208" bgcolor="#D9ECFF"><font color="#336699">传真: <%=rs("fax")%> </font></td> 
    <td width="189" bgcolor="#D9ECFF"><font color="#336699">联系人: <%=rs("lian") %> </font></td> 
    <td bgcolor="#D9ECFF" width="185"><font color="#336699">联系人电话: <%=rs("ltel")%> </font></td> 
  </tr> 
  <tr bgcolor="#dddddd"> 
    <td bgcolor="#D9ECFF" colspan="2"><font color="#336699">E-Mail: <%=rs("mail")%> </font></td> 
    <td bgcolor="#D9ECFF" width="185"><font color="#336699">开户银行: <%=rs("yh")%> </font></td> 
  </tr> 
</table> 
<br> 
<%rs.movenext
if rs.eof then exit for
next
%> 
<p align="center">  
<form action="checkgysindex.asp" method="get"> 
  <div align="center"> 
    <% if page<>1 then%> 
    <font size="2"> <a href=<%=path%>?page=1>第一页</a> </font><a href=<%=path%>?page=<%=(page-1)%> >上一页</a> 
    <%end if 
if page<>rs.pagecount then%> 
    <a href=<%=path%>?page=<%=(page+1)%>>下一页</a> <a href=<%=path%>?page=<%=rs.pagecount%>>最后一页</a> 
    <%end if%> 
    <font color="#336699">输入页次
    <input type="text" name="page" size="3"> 
    页次 </font><font color=red><%=page%>/<%=rs.pagecount%></font> [ <a href="gysindex.asp">返回</a> ]</div> 
</form> 
</body>
</html>

⌨️ 快捷键说明

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