📄 saveregshop.asp
字号:
<!-- #include file="inc/char.asp" -->
<!-- #include file="conn.asp" -->
<!-- #include file="inc/adovbs.inc" -->
<!-- #include file="chksession.asp" -->
<!-- #include file="head2.asp" -->
<html>
<head>
<TITLE><%=webname%>--会员管理中心---联系QQ:6439358，联系邮箱vqqq59r@163.com，网站www.vqqq.com，谢谢大家对我们系统的支持</title>
<META http-equiv=Content-Type content="text/html; charset="<%=charset%>">
<META name="keywords" content="<%=keywords%>">
<META name="description" content="<%=description%>">
<link href="images/main_style.css" rel="stylesheet" type="text/css">
</HEAD>
<BODY bgColor=#ffffff leftMargin=0 onmouseover=exitpop=false text=#000000 topMargin=0 marginheight="0" marginwidth="0">
<%
response.buffer=true
dim user
user=session("user")
call chk2(rst("shopname"))
call chk2(rst("shopinfo"))
ukey=user
keytype="uname"
%>
<!--#include file="inc/calluser.asp"-->
<%
sql="select * from shops where shopownerid="&rs_user("regid")
set rs_s=server.createobject("adodb.recordset")
rs_s.open sql,conn,1,3
if rs_s.eof then
rs_s.addnew
rs_s("shopownerid")=rs_user("regid")
rs_s("shopname")=trim(rst("shopname"))
rs_s("shopinfo")=trim(replace(rst("shopinfo")," ",""))
rs_s("shopregtime")=now()
if shopstatus=1 then
rs_s("shopclosetime")=DateAdd("yyyy",1,now())
end if
rs_s("shopflag")=shopstatus
rs_s.update
else
response.write"<script language=javascript>alert('对不起，你已经在本站申请过店铺了,请到我的vqqq拍卖物品－－》店铺管理项查询');top.location.href='vqqqhome.asp';</script>"
response.end
end if
sql="select * from users where regUsername='"&user&"'"
set rs=conn.execute(sql)
%>
<%
if shopstatus="0" then
response.write"<script language=javascript>alert('免费店铺开通成功，本站现开通收费店铺功能，欢迎你的加入！');top.location.href='vqqqhome.asp';</script>"
else
response.write"<script language=javascript>alert('恭喜你，你的店铺正式开通了，你将免费享受我们收费店铺的所有服务！');top.location.href='vqqqhome.asp';</script>"
end if
%>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="760" align=center>
<TBODY>
<TR>
<TD align=left vAlign=top width=150>
<!--#include file="vqqqleft.asp" -->
</TD>
<TD width=5> </TD>
<TD align=left vAlign=top>
<TABLE align=top border=0 cellPadding=4 cellSpacing=0 width="100%">
<TBODY>
<TR height=20>
<TD width=256><FONT id=b2>欢迎您，<%=rs("reguserName")%></FONT> <a href=usercredit.asp?vqqqid=<%=rs("regusername")%> target=_blank>查看信用详情</a></TD>
<TD>注册邮箱：<%=rs("regEmail")%></TD></TR></TBODY></TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 id=lg101 width="100%">
<TBODY>
<TR id=bg02>
<TD height=5 width=12></TD>
<TD></TD>
<TD width=12></TD></TR>
<TR id=bg02>
<TD width=12></TD>
<TD height=30 id=b1 align=center><b><font class=fred><br>恭喜你！你的店铺已经申请成功！请查看左边的店铺管理，管理好你的店铺哦！</font></b>
<br><br> 欢迎您光临<B><%=webname%>管理中心</B>，希望您的耕耘能给您丰厚的回报！
</td></tr>
<tr id=bg02><td align=left colspan=2>
<br><br> <b>店铺主要功能使用说明：</b>
<br><br> 1， 你可以为店铺取个你喜欢的名字，再配上酷酷的店铺介绍信息。让你免费拥有一张个人主页！
<br><br> 2， 你可以为你的店铺发布新闻，招揽顾客！
<br><br> 3， 你可以用你的店铺跟好友交换友情链接！
<br><br> 4， 除这些之外，当然最重要还是，你可以自由推荐6件自己的商品，给你的一个展示特色的平台！
<br><br> 5， 另外，店铺还设置允许用户添加设置广告，让你在销售商品的同时，还可以有意外的收获。
<br><br> 6， 免费店铺有系统广告，收费店铺将没有此限制！
<br><br>
您在使用过程中有任何问题可向管理员来信：<a href=mailto:<%=email%>><%=email%></a>
</TD>
<TD width=12> </TD></TR>
<TR id=bg02>
<TD height=5 width=12></TD>
<TD></TD>
<TD width=12></TD></TR></TBODY></TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
<TBODY>
<TR id=bg02>
<TD height=20 width=99> </TD>
<TD width=26> </TD>
<TD>
</TD>
</TR></TBODY>
</TABLE><BR>
</TD></TR>
</TBODY></TABLE><BR>
</body></html>
<!-- #include file="bottom.asp" -->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -