📄 index.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="include/conn.asp"-->
<% dim webname,address,postmode,email,phone
timeset="0"
startime=timer()
if session("webname")="" then
set bbs=conn.execute("select * from system")
webname=bbs("webname")
address=bbs("address")
postmode=bbs("postmode")
email=bbs("email")
phone=bbs("phone")
session("webname")=webname
session("address")=address
session("email")=email
session("phone")=phone
session("postmode")=postmode
set bbs=nothing
else
webname=session("webname")
address=session("address")
postmode=session("postmode")
email=session("email")
phone=session("phone")
end if
dim sql,rs,dd,counter,cc,path,pic
sql="SELECT * FROM counter where used"
rs.open sql,conn,1,2
rs("number")=rs("number")+1
rs.update
%>
<% path=rs("path")
dd=rs("lengh")
counter=rs("number")
cc =dd- Len(counter)
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>雨丁香的网上书店</title>
<link href="mycs.css" rel="stylesheet" type="text/css">
</head>
<body background="images/0033.jpg" leftmargin="0" topmargin="0">
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><img name="top3a_r1_c1" src="images/top3a1.jpg" width="199" height="130" border="0" alt=""></td>
<td width="400" background="images/top3a2.gif"><div align="right">
<h1><font color="#0000CC" face="隶书"><%=webname%></font></h1>
</div></td>
<td><img name="top3a_r1_c3" src="images/top3a3.gif" width="179" height="130" border="0" alt=""></td>
<td><img src="back/spacer.gif" width="1" height="130" border="0" alt=""></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="199" rowspan="2"><img name="top3a_r2_c1" src="images/top3a4.gif" width="199" height="145" border="0" alt=""></td>
<td height="100" colspan="5"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="550" height="100">
<param name="movie" value="book.swf">
<param name="quality" value="high">
<embed src="book.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="550" height="100"></embed></object></td>
<td width="6" rowspan="2"><img src="back/spacer.gif" width="1" height="145" border="0" alt=""></td>
</tr>
<tr>
<td>
<div align="center"><strong><A HREF=# class="text" ONCLICK="this.style.behavior='url(#default#homepage)';this.setHomePage
('<%response.Write(request.ServerVariables("HTTP_HOST"))%>');">设为首页</a></strong></div></td>
<td>
<div align="center"><strong> <a href="javascript:window.external.AddFavorite('<%=("http://"&request.ServerVariables("HTTP_HOST"))%>', '<%=(Webname)%>')" class="text">加入收藏</a></strong></div></td>
<td>
<div align="center" class="text"><strong><a href="liuyan/server.asp" class="text">服务中心</a></strong></div></td>
<td class="text">
<div align="center"><strong><a href="liuyan/default.asp?pageno=1" class="text">在线留言</a></strong></div></td>
<td>
<div align="center" class="text"><strong><a href="mailto:wangli@c361.com" class="text">联系我们</a></strong></div></td>
</tr>
</table>
<table width="778" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td background="images/bg3.gif">
<div align="center"><strong><a href="books/newbooks.asp" class="text">新书上市</a></strong></div></td>
<td colspan="10" rowspan="8"> <table border="0" cellpadding="0" cellspacing="0" width="499">
<!-- fwtable fwsrc="girl.png" fwbase="girl.jpg" fwstyle="Dreamweaver" fwdocid = "742308039" fwnested="0" -->
<tr>
<td><img src="spacer.gif" width="253" height="1" border="0" alt=""></td>
<td><img src="spacer.gif" width="246" height="1" border="0" alt=""></td>
<td><img src="spacer.gif" width="1" height="1" border="0" alt=""></td>
</tr>
<tr>
<td><img name="girl_r1_c1" src="images/girl_r1_c1.jpg" width="253" height="143" border="0" alt=""></td>
<td><img name="girl_r1_c2" src="images/girl_r1_c2.jpg" width="246" height="143" border="0" alt=""></td>
<td><img src="spacer.gif" width="1" height="143" border="0" alt=""></td>
</tr>
<tr>
<td><img name="girl_r2_c1" src="images/girl_r2_c1.jpg" width="253" height="147" border="0" alt=""></td>
<td><img name="girl_r2_c2" src="images/girl_r2_c2.jpg" width="246" height="147" border="0" alt=""></td>
<td><img src="spacer.gif" width="1" height="147" border="0" alt=""></td>
</tr>
<tr>
<td><img name="girl_r3_c1" src="images/girl_r3_c1.jpg" width="253" height="113" border="0" alt=""></td>
<td><img name="girl_r3_c2" src="images/girl_r3_c2.jpg" width="246" height="113" border="0" alt=""></td>
<td><img src="spacer.gif" width="1" height="113" border="0" alt=""></td>
</tr>
</table></td>
</tr>
<tr>
<td background="images/bg3.gif">
<div align="center"><strong><a href="books/books.asp" class="text">本店图书</a></strong></div></td>
</tr>
<tr>
<td background="images/bg3.gif">
<div align="center"><strong><a href="books/dingdan.asp" class="text">订单查询</a></strong></div></td>
</tr>
<tr>
<td background="images/bg3.gif">
<div align="center" class="text"></div></td>
</tr>
<tr>
<td background="images/bg3.gif">
<div align="center" class="text"><strong>当前时间</strong></div></td>
</tr>
<tr>
<td background="images/bg3.gif">
<div align="center">
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="120" height="120">
<param name="movie" value="clock.swf">
<param name="quality" value="high">
<embed src="clock.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="120" height="120"></embed></object>
</div></td>
</tr>
<tr>
<td background="images/bg3.gif"><font color="#0000FF" size="2"> 今天是<%=year(now)%>年<%=month(now)%>月<%=day(now)%>日，<br>
欢迎您登录我的网站！！</font><font size="2"> </font></td>
</tr>
<tr>
<td background="images/bg3.gif"> </td>
</tr>
<tr>
<td background="images/bg3.gif" class="text">
<div align="center"><font color="#0000FF"></font></div></td>
<td colspan="10"><div align="center"><font size="2"><font color="#0000FF">您是第
<%for i=1 to cc%>
<img src="<%=path%>/0.gif">
<% next %>
<% for i=1 to Len(counter) %>
<img src=<%=path%>/<%=mid(counter,i,1)%>.gif>
<% next %>
位光临的朋友！！</font></font></div></td>
</tr>
</table>
<% rs.close
set conn=nothing %>
<!--#include file="include/foot.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -