| 主办单位：蕉岭县科技局 技术支持：广东金科网 版权所有,不得拷贝 |
<%
Dim count '声明一个组件实例变量
Set count=Server.CreateObject("MSWC.pagecounter")
count.PageHit() '将当前网页访问次数加1
Dim visitNum
visitNum=count.Hits() '获取当前网页访问次数
'下面根据该访问次数，用相应的图片显示
Response.Write "您是自2006年5月25日来第"
For I=1 To Len(CStr(visitNum))
Response.Write ",I,1) & ) "
Next
Response.Write "位访客"
%>
[免责声明] |
|
设为首页
联系我们