仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 567|回复: 8
打印 上一主题 下一主题

[学习教程] ASP网页编程之音乐开关和图象开关/请勿打挠开关操纵文...

[复制链接]
海妖 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:32:24 | 只看该作者 回帖奖励 |正序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
ASP脚本是采用明文(plaintext)方式来编写的。音乐开关和图象开关/请勿打挠开关操纵文件admin/dontimg.asp
<%
OptionExplicit
dimroom,user,dd,ai,chatdata,sendid,dispstr,dispstr2
user=request.form("user")
dd=request.form("dd")
ai=request.form("ai")
chatdata=application("chatdata")
sendid=finduser(user)

selectcasedd
case"0"
ifai="on"then
dispstr=right("0"&time,8)&",体系,0,"&user&",ff0000,0,你乐成地翻开了图象和Midi"
dispstr2="parent.midisw=true;"
else
dispstr=right("0"&time,8)&",体系,0,"&user&",ff0000,0,你乐成地封闭了图象和Midi"
dispstr2="parent.midisw=false;"
endif
case"1"请勿要挠操纵
ifai="on"then
if(chatdata(sendid,4)mod2)=1then已翻开了
dispstr=right("0"&time,8)&",体系,0,"&user&",ff0000,0,请勿打挠开关已处于翻开形态"
else
chatdata(sendid,4)=chatdata(sendid,4)+1
application.lock
application("chatdata")=chatdata
application.unlock
dispstr=right("0"&time,8)&",体系,0,"&user&",ff0000,0,乐成地翻开了请勿打挠功效"
endif
else
if(chatdata(sendid,4)mod2)=0then已封闭了
dispstr=right("0"&time,8)&",体系,0,"&user&",ff0000,0,请勿打挠打挠开关己处于封闭形态"
else
chatdata(sendid,4)=chatdata(sendid,4)-1
application.lock
application("chatdata")=chatdata
application.unlock
dispstr=right("0"&time,8)&",体系,0,"&user&",ff0000,0,乐成地封闭了请勿打挠功效"
endif
endif
endselect
%>
<metahttp-equiv="refresh"content="4;URL=../refresh.asp?room=<%=room%>&user=<%=user%>">
<scriptlanguage=javascript>
<%ifdispstr2""thenresponse.writedispstr2%>
parent.comm=newArray(<%=dispstr%>);
parent.writecomm();</script>
<%
functionfinduser(fuser)
dimreval,i
reval=100
fori=0to99
ifchatdata(i,0)=fuserthen
reval=i
exitfor
endif
next
finduser=reval
endfunction
%>
</p>专业性的服务。有的ASP商提供垂直型的应用服务,针对某一特定行业提供应用服务。
飘飘悠悠 该用户已被删除
9#
发表于 2015-3-27 04:48:37 | 只看该作者
如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。
乐观 该用户已被删除
8#
发表于 2015-3-19 02:22:27 | 只看该作者
代码逻辑混乱,难于管理:由于ASP是脚本语言混合html编程,所以你很难看清代码的逻辑关系,并且随着程序的复杂性增加,使得代码的管理十分困难,甚至超出一个程序员所能达到的管理能力,从而造成出错或这样那样的问题。
简单生活 该用户已被删除
7#
发表于 2015-3-11 16:52:02 | 只看该作者
下载一个源代码,然后再下载一个VBScript帮助,在源代码中遇到不认识的函数或是其他什么程序,都可以查帮助进行解决,这样学习效率很高。
只想知道 该用户已被删除
6#
发表于 2015-3-4 04:39:10 | 只看该作者
Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write
冷月葬花魂 该用户已被删除
5#
发表于 2015-2-14 04:53:52 | 只看该作者
ASP(ActiveServerPages)是Microsfot公司1996年11月推出的WEB应用程序开发技术,它既不是一种程序语言,也不是一种开发工具,而是一种技术框架,不须使用微软的产品就能编写它的代码,能产生和执行动态、交互式、高效率的站占服务器的应用程序。
愤怒的大鸟 该用户已被删除
地板
发表于 2015-2-5 23:23:25 | 只看该作者
最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。
透明 该用户已被删除
板凳
发表于 2015-1-29 06:37:37 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
兰色精灵 该用户已被删除
沙发
发表于 2015-1-20 09:47:10 | 只看该作者
他的语法和设计思路和VB完全相同,导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是,相当多的ASP教程混合了Javascript,VBscript等等脚本语言,搞的初学者。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-24 01:37

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表