|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
因为现在数据库都使用标准的SQL语言对数据库进行管理,所以如果是标准SQL语言,两者基本上都可以通用的。SQLServer还有更多的扩展,可以用存储过程,数据库大小无极限限制。</p> 要想透过代办署理服务器获得客户真个实在IP地点,就要利用Request.ServerVariables("HTTP_X_FORWARDED_FOR")来读取。不外要注重的事,并非每一个代办署理服务器都能用Request.ServerVariables("HTTP_X_FORWARDED_FOR")来读取客户真个实在IP,有些用此办法读取到的仍旧是代办署理服务器的IP。另有一点必要注重的是:假如客户端没有经由过程代办署理服务器来会见,那末用Request.ServerVariables("HTTP_X_FORWARDED_FOR")取到的值将是空的。因而,假如要在程序中利用此办法,能够如许处置:
......
userip=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
Ifuserip=""Thenuserip=Request.ServerVariables("REMOTE_ADDR")
......
即:假如客户端经由过程代办署理服务器,则取HTTP_X_FORWARDED_FOR的值,假如没经由过程代办署理服务器,就取REMOTE_ADDR的值。
通用函数:假如不克不及取客户端实在IP,就会取客户真个代办署理IP
PrivateFunctiongetIP()
DimstrIPAddr
IfRequest.ServerVariables("HTTP_X_FORWARDED_FOR")=""ORInStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),"unknown")>0Then
strIPAddr=Request.ServerVariables("REMOTE_ADDR")
ElseIfInStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),",")>0Then
strIPAddr=Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),1,InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),",")-1)
ElseIfInStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),";")>0Then
strIPAddr=Mid(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),1,InStr(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),";")-1)
Else
strIPAddr=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
EndIf
getIP=Trim(Mid(strIPAddr,1,30))
EndFunction无法实现跨操作系统的应用。当然这也是微软的理由之一,只有这样才能发挥ASP最佳的能力。可是我却认为正是Windows限制了ASP,ASP的概念本就是为一个能让系统运行于一个大的多样化环境而设计的; |
|