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

📄 listshj.asp

📁 商业网站开发有源代码可以运行
💻 ASP
字号:
<!--#include file="conn.asp"-->
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../images/css.css" rel="stylesheet" type="text/css">
<style>
td{font-size:9pt;line-height:120%;color:#353535} 
body{font-size:9pt;line-height:120%} 

a:link          { color: #000000; text-decoration: none }
a:visited       { color: #000000; text-decoration: none }
a:active        { color: #000000; text-decoration: none }
a:hover         { color: #336699; text-decoration: none; position: relative; right: 0px; top: 1px }
</style>
</head>
<body bgcolor="#D9E6FF">
<%dim shjiaid
		shjiaid=request.querystring("id")
		set rs=server.createobject("adodb.recordset")
		rs.open "select * from [shjia] where shjiaid="&shjiaid ,conn,1,1%>
<script language=JavaScript>
function IsDigit()
{
  return ((event.keyCode >= 48) && (event.keyCode <= 57));
}
function checkspace(checkstr) {
  var str = '';
  for(i = 0; i < checkstr.length; i++) {
    str = str + ' ';
  }
  return (str == checkstr);
}
function checkuserinfo()
{
 if(document.userinfo.useremail.value.length!=0)
  {
    if (document.userinfo.useremail.value.charAt(0)=="." ||        
         document.userinfo.useremail.value.charAt(0)=="@"||       
         document.userinfo.useremail.value.indexOf('@', 0) == -1 || 
         document.userinfo.useremail.value.indexOf('.', 0) == -1 || 
         document.userinfo.useremail.value.lastIndexOf("@")==document.userinfo.useremail.value.length-1 || 
         document.userinfo.useremail.value.lastIndexOf(".")==document.userinfo.useremail.value.length-1)
     {
      alert("Email地址格式不正确!");
      document.userinfo.useremail.focus();
      return false;
      }
   }
 else
  {
   alert("Email不能为空!");
   document.userinfo.useremail.focus();
   return false;
   }
     
  if(checkspace(document.userinfo.dz.value)) {
	document.userinfo.dz.focus();
    alert("对不起,请填写您的详细地址!");
	return false;
  }
  if(checkspace(document.userinfo.pc.value)) {
	document.userinfo.pc.focus();
    alert("对不起,请填写邮编!");
	return false;
  }
  if(document.userinfo.pc.value.length!=6) {
	document.userinfo.pc.focus();
    alert("对不起,请正确填写邮编!");
	return false;
  } 
    if(checkspace(document.userinfo.tel.value)) {
	document.userinfo.tel.focus();
    alert("对不起,请留下您的联系电话!");
	return false;
  }
}
</script>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" id="AutoNumber3" height="0" width="100%">
  <tr> 
    <td> 
       <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
           <tr> 
                <td height="22"> 
                    <div align="center"><font color="#000000">商家详细资料</font></div>
                 </td>
           </tr>
           <tr> 
               <td valign="top"> 
                  <form name="userinfo" method="post" action="../user/saveshjiainfo2.asp?id=<%=rs("shjiaid")%>">
                                <br>
                    
              <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#FFFFFF">
                <tr> 
                  <td width="20%" bgcolor="#E8F1FF" style="PADDING-LEFT: 8px">商店名称:</td>
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px"> 
                    <input name="name" type="text" id="name" size="30" maxlength="40" value="<%=trim(rs("name"))%>">
                  </td>
                </tr>
                <tr> 
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px" width="20%">负责人名称:</td>
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px"> 
                    <input name="name2" type="text" id="name" size="30" maxlength="40" value="<%=trim(rs("name2"))%>"><font color="#FF0000">**(不可为空!)</font>
                  </td>
                </tr>
                <tr> 
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px" width="20%">管理员名称:</td>
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px"> 
                    <input name="username" type="text" id="username" size="30" maxlength="40" value="<%=trim(rs("username"))%>">
                    <font color="#FF0000">**(不可更改!)</font> </td>
                </tr>
                <tr> 
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px" width="20%">电子邮件:</td>
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px"> 
                    <input name=useremail type="text" id="useremail" size="30" maxlength="40" value="<%=trim(rs("useremail"))%>">
                    <font color="#FF0000">**(不可为空!)</font></td>
                </tr>
                <tr> 
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px" width="20%">详细地址:</td>
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px"> 
                    <input name=dz type=text size="40" maxlength="40" value="<%=trim(rs("dz"))%>">
                    <font color="#FF0000">**(不可为空!)</font></td>
                </tr>
                <tr> 
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px" width="20%">联系电话:</td>
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px"> 
                    <input name=tel type=text  value="<%=trim(rs("tel"))%>" size="12">
                    <font color="#FF0000">**(不可为空!)</font></td>
                </tr>
                <tr> 
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px" width="20%">邮编:</td>
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px"> 
                    <input name=pc type=text  value="<%=trim(rs("pc"))%>" ONKEYPRESS="event.returnValue=IsDigit();" size="12">
                    <font color="#FF0000">**(不可为空!)</font></td>
                </tr>
                <tr> 
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px" width="20%">QQ:</td>
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px"> 
                    <input name=QQ type=text  value="<%=trim(rs("oicq"))%>" size="12" maxlength="12"><font color="#FF0000">**(不可为空!)</font>
                  </td>
                </tr>
                <tr> 
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px" width="20%">公司简介:</td>
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px"> 
                    <textarea name="content" rows="18" cols="40"><%=trim(rs("content"))%></textarea>
                  </td>
                </tr>
                <tr> 
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px" width="20%">现有订单数:</td>
                  <td bgcolor="#E8F1FF" style="PADDING-LEFT: 8px"> 
                    <%dim rs2
			set rs2=server.CreateObject("adodb.recordset")
			rs2.open "select distinct(dingdan) from shop_action where shjiaid="&shjiaid&" and zhuangtai<=5",conn,1,1
			response.write rs2.recordcount&"笔订单"
			rs2.close
			set rs2=nothing
			%>
                  </td>
                </tr>
                <%rs.close
			set rs=nothing
			conn.close
			set conn=nothing%>
                <tr> 
                  <td height="28" colspan="2" bgcolor="#E8F1FF"> 
                    <div align="center"> 
                      <input type="submit" name="Submit" value="确认提交">
                      &nbsp;&nbsp;&nbsp; 
                      <input type="button" name="Submit2" value="返回上一页" onClick='javascript:history.go(-1)'>
                    </div>
                  </td>
                </tr>
               </table>
             </form>
            </td>
          </tr>
        </table>
      </td>
   </tr>
</table><br>
                
<!--#include file="copyright.asp"-->

</body>
</html>

⌨️ 快捷键说明

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