小女巫 发表于 2015-1-16 22:29:40

ASP教程之静态按钮天生器(下)

国内有些大的CRM厂商的ASP就写得不错.无论是概念还是它里面用JAVASCRIPT的能力.并不是说现在的程序员用了ASP.NET来写程序就可以说自己高档了因为内容超长,只好分2次贴出,以下为下半部分:
Images.length+=1;for(varb=Images.options.length-1;b>g;b--)
{Images.options.text=Images.options.text;}Images.options.text=Imagi.Name;CleanBoxes(window.document.mouseOverForm);}}}else
{if(Images.length!=0)
{varg=-1;varr=no_of_images;Imagi=newImageObject(Imagi.Name,Imagi.OffSrcPro,Imagi.OffSrc,Imagi.OnSrcPro,Imagi.OnSrc,Imagi.Width,Imagi.Height,Imagi.Alt,Imagi.Border,Imagi.URL,Imagi.LinkTarget);for(varp=Imagi.length-2;p>g;p--)
{Imagi.Name=Imagi.Name;Imagi.OffSrcPro=Imagi.OffSrcPro;Imagi.OffSrc=Imagi.OffSrc;Imagi.OnSrcPro=Imagi.OnSrcPro;Imagi.OnSrc=Imagi.OnSrc;Imagi.Width=Imagi.Width;Imagi.Height=Imagi.Height;Imagi.Alt=Imagi.Alt;Imagi.Border=Imagi.Border;Imagi.URL=Imagi.URL;Imagi.LinkTarget=Imagi.LinkTarget;}
Imagi.URL=URLBox.value;Imagi.LinkTarget=TargetBox.value;Imagi.Name=NameBox.value;Imagi.OffSrcPro=HeadSrc1.value;Imagi.OnSrcPro=HeadSrc2.value;Imagi.OffSrc=SrcBox1.value;Imagi.OnSrc=SrcBox2.value;Imagi.Width=WidthBox.value;Imagi.Height=HeightBox.value;Imagi.Alt=AltBox.value;Imagi.Border=BorderBox.value;no_of_images++;
Images.length+=1;for(varb=Images.options.length-1;b>g;b--)
{Images.options.text=Images.options.text;}Images.options.text=Imagi.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.Name;varxNameOff=Imagi.OffSrcPro+Imagi.OffSrc;varxNameOn=Imagi.OnSrcPro+Imagi.OnSrc;varTarget=CheckIt(Imagi.LinkTarget,"TARGET="");varBorder=CheckIt(Imagi.Border,"BORDER="");varAlt=CheckIt(Imagi.Alt,"ALT="");varWidth=CheckIt(Imagi.Width,"WIDTH="");varHeight=CheckIt(Imagi.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.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等等脚本语言,搞的初学者。

莫相离 发表于 2015-2-8 04:20:37

掌握asp的特性而且一定要知道为什么。

乐观 发表于 2015-2-24 06:07:41

代码逻辑混乱,难于管理:由于ASP是脚本语言混合html编程,所以你很难看清代码的逻辑关系,并且随着程序的复杂性增加,使得代码的管理十分困难,甚至超出一个程序员所能达到的管理能力,从而造成出错或这样那样的问题。

小魔女 发表于 2015-3-7 11:41:43

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

分手快乐 发表于 2015-3-15 04:12:17

ASP.Net和ASP的最大区别在于编程思维的转换,而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程,而那些脚本语言属于弱类型、面向结构的编程语言,而非面向对象,这就明显产生以下几个问题:

精灵巫婆 发表于 2015-3-21 18:08:24

运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。
页: [1]
查看完整版本: ASP教程之静态按钮天生器(下)