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

📄 listshj.asp

📁 采用asp+fso技术 傻瓜式的程序安装和调试 用户无需考虑系统的安装维护 美观、友好的展示铺面 设计中应用了多种网络安全技术 顾客可以方便的查询并订购商品 用户可以方便的定义各种商品信息
💻 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><!--
body,td,th {
	color: #000000;
}
body {
	background-color: #C7D4F7;
}
--></style></head>
<body>
<%dim shjiaid
	shjiaid=request.querystring("id")
if shjiaid<>"" then
if not isnumeric(shjiaid) then 
response.write"<script>alert(""非法访问!"");location.href=""../index.asp"";</script>"
response.end
end if
end if
	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 class="tableBorder" width="90%" border="0" align="center" cellpadding="3" cellspacing="1" bgcolor="#FFFFFF">
<form name="userinfo" method="post" action="saveshjiainfo.asp?id=<%=rs("shjiaid")%>">
<tr> 
<td colspan="2" align="center" background="../images/admin_bg_1.gif"><b><font color="#ffffff">商家详细资料</font></b></td>
</tr>
<tr> 
<td width="30%"  align="right">商店名称:</td>
<td width="70%"  style="PADDING-LEFT: 10px">
<font color=red><%=trim(rs("name"))%></font>
<!--<input name="name" type="text" id="name" size="30" maxlength="40" value="<%=trim(rs("name"))%>">-->
</td>
</tr>
<tr> 
<td  align="right">管理员ID:</td>
<td  style="PADDING-LEFT: 10px">
<font color=red><%=trim(rs("username"))%></font>
<!--<input name="username" type="text" id="username" size="30" maxlength="40" value="<%=trim(rs("username"))%>">-->
</td>
</tr>
<tr> 
<td  align="right">管理员密码:</td>
<td  style="PADDING-LEFT: 10px"> 
<input name="password" type="password" id="password" size="30" maxlength="30">
<font color="#FF0000">不修改为空</font></td>
</tr>
<tr> 
<td  align="right">负责人姓名:</td>
<td  style="PADDING-LEFT: 10px"> 
<input name="name2" type="text" id="name" size="30" maxlength="40" value="<%=trim(rs("name2"))%>">
<font color="#FF0000">**</font></td>
</tr>
<tr>
<td  align="right">电子邮件:</td>
<td  style="PADDING-LEFT: 10px"> 
<input name=useremail type="text" id="useremail" size="30" maxlength="40" value="<%=trim(rs("useremail"))%>">
<font color="#FF0000">**</font></td>
</tr>
<tr> 
<td  align="right">详细地址:</td>
<td  style="PADDING-LEFT: 10px"> 
<input name=dz type=text size="40" maxlength="40" value="<%=trim(rs("dz"))%>">
<font color="#FF0000">**</font></td>
</tr>
<tr> 
<td  align="right">联系电话:</td>
<td  style="PADDING-LEFT: 10px"> 
<input name=tel type=text  value="<%=trim(rs("tel"))%>" size="12">
<font color="#FF0000">**</font></td>
</tr>
<tr> 
<td  align="right">邮政编码:</td>
<td  style="PADDING-LEFT: 10px"> 
<input name=pc type=text  value="<%=trim(rs("pc"))%>" ONKEYPRESS="event.returnValue=IsDigit();" size="12">
<font color="#FF0000">**</font></td>
</tr>
<tr> 
<td  align="right">QQ号码:</td>
<td  style="PADDING-LEFT: 10px"> 
<input name=QQ type=text  value="<%=trim(rs("oicq"))%>" size="12" maxlength="12">
<font color="#FF0000">**</font></td>
</tr>
<tr> 
<td  align="right">商家二级域名:</td>
<td  style="PADDING-LEFT: 10px">HTTP://
<input name=url type=text id=url value="<%=trim(rs("url"))%>" size="33">
</td>
</tr>
<tr> 
<td  align="right">商家LOGO地址:</td>
<td  style="PADDING-LEFT: 10px"> 
<input name=logo type=text id=logo value="<%=trim(rs("logo"))%>" size="40"><br>
<input type="button" name="Submit" value="上传LOGO图片" onClick="window.open('../BOBupload.asp?formname=userinfo&editname=logo&uppath=bookpic&filelx=jpg','','status=no,scrollbars=no,top=20,left=110,width=420,height=165')">
<font color="#FF0000">固定 150×60 像素</font></td>
</tr>
<tr> 
<td  align="right">公司简介:</td>
<td  style="PADDING-LEFT: 10px"> 
<textarea name="content" rows="6" cols="40"><%=trim(rs("content"))%></textarea>
</td>
</tr>
<tr> 
<td  align="right">现有订单数:</td>
<td  style="PADDING-LEFT: 10px"> 
			<%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="30"></td>
<td > 
<input type="submit" name="Submit" value="确认提交">&nbsp;
<input type="button" name="Submit2" value="返回上一页" onClick='javascript:history.go(-1)'>
</td>
</tr>
</form>
</table>    
<!--#include file="copyright.asp"-->
</body>
</html>

⌨️ 快捷键说明

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