📄 foot.asp
字号:
<p align="center">Copyright (C) 2004 <b><a href="http://dajia.cashome.com" target="_blank">雨后天.Studio</a></b> All Rights Reserved </p>
<p align="center">版权所有 铁吧 Powerd By <b>雨后天</b> <a href="http://dajia.cashome.com/codedown/mycode.rar">本系统下载</a> 本站总访问量 <%
Sub Numberpad()
Set numconn=Server.CreateObject("adodb.connection")
numconn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.mappath("db\db.mdb")
Set rsnum=Server.CreateObject("adodb.recordset")
rsnum.open "select * from num",numconn
Application("Num")=rsnum("num")
rsnum.Close
Application("Num")=Application("Num")+1
Response.Write Application("Num")
rsnum.open "update num set num="&Application("Num"),numconn
End Sub
Application.Lock
Numberpad
Application.UnLock
%></p>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -