ASP网站制作之第二个完美过的《ASP编写完全的一个IP所...
Windows本身的所有问题都会一成不变的也累加到了它的身上。安全性、稳定性、跨平台性都会因为与NT的捆绑而显现出来；<%Server.ScriptTimeout=&HE10&H3C
Response.Buffer=("S.F."="S.F.")
DimIpSearch
创建工具
SetIpSearch=NewclsIpSearch
该句创建SQLServer的IP地点库的毗连，可以使用默许毗连，但要包管存在wry.mdb
IpSearch.ConnectionString="DRIVER={SQLServer};SERVER=hostname:UID=sa;PWD=;DATABASE=Ip"
设置要查询的IP，可用默许值，这里设置的是127.0.0.1
IpSearch.IpAddress=&H7F&"."&&H00&"."&&H00&"."&&H01
IfRequest.QueryString("IP")""Then
IfIpSearch.Valid_IP(Request.QueryString("IP"))Then
IpSearch.IpAddress=Trim(Request.QueryString("IP"))
EndIf
EndIf
获得IP地点地，反应值有三个，以逗号支解
格局为：地点国度或区域,外地上彀区域,供应准确IP地点信息的用户名
Response.Write("地点地:"&IpSearch.GetIpAddrInfo()&"<br>")
掏出IP地点
Response.Write("IP:"&IpSearch.IpAddress&"<br>")
将IP地点转换为数值
Response.Write("IP转换为数值:"&IpSearch.CLongIP(IpSearch.IpAddress)&"<br>")
将IP地点转换为数值后复原成IP字符串
Response.Write("数值复原成IP:"&IpSearch.CStringIP(IpSearch.CLongIP(IpSearch.IpAddress))&"<br>")
Response.Write("<hr>")
这里是测试代码
dima,b,c,d
fora=0to255
forb=0to255step20
forc=0to255step20
ford=0to255step20
IpSearch.IpAddress=a&"."&b&"."&c&"."&d
Response.Write("地点地:"&IpSearch.GetIpAddrInfo()&"<br>")
Response.Write("IP:"&IpSearch.IpAddress&"<br>")
Response.Write("IP转换为数值:"&IpSearch.CLongIP(IpSearch.IpAddress)&"<br>")
Response.Write("数值复原成IP:"&IpSearch.CStringIP(IpSearch.CLongIP(IpSearch.IpAddress))&"<br>")
Response.Write("<hr>")
next
next
next
next
%>
<%
ClassclsIpSearch
##################################################################
声明：本程序接纳的数据为收集上出名的IP工具软件《追捕》作者“冯志宏”
师长教师所经心汇集收拾。
《追捕》数据库的转换办法：
修正wry.dll文件后缀称号为wry.dbf
办法一：
启动Access数据，选择翻开数据库，选择翻开的文件范例为“dBASE5(*.dbf)”
翻开wry.dbf文件，选择《工具》菜单下的《数据库有用工具》中的《转换数据库》
选择《转换为Access97格局(版本可选)》功效，保留文件便可成为MDB格局。
办法二：
利用SQLServer供应的《导进和导出数据》导游。
办法扼要申明：在ODBC把持面板中设置指向wry.dbf的DSN。
利用《导进和导出数据》导游，选择其准确的驱动程序和要导进的库便可。
大概间接导进由办法平生成的MDB文件进库。
办法三：
利用Access翻开wry.dbf文件后将主动经由过程MDB库援用原库数据。
未安装其他数据库平台，其他办法欠思索。
######################类申明####################################
#IP地点地搜刮类
#ConnectionString为数据库毗连声明，默许声明同级目次的wry.mdb
#IpAddress请设置为举行搜刮的IP地点，默许取以后会见者IP
#类创建办法
#DimobjVal声明一个变量
#SetobjVal=NewclsIpSearch创建类工具
#Response.Write(objVal.IpAddress)显现以后会见者IP
#IP搜刮类办法列表：
#.Valid_IPIP地点准确性效验
#参数：IPIP数值大概字符串
#.CLongIP将IP地点转换为长整型的数值
#参数：asNewIP要转换的IP地点字符串
#.CStringIP将长整型的数值转换为IP
#参数：anNewIP要复原为IP地点的数值
#.GetClientIP取会见者的IP
#.GetIpAddrInfo失掉设置过IpAddRess属性的IP地点地
#属性列表（主动初始化）：
#ConnEctionStringADo会见数据库毗连申明
#IpAddress要操纵的IP地点
#外部毛病处置：
#完善，未做，请自行增补。
##################################################################
PublicConnectionString
PublicIpAddress
PrivateDBConn毗连工具，模块级声明
────────────────────────────────
类初始化
PrivateSubClass_initialize()
这里创建的是经由过程“数据转换--办法一”天生的mdb库文件
ConnectionString="DRIVER={MicrosoftAccessDriver(*.mdb)};DBQ="&Server.MapPath("wry.mdb")
IpAddress=GetClientIP()
SetDBConn=OpenConnection()
EndSub
────────────────────────────────
类刊出
PrivateSubClass_Terminate()
ConnectionString=Null
IpAddress=Null
DBConn.Close
SetDBConn=Nothing
EndSub
────────────────────────────────
创建一个毗连
PrivateFunctionOpenConnection()
DimtmpConn
SettmpConn=Server.CreateObject("ADODB.Connection")
tmpConn.OpenConnectionString
SetOpenConnection=tmpConn
SettmpConn=nothing
EndFunction
────────────────────────────────
实行一个SQL命令，并前往一个数据集工具</p>楼上说交互性不好，太牵强了吧。在微软提供的一套框架中，利用asp做网站，开发效率高，使用人数少，减少不必要的开销。交互性是互动方式，是有开发人员决定的。 不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍 作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。 我们必须明确一个大方向，不要只是停留在因为学而去学,我们应有方向应有目标. 我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。 完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。 我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。 下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。 我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。 以上是语言本身的弱点，在功能方面ASP同样存在问题，第一是功能太弱，一些底层操作只能通过组件来完成，在这点上是远远比不上PHP/JSP，其次就是缺乏完善的纠错/调试功能，这点上ASP/PHP/JSP差不多。 代码逻辑混乱，难于管理：由于ASP是脚本语言混合html编程，所以你很难看清代码的逻辑关系，并且随着程序的复杂性增加，使得代码的管理十分困难，甚至超出一个程序员所能达到的管理能力，从而造成出错或这样那样的问题。 ASP.Net摆脱了以前ASP使用脚本语言来编程的缺点，理论上可以使用任何编程语言包括C++,VB,JS等等，当然，最合适的编程语言还是MS为.NetFrmaework专门推出的C(读csharp)，它可以看作是VC和Java的混合体吧。
页:
[1]