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

📄 temporary.asp

📁 一个公司营销系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="connn.asp"-->
<%
temuser=request("user")
dim rs,sql
set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from user where username ='"&temuser&"'"
rs.open sql,conn,3,2
if  rs.eof and rs.bof then

   response.write "<script language='javascript'>"
   response.write "alert('该用户不存在,请检查输入是否正确!');"
   response.write "</script>" 
   response.redirect"index.asp?user="&webname&""       
   response.end
else if rs("key1")=1 and rs("key2")=1 and rs("key3")=1 and rs("key4")=1 and rs("key5")=1 then
  response.redirect"index.asp?user="&temuser&""
  response.end 
end if
end if
  set rs1=server.createobject("adodb.recordset")
  sql1="select * from down where user_xx = '"&temuser&"'and down1=1 "
  rs1.open sql1,conn,3,2
  if rs1.eof and rs1.bof then
  user1="#"
  else
  user1=rs1(1)
  end if
  set rs2=server.createobject("adodb.recordset")
  sql2="select * from down where user_xx = '"&temuser&"'and down2=1 "
  rs2.open sql2,conn,3,2
  if rs2.eof and rs2.bof then
  user2="#"
  else
  user2=rs2(1)
  end if
  set rs3=server.createobject("adodb.recordset")  
  sql3="select * from down where user_xx = '"&temuser&"'and down3=1 "
  rs3.open sql3,conn,3,2
  if rs3.eof and rs3.bof then
  user3="#"
  else
  user3=rs3(1)
  end if 
  set rs4=server.createobject("adodb.recordset")  
  sql4="select * from down where user_xx = '"&temuser&"'and down4=1 "
  rs4.open sql4,conn,3,2
  if rs4.eof and rs4.bof then
  user4="#"
  else
  user4=rs4(1)
  end if   
%>
<html>
<head>
<title><%=homename%></title>
<Script Language=javascript> 
function Click(){ 
window.event.returnValue=false; 
} 
document.oncontextmenu=Click; 
</Script>
<script Language="JavaScript">
var messeage="欢迎光临伴江行销售网络!!!==会员代理,电子邮件地址,营销软件,MLM制作与销售,网页制作……";
var seq=0;
function Move(){
textlen=messeage.length;
window.status=messeage.substring(0,seq+1);
seq++;
if (seq>=textlen)
seq=0;
window.setTimeout("Move();",250);}
Move();
</script>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content=chenag name=Author>
<META http-equiv=Page-Enter content=blendTrans(Duration=1.0)>
<META content= name=Keywords>
<STYLE type=text/css>BODY {
	MARGIN-TOP: 0px; FONT-SIZE: 12px; MARGIN-LEFT: 0px; MARGIN-RIGHT: 0px
}
TABLE {
	FONT-SIZE: 12px; COLOR: #484848; LINE-HEIGHT: 150%
}
A {
	COLOR: #484848
}
A:hover {
	COLOR: #990000; TEXT-DECORATION: underline
}
.border {
	border: 1px solid #669933;
}
</STYLE>
<META content="MSHTML 5.50.4134.100" name=GENERATOR>
<link href="css.css" rel="stylesheet" type="text/css">
</head>

<body bgcolor="#FFFFFF" text="#000000">
<br>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 height=13 width=843>
  <TR> 
    <TD height="39" valign="middle" bgcolor="#33CCFF" align="center"> <font color="#000000"> 
      <font color="#CC33CC" size="3"><b><font size="2"><%=temuser%>的临时商务主页</font></b></font></font></TD>
  </TR>
  <TR> 
    <TD height="14" valign="middle">
      <div align="center"><font color="#000000"><font color="blue" size="3"><%=homepage%>?user=<%=temuser%></font></font><font color="#CC0000" size="3"></font><font color="#CC0000"><br>
        </font> <font color="#CC0000"><b><font color="#0000FF">祝贺你注册成功!</font></b></font> 
      </div>
      <p align="center"><font color="#CC33CC">你已经拥有了一个临时商务信息网页。</font></p>
      <p align="center"><font color="#CC33CC">请你按照下面银行帐号汇款(如需邮局汇款或信封夹带,请用QQ或Email索取详细地址信息)</font><font color="#0000FF">(强烈要求汇款的时候在汇款金额后面加上一个尾数,比如10.13元、15.42元、20.11元等,总之越特殊越好,以便收款人能准确确认后迅速给你激活)</font><font color="#CC33CC">然后立即给以下收款人发信确认,确认的时候一定要把你的</font><font color="#0000FF"><b><font color="#000000">汇款金额</font></b><font color="#000000">、<b>真实姓名</b>、<b>汇款时间</b>、<b>注册用户名</b></font></font><font color="#CC33CC">等详细资料告诉你的上级会员!一般情况下一至两个工作日内你将拥有一套和我们一样的个性化的商务信息网站。你就可以正式开始宣传你的网站赚取丰厚回报!</font><font color="#FF0000"><br>
        <b><font color="#CC6600">[再次强调:汇款金额请加尾数,汇款确认信息要详细,否则上级会员难以确认而出现长时间没有激活的现象]</font></b></font><font color="#CC33CC"><br>
        汇款后请通知你的每一个上线 </font> </p>
      <div align="left"> 
        <div align="center"> 
          <table width="96%" border="1" bordercolor="#a8d3ff" align="center">
            <tr bordercolor="#CCCCCC"> 
              <td align="center" width="63" bgcolor="#FFCCCC">编号</td>
              <td align="center" width="55" bgcolor="#FFCCCC">姓名</td>
              <td align="center" width="127" bgcolor="#FFCCCC">银行帐号</td>
              <td align="center" width="118" bgcolor="#FFCCCC">开户行</td>
              <td align="center" width="146" bgcolor="#FFCCCC">EMAIL</td>
              <td align="center" width="76" bgcolor="#FFCCCC">QQ</td>
              <td align="center" width="178" bgcolor="#FFCCCC">激活状态</td>
            </tr>
            <%			
  set rs10=server.createobject("adodb.recordset")
  sql10="select * from user where username = '"&user1&"'"
  rs10.open sql10,conn,3,2
  if not rs10.eof  then
%>
            <tr> 
              <td align="center" width="63" bgcolor="#99FFCC">1、</td>
              <td align="center" width="55" bgcolor="#99FFCC"><%=rs10(3)%></td>
              <td align="center" width="127" bgcolor="#99FFCC"><%=rs10(5)%></td>
              <td align="center" width="118" bgcolor="#99FFCC"><%=rs10(4)%></td>
              <td align="center" width="146" bgcolor="#99FFCC"><%=rs10(7)%></td>
              <td align="center" width="76" bgcolor="#99FFCC"><%=rs10(9)%></td>
              <td align="center" width="178" bgcolor="#99FFCC"> 
                <% 
			  key1=rs("key1")
			  if key1=0 then%>
                未激活 
                <%else%>
                <font color="#FF0000">已激活</font> 
                <%End if%>
              </td>
            </tr>
            <tr> 
              <td align="center" width="63" bgcolor="#FFCCCC">地址:</td>
              <td align="center" colspan="4" bgcolor="#99FFCC"><%=rs10(10)%></td>
              <td align="center" width="76" bgcolor="#FFCCCC">邮编:</td>
              <td align="center" width="178" bgcolor="#99FFCC"><%=rs10(11)%></td>
            </tr>
            <%   end if
set rs11=server.createobject("adodb.recordset")
  sql11="select * from user where username = '"&user2&"'"
  rs11.open sql11,conn,3,2
  if not rs11.eof  then
%>
            <tr> 
              <td align="center" width="63" bgcolor="#CCFFCC">2、</td>
              <td align="center" width="55" bgcolor="#CCFFCC"><%=rs11(3)%></td>
              <td align="center" width="127" bgcolor="#CCFFCC"><%=rs11(5)%></td>
              <td align="center" width="118" bgcolor="#CCFFCC"><%=rs11(4)%></td>
              <td align="center" width="146" bgcolor="#CCFFCC"><%=rs11(7)%></td>
              <td align="center" width="76" bgcolor="#CCFFCC"><%=rs11(9)%></td>
              <td align="center" width="178" bgcolor="#CCFFCC"> 
                <% 
			  key2=rs("key2")
			  if key2=0 then%>
                未激活 
                <%else%>
                <font color="#FF0000">已激活</font> 
                <%End if%>
              </td>
            </tr>
            <tr> 
              <td align="center" width="63" bgcolor="#FFCCCC">地址:</td>
              <td align="center" colspan="4" bgcolor="#CCFFCC"><%=rs11(10)%></td>
              <td align="center" width="76" bgcolor="#FFCCCC">邮编:</td>
              <td align="center" width="178" bgcolor="#CCFFCC"><%=rs11(11)%></td>

⌨️ 快捷键说明

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