📄 index.aspx
字号:
<%@ import namespace="system.io"%>
<%@ page language="vb" %>
<html>
<script language="vb" runat="server">
sub page_load(obj as object,e as eventargs)
dim sr1 as streamreader=new streamreader(server.mappath("counter.txt"))
dim cnt as string=sr1.readline()
dim str as string
dim str1 as string
dim j as integer=cnt.length
dim i as integer
str1="您是第"
for i=1 to j
str=mid(cnt,i,1)
str1=str1+"<img src='"+str+".gif' alt='"+str+"'>"
next
l1.text=str1+"位来访者"
sr1.close()
end sub
</script>
<head>
<title>网站首页</title>
</head>
<body>
<asp:panel id="p1" runat="server" horizontalalign="center">
<asp:label id="l1" runat="server"/>
</asp:panel>
</body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -