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

ASP
javascript css 三级目录(简单的)
asp下sql和access数据库随机取10条记录的代码newid()
新增加一个防垃圾评论的asp代码,鄙视垃圾
asp ADO GetString函数与用GetString来提高ASP的速度
windows2003下使用asp WScript.Shell的设置方法
asp UTF-8 乱码问题的解决方法小结
JavaScript面向对象的两种书写方法以及差别
响应对象 错误 ''ASP 0185 : 80020003'' 缺少默认属性
ASP生成伪参数程序设计技巧
asp中使用mysql数据库的注意实现
使用FSO修改文件夹的名称实现文件转移防盗链
asp下request.querystring("id")与request("id")区别
asp将全角的字符转变成半角字符,将半角转变成全角d的代码
asp创建表,复制表 字段类型附录
asp加密解密函数decrypt
asp获取当前网页地址的代码
asp下经常用到的代码
asp 的中文分词
修改正确的asp冒泡排序
rustysun同学ASP代码书写规范

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-08-14   浏览: 241 ::
收藏到网摘: 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. //不然数字不能被刷新,我试了半天。