仓酷云
标题:
ASP教程之Asp完成限定IP会见 的程序
[打印本页]
作者:
小女巫
时间:
2015-1-16 22:14
标题:
ASP教程之Asp完成限定IP会见 的程序
对于中小型web应用来说,php有很强的竞争力,linux+apache+mysql+php(lamp)的组合几乎可以胜任绝大多数网站的解决方案,对于大型应用来讲,对于系统架构要求更高,需要有成熟的框架支持,jsp的struts是个不错的框架,国内介绍它的资料也非常多,应用逐渐广泛起来。asp就不用说了,程序|会见<%
猎取会见者的地点
ip=Request.ServerVariables("REMOTE_ADDR")
同意的IP地点段为10.0.0.0~10.68.63.255
allowip1="10.0.0.0"
allowip2="10.68.10.71"
response.writecheckip(ip,allowip1,allowip2)
functioncheckip(ip,allowip1,allowip2)
dimcheck(4)
checkip=false
ipstr=split(ip,".")
allow1=split(allowip1,".")
allow2=split(allowip2,".")
ifcint(allow1(0))>cint(allow2(0))then判别IP地点段是不是正当
response.write"克制会见"
exitfunction
endif
fori=0toubound(ipstr)
ifcint(allow1(i))<cint(allow2(i))then
ifcint(allow1(i))=cint(ipstr(i))then
check(i)=true
checkip=true
exitfor
else
ifcint(ipstr(i))<cint(allow2(i))then
check(i)=true
checkip=true
exitfor
else
ifcint(ipstr(i))>cint(allow2(i))then
check(i)=false
checkip=false
exitfor
else
check(i)=true
checkip=true
endif
endif
endif
else
ifcint(allow1(i))>cint(ipstr(i))orcint(allow1(i))<cint(ipstr(i))then
check(i)=false
checkip=false
ifiubound(ipstr)then
exitfor
endif
else
check(i)=true
endif
endif
next
if(check(0)=trueandcheck(1)=trueandcheck(2)=trueandcheck(3)=false)and(cint(allow2(2))>cint(ipstr(2)))then
checkip=true
endif
endfunction
%>使用filesystemobject,可以对服务器上的文件进行操作,浏览、复制、移动、删除等。有ado的支持,asp对数据库的操作非常得心应手。你甚至可以像使用本地数据库那样,管理远程主机上的数据库,对表格、记录进行各种操作。
作者:
愤怒的大鸟
时间:
2015-1-19 05:28
弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。
作者:
深爱那片海
时间:
2015-1-27 22:43
不能只是将它停留在纸上谈兵的程度上。
作者:
若天明
时间:
2015-2-5 15:39
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
作者:
透明
时间:
2015-2-12 20:01
我可以结合自己的经验大致给你说一说,希望对你有所帮助,少走些弯路。
作者:
再现理想
时间:
2015-3-3 08:45
交流是必要的,不管是生活还是学习我们都要试着去交流,通过交流我们可以学到很多我们自己本身所没有的知识,可以分享别人的经验甚至经历。
作者:
飘飘悠悠
时间:
2015-3-11 10:18
ASP.Net和ASP的最大区别在于编程思维的转换,而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程,而那些脚本语言属于弱类型、面向结构的编程语言,而非面向对象,这就明显产生以下几个问题:
作者:
精灵巫婆
时间:
2015-3-18 09:05
从事这个行业,那么你可以学ASP语言,简单快速上手,熟练dreamweav排版,写asp代码,熟练photoshop处理图片,打好基础就行了
作者:
灵魂腐蚀
时间:
2015-3-25 19:13
另外因为asp需要使用组件,所以了解一点组件的知识(ADODB也是组件)
欢迎光临 仓酷云 (http://ckuyun.com/)
Powered by Discuz! X3.2