📄 dressshop.asp

📁 宁波娱乐在线城市,丰富的内容版块

💻 ASP

字号:

<script language="JavaScript">
window.resizeTo(screen.availWidth,screen.availHeight);
</script>
<% 
if Request.Cookies("NC")="" or Request.Cookies("NC")="访客" then
		Response.Write("对不起，您不是社区用户，请先注册！")
        Response.End
end if
%>
<HTML>
<HEAD>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<TITLE>Mini城市 - 服饰百货</TITLE>
<style type="text/css">
<!--
a,td,body {  font-family: "宋体"; font-size: 12px}
.p9 {  font-family: "宋体"; font-size: 12px}
.pt9 {  font-family: "宋体"; font-size: 9pt;TEXT-DECORATION: underline}
.p10 {  font-family: "宋体"; font-size: xx-small;COLOR:#999999}
.14{ line-height:22px;font-size:12px}
.TButton {  font-family: "宋体"; font-size: 12px;cursor:hand;HEIGHT: 20px; WIDTH: 66px}
A:link{font-size:12px;COLOR:black;TEXT-DECORATION: none}
A:visited {font-size:12px;COLOR:black;TEXT-DECORATION: none}
A:hover {font-size:12px;COLOR: red; TEXT-DECORATION: underline}
-->
</style>
</HEAD>

<BODY BGCOLOR="#FFFFFF">
<%
dim connshop,strshop,dbshop
dbshop="shop.mdb"
Set connshop = Server.CreateObject("ADODB.Connection")
strshop="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(dbshop)
connshop.Open strshop

set brs=server.createobject("adodb.recordset")
sql="select * from [User] where NC='"&Request.Cookies("NC")&"'"
brs.open sql,connshop,1,3
if brs.eof or brs.bof then
brs.close
set brs=nothing
connshop.close
set connshop=nothing
%><br><br>
<table align=center width=80% >
<tr><td align=center><font color=0000FF>请先创建您的虚拟人物<br>点击下面图片完成创建</font><br><br><a href=lfshow.asp><img src=userface/nobg.gif border=0></a>
</td></tr></table>
<%
else
brs.close
set brs=nothing
connshop.close
set connshop=nothing
Response.Redirect "shop.asp"
end if
%>
<br><br>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -