仓酷云

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

[学习教程] ASP教程之静态按钮天生器(下)

[复制链接]
小女巫 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:29:40 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

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

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

x
国内有些大的CRM厂商的ASP就写得不错.无论是概念还是它里面用JAVASCRIPT的能力.并不是说现在的程序员用了ASP.NET来写程序就可以说自己高档了因为内容超长,只好分2次贴出,以下为下半部分:
Images.length+=1;for(varb=Images.options.length-1;b>g;b--)
{Images.options[b].text=Images.options[b-1].text;}Images.options[g+1].text=Imagi[g+1].Name;CleanBoxes(window.document.mouseOverForm);}}}else
{if(Images.length!=0)
{varg=-1;varr=no_of_images;Imagi[r]=newImageObject(Imagi[r-1].Name,Imagi[r-1].OffSrcPro,Imagi[r-1].OffSrc,Imagi[r-1].OnSrcPro,Imagi[r-1].OnSrc,Imagi[r-1].Width,Imagi[r-1].Height,Imagi[r-1].Alt,Imagi[r-1].Border,Imagi[r-1].URL,Imagi[r-1].LinkTarget);for(varp=Imagi.length-2;p>g;p--)
{Imagi[p].Name=Imagi[p-1].Name;Imagi[p].OffSrcPro=Imagi[p-1].OffSrcPro;Imagi[p].OffSrc=Imagi[p-1].OffSrc;Imagi[p].OnSrcPro=Imagi[p-1].OnSrcPro;Imagi[p].OnSrc=Imagi[p-1].OnSrc;Imagi[p].Width=Imagi[p-1].Width;Imagi[p].Height=Imagi[p-1].Height;Imagi[p].Alt=Imagi[p-1].Alt;Imagi[p].Border=Imagi[p-1].Border;Imagi[p].URL=Imagi[p-1].URL;Imagi[p].LinkTarget=Imagi[p-1].LinkTarget;}
Imagi[g+1].URL=URLBox.value;Imagi[g+1].LinkTarget=TargetBox.value;Imagi[g+1].Name=NameBox.value;Imagi[g+1].OffSrcPro=HeadSrc1.value;Imagi[g+1].OnSrcPro=HeadSrc2.value;Imagi[g+1].OffSrc=SrcBox1.value;Imagi[g+1].OnSrc=SrcBox2.value;Imagi[g+1].Width=WidthBox.value;Imagi[g+1].Height=HeightBox.value;Imagi[g+1].Alt=AltBox.value;Imagi[g+1].Border=BorderBox.value;no_of_images++;
Images.length+=1;for(varb=Images.options.length-1;b>g;b--)
{Images.options[b].text=Images.options[b-1].text;}Images.options[g+1].text=Imagi[g+1].Name;CleanBoxes(window.document.mouseOverForm);}else
alert("短少项目!")
}}}functionCheckIt(array,string){if(array==null||array=="")
variable="";else
variable=string+array+""";returnvariable;}functiongenerateIt(){if(document.mouseOverForm.Images.length!=0){HeadCode="<SCRIPTLANGUAGE="Javascript">"+"<"+"!-"+"-Hide";HeadCode+="//http://www.njcatv.net/javascript/dai5.htm";HeadCode+="functionisCompatible()"+"{"+"varBrowserName=navigator.appName;"+"varBrowserVer=parseInt(navigator.appVersion);"+"varCompatible=(BrowserName=="Netscape"&&BrowserVer==3)||(BrowserName=="Netscape"||BrowserVer==4)||(BrowserName=="MicrosoftInternetExplorer"||BrowserVer==4)"+"returnCompatible;"+"}";HeadCode+="functionflipIt(img,tothis)"+"{"+"if(isCompatible())"+"{"+"img.src=tothis.src;"+"}"+"}";BodyCode="";for(varcount=0;count<Imagi.length;count++){varxName=Imagi[count].Name;varxNameOff=Imagi[count].OffSrcPro+Imagi[count].OffSrc;varxNameOn=Imagi[count].OnSrcPro+Imagi[count].OnSrc;varTarget=CheckIt(Imagi[count].LinkTarget,"TARGET="");varBorder=CheckIt(Imagi[count].Border,"BORDER="");varAlt=CheckIt(Imagi[count].Alt,"ALT="");varWidth=CheckIt(Imagi[count].Width,"WIDTH="");varHeight=CheckIt(Imagi[count].Height,"HEIGHT="");varMouseOver="onMouseOver="flipIt(document."+xName+","+xName+"On);"";
varMouseOut="onMouseOut="flipIt(document."+xName+","+xName+"Off);"";
HeadCode+=xName+"Off=newImage();";HeadCode+=xName+"Off.src="+"""+xNameOff+"";"+"";HeadCode+=xName+"On=newImage();";HeadCode+=xName+"On.src="+"""+xNameOn+"";"+"";BodyCode+="<AHREF=""+Imagi[count].URL+"""+Target+""+MouseOver+""+MouseOut+"><IMGSRC=""+xNameOff+""NAME=""+xName+"""+Border+Alt+Width+Height+"></A>";}HeadCode+="/"+"/EndHide-"+"->";Emulate=window.open("","CodeWindow","width=640,height=420,status=yes,resizable=yes,scrollbars=yes");Emulate.document.clear();Emulate.document.write(<html><head><title>Codegenerated</title></head><bodybgcolor="#ffffff"text="#000000"link="#000099"vlink="#663366"alink="#ff0000">);Emulate.document.write("<br><br><center><fontface="宋体">以下代码拷贝到<fontcolor="red">HEAD</font>标签间</font></center><formname="genCode"><center><textareacols=55rows=16name="Head"wrap="Virtual"></textarea><p><fontface="宋体">以下代码拷贝到<fontcolor="red">BODY</font>标签间</font><p><textareacols=55rows=16name="Body"wrap="Virtual"></textarea><p><inputtype="Button"value="Close"onClick="window.close();"></center></form><br>");Emulate.document.write(<br><hrwidth=610noshade></body></html>);
Emulate.document.genCode.Head.value=HeadCode;Emulate.document.genCode.Body.value=BodyCode;Emulate.document.close();}else
alert("Youhaventmadeanythingyet");
}
//EndHide-->
</script><title>NewPage1</title></head><body><tablewidth=610cellpadding=0cellspacing=0border=0><tr><tdalign=center><formname=mouseOverForm><tablecellspacing=0cellpadding=0border=1width=580><tr><tdbgcolor=royalblue><fontface="verdana,arial,helvetica"color=#ffffffsize=-1><b>Images</b></font></td><tdbgcolor=#ffcf1frowspan=6></td><tdrowspan=6valign=top><tablecellspacing=0cellpadding=0border=0><tr><tdbgcolor=royalblue><fontface="verdana,arial,helvetica"color=#ffffffsize=-1><b>MouseOutImageSource</b></font></td></tr><tr><td><table><tr><td><selectname=Header1><option>None</option><option>file:///</option><option>http://</option></select><br><inputtype=Textvalue=name=HeadSrc1size=8><inputtype=Textvalue=name=SrcBox1size=22onBlur=CheckAndChange(1);><inputtype=Buttonvalue="HardDrive"name=SrcBox1butonClick=PopDrive(1);><br><br></td></tr></table></td></tr><tr><tdbgcolor=royalblue><fontface="verdana,arial,helvetica"color=#ffffffsize=-1><b>MouseOverImageSource</b></font></td></tr><tr><td><table><tr><td><selectname=Header2><option>None</option><option>file:///</option><option>http://</option></select><br><inputtype=Textvalue=name=HeadSrc2size=8><inputtype=Textvalue=name=SrcBox2size=22onBlur=CheckAndChange(2);><inputtype=Buttonvalue="HardDrive"name=SrcBox2butonClick=PopDrive(2);><br><br></td></tr></table></td></tr><tr><tdbgcolor=royalblue><fontface="verdana,arial,helvetica"color=#ffffffsize=-1><b>ControlPanel</b></font></td></tr><tr><td><tablecellspacing=0cellpadding=0border=0><tr><td><inputtype=Buttonvalue="Addimage"name=InsertonClick=CheckAndChange(1);CheckAndChange(2);insertItem();></td><td><inputtype=Buttonvalue="Addimagebelow"name=InsertBelowonClick=InsertBelow();></td><td></tr><tr><td><inputtype=Buttonvalue="Updateimage"name=UpdateonClick=UpdateOption();></td><td><inputtype=Buttonvalue="Removeimage"name=RemoveonClick=removeIt();></td></tr><tr><td><inputtype=Buttonvalue="Cleanfields"name=CleanonClick=CleanBoxes(window.document.mouseOverForm)></td><td><inputtype=Buttonvalue="GenerateCode!"name=GenerateonClick=generateIt();></td></tr></table></td></tr></table></td></tr><tr><td><tablecellspacing=0cellpadding=5border=0><tr><td><selectwidth=240size=6onChange=checkAndShow()name=Images><option>Pleasebepatientwhileloading</select></td></tr></table></td></tr><tr><td><tablecellspacing=0cellpadding=5border=0><tr><td><fontface="helvetica,arial,sansserif"size=-1><b>Createtheimageasalinkto:</b></font><br><inputtype=Textvalue=http://name=URLBoxsize=34></td></tr></table></td></tr><tr><td><tablecellspacing=0cellpadding=5border=0><tr><td><fontface="helvetica,arial,sansserif"size=-1><b>Target</b><fontface="helvetica,arial,sansserif"size=-2><b>(forframesonly)</b></font><b>:</b></font><br><inputtype=Textvalue=name=TargetBoxsize=25></td></tr></table></td></tr><tr><tdbgcolor=royalblue><fontface="verdana,arial,helvetica"color=#ffffffsize=-1><b>Attributes</b></font></td></tr><tr><td><tablecellspacing=0cellpadding=5border=0><tr><td><fontface="helvetica,arial,sansserif"size=-1><b>Width:</b></font></td><td><inputtype=Textvalue=name=WidthBoxsize=4onBlur=isDigit(this)></td><td><fontface="helvetica,arial,sansserif"size=-1><b>Name:</b></font></td><td><inputtype=Textvalue=name=NameBoxsize=10></td></tr><tr><td><fontface="helvetica,arial,sansserif"size=-1><b>Height:</b></font></td><td><inputtype=Textvalue=name=HeightBoxsize=4onBlur=isDigit(this)></td><td><fontface="helvetica,arial,sansserif"size=-1><b>Alt:</b></font></td><td><inputtype=Textvalue=name=AltBoxsize=10></td></tr><tr><tdcolspan=2align=right><fontface="helvetica,arial,sansserif"size=-1><b>Border:</b></font></td><tdcolspan=2><inputtype=Textvalue=name=BorderBoxsize=5onBlur=isDigit(this)><p></td></tr></table></td></tr></table></td></form></tr></table><select><option>None%3</body></html>
只要你想学,就没什么优缺点,上面那位大哥已经把网上的评论说了,但我认为想学哪个都一样,不然它就不可能在当今时代数字艺术方面存活到今天
活着的死人 该用户已被删除
沙发
发表于 2015-1-19 15:13:46 | 只看该作者
完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。
冷月葬花魂 该用户已被删除
板凳
发表于 2015-1-25 09:09:00 | 只看该作者
Server:这个表示的服务器,操作服务器的一些东西使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件
金色的骷髅 该用户已被删除
地板
发表于 2015-2-2 18:43:52 | 只看该作者
他的语法和设计思路和VB完全相同,导致很多ASP的书都留一句“相关内容请参考VB的相关教材....”更糟糕的是,相当多的ASP教程混合了Javascript,VBscript等等脚本语言,搞的初学者。
莫相离 该用户已被删除
5#
发表于 2015-2-8 04:20:37 | 只看该作者
掌握asp的特性而且一定要知道为什么。
乐观 该用户已被删除
6#
发表于 2015-2-24 06:07:41 | 只看该作者
代码逻辑混乱,难于管理:由于ASP是脚本语言混合html编程,所以你很难看清代码的逻辑关系,并且随着程序的复杂性增加,使得代码的管理十分困难,甚至超出一个程序员所能达到的管理能力,从而造成出错或这样那样的问题。
小魔女 该用户已被删除
7#
发表于 2015-3-7 11:41:43 | 只看该作者
以HTML语言整合(HTML负责界面上,ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。
分手快乐 该用户已被删除
8#
发表于 2015-3-15 04:12:17 | 只看该作者
ASP.Net和ASP的最大区别在于编程思维的转换,而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程,而那些脚本语言属于弱类型、面向结构的编程语言,而非面向对象,这就明显产生以下几个问题:
精灵巫婆 该用户已被删除
9#
发表于 2015-3-21 18:08:24 | 只看该作者
运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

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

GMT+8, 2024-12-24 10:52

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

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