IP查询系统本网站早就有了,模板利用的是拓网的,但是程序已经很旧了,随着时代的发展,该程序也逐渐地该淘汰了!因为里面的IP数据仅仅才30万,而现在最新的数据库已经更新到了37万条记录了,相比之下,原来的数据库的内容也更新了很多,使得IP地址更加的准确。
原来的程序使用了CONST函数,因为自己对这个函数不是很理解,修改了代码或更新了数据库,程序都会出现乱码,所以很不利于更新,加上原来的数据库使用的是ACCESS的数据库,而网上流行的纯真IP数据库的格式是DAT的,转换成ACCESS后很占空间,所以,为了节省空间,也为了数据更新的方便,本人综合了几个程序,在原程序的基础上经过改进,现在可以直接调用纯真IP数据库的DAT格式了。
这样一来就方便很多了,每当IP数据库有更新的时候,你直接把最新的数据库上传就可以了,不用再导出为TXT格式,然后又转换成ACCESS格式,省了不是的功夫了。
阅读全文……Tag : 纯真IP | IP查询程序 大家都看多的时候,大盘就要跌了,大家看空的时候,大盘就要涨了!
目前从30分钟以及60分钟波段趋势看,大盘下午有技术性的反弹,预计目标点位在3250附近,从整体来看,大盘目前的上升趋势还没有改变,但是要做好高抛低吸,追高的被套那是肯定的事情,从利空方面来看,
最担心的就是下周一中国北车网上申购,大盘被抽血估计是少不了的,所以本在15日就在各群发出了短线以及中线的操作策略了。
跌是为了更好的涨,抛出的筹码,在合适的位置是要接回来的,不要抛了就忘记接了!
阅读全文……研究好多天了,也试过好多办法了,总结出目前发现最好的方法:
先说一下基本的东西:
<%@ codepage=936%>简体中文
<%@ codepage=950%>繁体中文
<%@ codepage=65001%>UTF-8
阅读全文……Tag : Utf-8 | Gb2312 | 乱码ASP过滤禁止注册的用户名,ASP过滤特殊字符号字符串
<%
RegisterName=replace(replace(replace(replace(replace(replace(replace(Request.form("RegisterName"),"'",""),"#",""),Chr(34),""),"?","")," ",""),"=",""),"*","")
Forbiden="~|!|@|#|$|%|^|&|*|(|)|_|+|=|-|`|\|;|:|/|admin|?|.|>|,|<"
阅读全文……Tag : ASP | 过滤 | 特殊字符fso检测文件是否存在,如果文件存在则执行删除
<%
Set fs=server.CreateObject("Scripting.FileSystemObject")
html=server.mappath("/html/vist_"&request("articleid")&".html")
阅读全文……Tag : FSO | 删除文件<%
Function GetUrl()
On Error Resume Next
Dim strTemp
If LCase(Request.ServerVariables("HTTPS")) = "off" Then
阅读全文……Tag : ASP | 当前网址