不帅 发表于 2015-1-16 22:49:20

ASP教程之开释被踢IP文件releip.asp

写软件都是想的时间比写的时间要长的.如果反过来了就得看看是什么原因了.另外大家可以回去问问公司里的小MM.(一般企业里,跟你们交付软件接触得最多的是她们)开释被踢IP文件releip.asp

<%
user=request.form("user")
%><metahttp-equiv="refresh"content="4;URL=../refresh.asp?user=<%=user%>">
<%
chatdata=application("chatdata")
kicklist=application("kicklist")
ifsession("admlevel")="9"then
sendid=finduser(user)
ifsendid<51then
ifchatdata(sendid,1)=request.servervariables("remote_addr")then
tkicklist=""
dowhileinstr(kicklist,",#")>0
address1=instr(kicklist,",#")
address2=instr(address1+3,kicklist(room),"")
tkicklist=tkicklist&mid(kicklist,address1,address2)
kicklist=mid(kicklist,address2+1)
loop
kicklist=tkicklist
application.lock
application("kicklist")=kicklist
application.unlock
dispstr=right("0"&time,8)&",体系,0,"&user&",ff0000,0,乐成地扫除了被踢IP地点"
endif
endif
endif
ifdispstr""then
%>
<scriptlanguage=javascript>
parent.comm=newArray(<%=dispstr%>);
parent.writecomm();</script>
<%
endif

functionfinduser(fuser)
reval=100
fori=0to50
ifchatdata(i,0)=fuserthen
reval=i
exitfor
endif
next
finduser=reval
endfunction

%>
</p>asp,你就只能等着微软给你解决,它不乐意你就只好悲催。而且asp跑在windows服务器上,windows服务器跟linux比起来简直弱爆了!

第二个灵魂 发表于 2015-1-20 05:11:24

跟学别的语言一样,先掌握变量,流程控制语句(就是ifwhileselect)等,函数/过程,数组

莫相离 发表于 2015-1-20 05:11:24

以HTML语言整合(HTML负责界面上,ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。

小妖女 发表于 2015-2-5 22:18:39

如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:

若相依 发表于 2015-2-13 22:08:08

哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的?

老尸 发表于 2015-3-4 02:11:28

ASP主要是用好六个对象,其实最主要的是用好其中两个:response和request,就可以随心所欲地控制网页变换和响应用户动作了。

金色的骷髅 发表于 2015-3-11 15:26:19

Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")

简单生活 发表于 2015-3-19 01:15:00

代码的可重用性差:由于是面向结构的编程方式,并且混合html,所以可能页面原型修改一点,整个程序都需要修改,更别提代码重用了。

仓酷云 发表于 2015-3-27 00:43:08

用户端的浏览器不需要提供任何别的支持,这样大提高了用户与服务器之间的交互的速度。
页: [1]
查看完整版本: ASP教程之开释被踢IP文件releip.asp