📄 ip.asp

📁 电子商务系统Easy_Buy是一个在线销售系统
💻 ASP
字号:
<!--#include file="0.asp"--><!--#include file="../../conn/conn.asp"-->
<% set bbsinfo = conn.execute("select * from bbs_info") %>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../../css/css.css" rel="stylesheet" type="text/css">
<STYLE>
BODY {
	SCROLLBAR-FACE-COLOR: #799ae1;
	SCROLLBAR-HIGHLIGHT-COLOR: #799ae1;
	SCROLLBAR-SHADOW-COLOR: #799ae1;
	SCROLLBAR-3DLIGHT-COLOR: #799ae1;
	SCROLLBAR-ARROW-COLOR: #fcfcfc;
	SCROLLBAR-TRACK-COLOR: #aabfec;
	SCROLLBAR-DARKSHADOW-COLOR: #799ae1;
	SCROLLBAR-BASE-COLOR: #799ae1;
	background-color: #CAD7F7;
}
.STYLE3 {
	color: #FFFFFF;
	font-weight: bold;
}
</STYLE>
</head>
<body>
<p align="center"><br>
</p>
<p>&nbsp;</p>
<% set bbsinfo = conn.execute("select * from bbs_info") %>
<% set rs = conn.execute("select zt from user_name where name='"&session("www.wygk.cn")&"'")
if rs("zt")="1" then %>
<table width="500" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#FF0000">
  <tr>
    <td bgcolor="#CAD7F7">提醒：<font color="#FF0000">您现在使用的是免费7天试营帐号,待上传你的认证资料,我们会正式开通你的营运帐号.</font></td>
  </tr>
</table>
<% end if
rs.close %>
<p>&nbsp;</p>
<table width="500" align="center" cellpadding="5" cellspacing="0">
  <tr> 
    <td valign="top"><p>尊敬的<%=session("www.wygk.cn") %>商户管理员：<br>
        &nbsp;&nbsp;&nbsp;&nbsp; 您好！<br>
        &nbsp;&nbsp;&nbsp;&nbsp; 欢迎使用<%=bbsinfo("mc")%>电子商务平台系统，使我们有机会为您提供真诚的服务。这是您第 
        <%'获取真实IP地址
userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
userip2 = Request.ServerVariables("REMOTE_ADDR")
if userip = ""  then
ip=userip2
else
ip=userip
end if
Set s= Server.CreateObject("abodb.recordset")
conn.execute("Update user_name set js2= js2+1,ip2='"&ip&"' where name='"&session("www.wygk.cn")&"'")
set rs = conn.execute("select js2,jishu,zt,sl from user_name where name='"&session("www.wygk.cn")&"'")
Response.Write(""&rs("js2")&"")
jishu=rs("jishu")
zt=rs("zt")
sl=rs("sl")
rs.close%>
        次登陆使用“<%=bbsinfo("mc")%>商户管理维护系统”。您的IP地址<%= Request.ServerVariables("REMOTE_ADDR")%>，所用浏览器<%=Request.ServerVariables("HTTP_USER_AGENT")%>。自您的网站申请至今，您的网站总共被流览了<%=jishu*8-1%>次。如果您想迅速的增加网站流量，欢迎申请使用<%=bbsinfo("mc")%>收费推荐广告。友情提示，如果您的<%=bbsinfo("mc")%>电子商务网站内充实图片文字齐全，很可能会获得<%=bbsinfo("mc")%>首页免费推广的机会，当然您也可以自己向我们推荐您的网站。现在还不赶快动手打造完完全全属于您自己的电子商务网站？
        <%if zt=1 and sl=12 then
Response.Write("<font color=#ff6600>另，您现在使用的是商城商盟7天全免费试营业账号，如果您想转为A型全免费正式营业账号，请您尽快向客服中心申请!</font>。")
end if%><br>
        &nbsp;&nbsp;&nbsp;&nbsp; 如果您在使用中有什么疑问，欢迎通过电话、email、留言等方式与我们联系。我们的工作人员将及时的为您提供帮助。<br>
        <br>
        &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
        &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 
        &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<%=bbsinfo("mc")%>电子商务平台·客户服务中心</p>
    </td>
  </tr>
</table>
<p align="center">&nbsp;</p>
</body>
</html>
⌨️ 快捷键说明

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