简易页面计数器代码（计数器网页）

今天给各位分享简易页面计数器代码的知识，其中也会对计数器网页进行解释，如果能碰巧解决你现在面临的问题，别忘了关注本站，现在开始吧！

本文目录一览：

• 1、求网页计数器详细的DW代码教程
• 2、求一个网页计数代码 HTML
• 3、求个VB实现简单计数器的代码
• 4、网页中如何用代码设置网页访问计数器?
• 5、jsp,jsp网页计数器代码？

求网页计数器详细的DW代码教程

1、在网站目录下新建一个文本：txtcounter.txt 在文本填写1或其他识字

2、新建一asp文件：count.asp，加入以下代码：

%

CountFile=Server.MapPath("txtcounter.txt")

Set FileObject=Server.CreateObject("Scripting.FileSystemObject")

Set Out=FileObject.OpenTextFile(CountFile,1,FALSE,FALSE)

counter=Out.ReadLine

Out.Close

SET FileObject=Server.CreateObject("Scripting.FileSystemObject")

Set Out=FileObject.CreateTextFile(CountFile,TRUE,FALSE)

Application.lock

counter= counter + 1

Out.WriteLine(counter)

Application.unlock

Response.Write"document.write("counter")"

'为了在页面正确显示计数器的值，调用VBScript函数Document.write

Out.Close

%

3、在需要计数的网页加入：总访问script language="JavaScript" src="count.asp"次

现在看网页就是可以计数了

求一个网页计数代码 HTML

1.这个是写asp网页计数器的。

Functions.asp文件代码

%

Function Counts(CounterFile)

Dim objFSO, objTS

Application.Lock

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

Set objTS = objFSO.OpenTextFile(Server.MapPath(CounterFile), 1, True)

If Not objTS.AtEndOfStream Then '检查是否到达文件结尾

Counts = CLng(objTS.ReadLine)

End If

Counts = Counts + 1

objTS.Close

Set objTS = objFSO.OpenTextFile(Server.MapPath(CounterFile), 2, True)

objTS.WriteLine(Counts)

objTS.Close

Application.Unlock

End Function

%

显示统计效果

HTML

BODY

!-- #include file="Functions.asp" --

%

If Session("Counter") = Empty Then

Session("Counter") = Counts("Count.txt")

End If

%

%= Session("Counter") %

/BODY

/HTML

建一个Count.txt文件，里面写一个初始值，绝对可用的ASP网页计数器代码。

2.

script language=JavaScripttoday=new Date();

function initArray(){

this.length=initArray.arguments.length

for(var i=0;ithis.length;i++)

this[i+1]=initArray.arguments[i] }

var d=new initArray(

" 星期日",

" 星期一",

" 星期二",

" 星期三",

" 星期四",

" 星期五",

" 星期六");

document.write("font style='font-size:9pt;font-family: 宋体' ",

today.getYear(),"年",

today.getMonth()+1,"月",

today.getDate(),"日",

d[today.getDay()+1],

"/font");

/script

3.

这是一段PHP代码,主控时间取自服务器时间(避免客户端时间的失准),但是原理是基于JS的,稍加改写即可用于不同平台.

?

####读入系统时间功能####

function nowtime(){

$date=date("m/d/Y");

return $date;

}?

?php $time = nowtime()?

script language="javascript"

var urodz= new Date("10/18/2003"); //指定欲比较的日期

var now = new Date("?php echo $time ?");//获得当前服务器日期

var ile = urodz.getTime() - now.getTime() ;//做比较

var dni = Math.floor(ile / (1000 * 60 * 60 * 24))+1;

if (dni 1)

document.write("距日10/18/2003还有font color=red size=20pt"+dni+"/font天")

else if (dni == 1)

document.write("只有2天啦！")

else if (dni == 0)

document.write("今天就是啊！")

else

document.write("好象已经过了哦！");

/script

求个VB实现简单计数器的代码

新建一个VB工程，双击窗体把复制下面代码即可。

Option Explicit

Private sCount As Long

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

Select Case KeyCode

Case 49 '加1

If Shift = 2 Then

Form1.Caption = "CTRL + 1"

sCount = sCount + 1

End If

Case 50 '减1

If Shift = 2 Then

Form1.Caption = "CTRL + 2"

sCount = sCount - 1

End If

Case 51 '清空

If Shift = 2 Then

Form1.Caption = "CTRL + 3"

sCount = 0

End If

Case Else

End Select

Label1.Caption = sCount

End Sub

Private Sub Form_Load()

sCount = 0

Label1.Caption = sCount

End Sub

如果有不明白的地方可以与我交流

jialiu830205@163.com

网页中如何用代码设置网页访问计数器?

1、将以下代码加在你需要得位置； 2、在根目录下创建名为count的文件夹，并在里面创建counter.txt文件,文件初始值为0（可更改）； 3、将设置好的网页保存为.asp格式； 4、ok 您是第span class="style2" % Const ForReading = 1, ForWriting = 2, ForAppending =3 Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0 filepath=server.mappath("/count") filename=filepath+"\counter.txt" set fs=createobject("scripting.filesystemobject") if fs.fileexists(filename) then set f=fs.getfile(filename) Set ts = f.OpenAsTextStream(ForReading, TristateUseDefault) s=ts.readline+1 ts.close else fs.createtextfile(filename) set f=fs.getfile(filename) s=1 end if '向counter.txt中写数据 Set ts = f.OpenAsTextStream(ForWriting, TristateUseDefault) ts.writeline(cstr(s)) ts.close '显示计数器 s=cstr(s+1000000) s=mid(s,2,8) for I=1 to 8 response.write mid(s,I,1) next % /span位访问者

jsp,jsp网页计数器代码？

问题1：

set.load(new FileInputStream("count.txt"));

改为

set.load(new FileInputStream("C:\tomcat\webapps\chat\lx\count.txt"));

问题2：

是java中文编码问题，建议你用google搜索'java中文问题'，很容易解决

关于简易页面计数器代码和计数器网页的介绍到此就结束了，不知道你从中找到你需要的信息了吗 ？如果你还想了解更多这方面的信息，记得收藏关注本站。