100分求解决分离式计数器问题

Question

counter.asp页面
<% 
CountFile=Server.MapPath("counter.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&") "
Out.Close
%> 
发布代码
<p>
您是第
<font color=red>
<script language="JavaScript"  src="http://www.***.com.cn/counter.asp";>
</script>
</font>
位来客
</p>这些代码在一般网页上发布没问题，现在的问题是：发布的页面把<script...>和</script>之间的代码自动删掉，请问有没有其他办法能把这个分离式计数器发布上去 

Answer 1

对，是asp
但是发布页面应该对是否asp都没有关系

Answer 2

把发布页面改一下：
<script language="VBScript" src="http://www.***.com.cn/counter.asp";>再不行，那就是你发布所在的网站强行过滤了，这就没办法了。

Answer 3

大家有没有不用script脚本或其他方法绕过被网站强行过滤的？
曾经想过把所有的<script language="VBScript"> 这句代码写到counter.asp中，但没有成功，大家帮帮忙啊