<%
' ╭═══════════════╮
' ╭══════┤ 欢迎使用壹号计数器v1.0 ├═════╮
' ║ ╰═══════════════╯ ║
' ║ ║
' ║ ⿶⿶'╭⌒╮⌒╮⿶ ║
' ║ ╱◥██◣⿶,,⿶ ║
' ║ ╬╬╬╬╬╬╬╬↓↓↓╬╬╬ ║
' ║ ║
' ║ ║
' ║ 壹号工作室 http://www.1studio.net/ ║
' ║ 壹号 论坛 http://www.1studio.net/bbs/ ║
' ║ 作者 一豪 1studio@163.com ║
' ║ ║
' ║ ╭──────────────────────╮ ║
' ╰══┤ 版权所有·壹号工作室 ├══╯
' ╰──────────────────────╯
%>
<%
Application.Lock '将对象锁定
SQLcmd = "select * from counter"
set rs=newconn.Execute(SQLcmd)
counter=rs("counter")+1
SQLcmd1 = "update counter set counter=counter+1"
newconn.Execute SQLcmd1
x = CStr(counter)
For i = 1 To Len(x)
gif = gif & "![]("& Mid(x, i, 1) & ".gif)
"
Next
gif_counter = gif
Application.UnLock '将对象解除锁定
%>
document.write("<%=gif_counter%>")