存档
因为学习需要，不得不安装了VS2005，当程序出现错误而弹出调试窗口时，实在是郁闷。
工具》选项》调试》实时
在“启用这些代码类型的实时调试”框中，选中或清除相关的程序类型：“托管”、“本机”或“脚本”。
点击确定即可~需要时管理员权限！
在网站上经常用到根据客户IP显示城市的功能，如果只是简单的查询功能，直接用网上写好的纯真的IP数据库查询工具（如:114IP.NET）即可！如果想要该地区访客的统计什么的，网上下载的这些源码恐怕就无能为力了。这个时候就需要我们把纯真IP数据导入到数据库中。
在Baidu上找了下，看到一篇通过导入纯真查询程序生成IP的数据库的文本格式到表A，然后再次用一个ASP文件来访问数据表A，把A表的IP转换到B表，这种方法我不是很赞成，而且有一定的局限行，比如要将纯真IP数据库转换成MDB格式，必须装Access，将纯真IP数据库转换成MSSQL必须安装MSSQL，转换城MYSQL必须安装MYSQL。即使安装了数据库还要安装IIS，对与新手操作可能有些麻烦了~
我写了一个VBS的脚本，通过ADODB.Connection链接数据库，然后用ADODB保存到将纯真IP数据库转MDB数据库
Function Mappath(n)
Mappath=Fso.getabsolutepathname(n)
End Function
Function IpToNum(Ip)
IpNs=split(ip,".")
IpN=IpNs(0)*S4+IpNs(1)*S3+IpNs(2)*S2+IpNs(3)*S1
if err<>0 then IpN=0
err.clear
IpToNum=IpN
End Function
S1=256
S2=256*S1
S3=256*S2
S4=256*S3
on error resume next
Set Fso=CreateObject("Scripting.FileSystemObject")
Set Conn=CreateObject("ADODB.Connection")
Conn.open "provider=microsoft.jet.oledb.4.0;data source="&Mappath("dat.mdb")
Set Rs=CreateObject("ADODB.Recordset")
Rs.open "Select * from d",Conn,2,3
Set Fto=Fso.OpenTextFile(Mappath("dat.txt"))
Do while not Fto.atendofstream
Rs.addnew
Res=Split(Replace(Replace(Fto.Readline," ","")," "," ")," ")
Rs("s")=IpToNum(Res(0))
Rs("e")=IpToNum(Res(1))
Rs("c")=Res(2)
Rs("h")=Res(3)
Wscript.Echo "From "&Res(0)&" To "&Res(1)&" Updated."
Rs.update
Loop
Rs.close
将纯真数据库转MSSQL数据库也很简单，只需改
Conn.open “driver={SQL Server}; server=(local);database= ;uid= ;pwd= ”
将纯真数据库转MYSQL数据库，只需改
Conn.open “Driver={mysql};database=[yourdatabase];uid=[username];pwd=[yourpassword];option=16386;”
因为工作，要用NAV效果，这就需要背景透明，试了下GIF，效果实在不敢恭维，只好选择PNG了
在IE7,FF中正常，但在IE6中无论怎么改，应该透明的地方总是灰色的
在网上搜索了下，解决方案(http://webfx.eae.net/dhtml/pngbehavior/pngbehavior.html)：
<img src=”blank.gif” style=”width: 100px; height: 100px; filter:
progid:DXImageTransform.Microsoft.AlphaImageLoader(src=’image.png’, sizingMethod=’scale’)” />
但是我需要的是背景效果，并不能解决这种问题，今天忽然想到GIF是索引模式，是不是PNG需要改成索引模式才能显示正常，测试了一下，果然可行
于是得出结论：PNG在IE6下做背景透明效果需要把模式改成索引模式