当前位置: 首页 > 图文教程 > 网络编程 > ASP > flash结合asp制作出的显ip,版本,登陆时间,访问次数

ASP
构建你的网站新闻自动发布系统之三
构建你的网站新闻自动发布系统之四
如何用ASP编写网站统计系统一
如何用ASP编写网站统计系统二
如何用ASP编写网站统计系统三
如何用ASP编写网站统计系统四
ASP Error 0115的一些解决办法
ASP 3.0 新特色先睹为快(一)
ASP 3.0 新特色先睹为快(二)
ASP主件中的安全问题
一个汉字转成拼音的代码
使用w3Sockets组件实现域名查询功能
ASP中实现文件上传方法的研究
构建免受FSO组件威胁虚拟主机
用XMLHTTP做一个自己特色的Google
用asp实现的代码批量修改程序
无组件的数据库的备份与还原
用ASPJPEG组件制作图片的缩略图和加水印
解密ASP源代码
XmlHttp异步获取网站数据的例子

ASP 中的 flash结合asp制作出的显ip,版本,登陆时间,访问次数


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 151 ::
收藏到网摘: n/a

也不知道算不算原创,反正是没有参照任何东西,自己动手做的。 首先需要2个asp文件,1个文本文件,还有就是1个swf文件了。
-------------------info.asp----------------------------
//这里是显示ip,版本,登陆时间的 <!--#include file="num.asp"-->
<%
set userip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If userip = "" Then userip = Request.ServerVariables("REMOTE_ADDR")
response.write("&t0=你的ip地址是:"&userip)
set ie=Request.ServerVariables("HTTP_USER_AGENT")
response.write("&t1=你的浏览器版本和操作系统是:"&ie)
response.write("&t2=你登陆的时间是:"&now())
%>---------------------------num.asp-----------------------------
//这里是显示登陆次数和把登陆次---------------------------数记录到文本中
     <%
dim visitors
whichfile=server.mappath("time.txt")
set fs=createobject("Scripting.FileSystemObject")
set thisfile=fs.opentextfile(whichfile)
visitors=(thisfile.readline)
thisfile.close visitors=visitors+1
response.write ("&num="&visitors)
set out=fs.createtextfile(whichfile)
out.writeLine(visitors)
out.close
set fs=nothing
%> -----------http://www.devdao.com/----------time.txt--------------------
//这里是记录登陆次数 2921(可是自己设置初始值的)
---------------------------info.swf-----------------
//这是通过flash显示出以上数据 插入到第一针:
init();
function init() {
settxt();
run();
System.useCodepage = true;
loadVariablesNum("num.asp", "", "POST");
}
function settxt() {
for (i=0; i<4; i++) {
this.createTextField("txt"+i, i, 10, 100+30*i, 90, 0);
this["txt"+i].autoSize = "left";
this["txt"+i].border = true;
}
}
function run() {
lv = new LoadVars();
lv.onLoad = function(ok) {
if (ok) {
for (i=0; i<3; i++) {
_root["txt"+i].text = this["t"+i];
}
delete this.onLoad;
}
};
lv.load("info.asp", "", "POST");
onEnterFrame = function () {
txt3.text = num;//为了能够刷新的时候读取登陆次数,所以这里用到了onEnterFrame. //不然数字不能被刷新,我试了半天。