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

ASP
ASP编程入门进阶(廿一):DAO SQL之建立数据库表
ASP应用之模板采用
ASP上传图片功能的又一实现(OLE对象)
asp中FSO复制文件代码
asp复制文件夹代码
实例演练ASP+XML编程比较全的了
利用ASP从远程服务器上接收XML数据的方法
PJ-Blog教程┊增强博客用户体验~让发表内容的同时拷贝到剪贴板以防丢失
TSYS一个新闻多种特性时如何进行前台更新?
TSYS资源特性的效率提高方法
重置TSYS系统中的所有"生成的文件"成"未生成文件"
TSYS中生成静态页时溢出: ''CInt''
asp实现防止站外提交内容的两个方法
ASP中生成文本文件的两种方式
ASP是否可以定时触发事件
ASP解压缩(在线解压缩类)
使用ASP删除指定IIS站点
使用ASP控制指定站点解析脚本语言函数
HTML标签及ASP函数速查表
如何使用Administrators组用户运行ASP程序

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


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