易截截图软件、单文件、免安装、纯绿色、仅160KB

asp获取ip地址

摘自:http://shawangkun.woku.com/article/2723424.html
最简单的用以下语句:
ip=request.ServerVariables("REMOTE_ADDR")
response.Write(ip)
但这种方法对代理服务器上网的就不准了,故比较全面的是用下面的方法:
<%Private Function getIP()
Dim strIPAddr
If Request.ServerVariables("HTTP_X_FORWARDED_FOR") = "" OR InStr(Request.ServerVariab
les("HTTP_X_FORWARDED_FOR"), "unknown") > 0 Then
strIPAddr = Request.ServerVariables("REMOTE_ADDR")
ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ",") > 0 Then
strIPAddr = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), 1, InStr(Request.Ser
verVariables("HTTP_X_FORWARDED_FOR"), ",")-1)
ElseIf InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), ";") > 0 Then
strIPAddr = Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"), 1, InStr(Request.Ser
verVariables("HTTP_X_FORWARDED_FOR"), ";")-1)
Else
strIPAddr = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
End If
getIP = Trim(Mid(strIPAddr, 1, 30))
End Function
ip=getIP()
response.write(ip)
%>


相关文档:

ASP导出Excel数据的四种方法

一、使用OWC
  什么是OWC?
  OWC是Office Web Compent的缩写,即Microsoft的Office Web组件,它为在Web中绘制图形提供了灵活的同时也是最基本的机制。在一个intranet环境中,如果可以假设客户机上存在特定的浏览器和一些功能强大的软件(如IE5和Office 2000),那么就有能力利用Office Web组件提供一个交互式图形开 ......

刚学ASP。NET时写的防止重复提交的脚本

内容是:
function _doPostBack(){};
if(typeof("__doPostBack")=="function")
{
    _doPostBack=__doPostBack;
    __doPostBack=_doPostBackNew;
}
document.attachEvent("onmousemove",_onmousemove);
var _isPosting=false;
var _divMask=null; ......

Windows XP home版安装asp运行环境

    本人的本本上是home版的XP,无法正常安装IIS,但是网上查到几篇博文,说是能安装IIS,于是按照上面的描述亲自试了一下。
    其大致方法如下:
     1、首先打开C盘Windows目录中inf目录下的sysoc.inf文件(可以在运行中直接输入“c:\windows\inf\sysoc.inf&rdqu ......

ASP。NET页面传值中的乱码问题

在编程过程中,经常需要页面之间的传值;特别是中文传递的时候,经常出现乱码现象,很是郁闷。下面是我在网上找到的一些方法,供大家参考。
1.设置web.config文件。(没有用过)
<system.web>
......
<globalization requestEncoding="gb2312" responseEncoding="gb2312" culture="zh-CN" fileEncoding="gb2 ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号