asp classÀàÓ÷¨ASP¼¼Êõ
asp classÀàÓ÷¨
asp class
ÑϸñµØËµ£¬ASP ²¢²»ÊÇÒ»Ãűà³ÌÓïÑÔ£¬ËùÒÔ²»´æÔÚÀàÕâÒ»¸ÅÄÎÒÃÇÕâÀï˵ ASP ÀàÊÇÖ¸ ASP µÄ±à³ÌÓïÑÔ VBScript ÔÚ ASP ÀïÓ¦ÓÃʱµÄÀà¡£
ASP Àà±È½Ï¼òµ¥£¬Ëü²»¾ßÓÐÕæÕýÒâÒåÀàµÄ¼Ì³Ð¡¢ÖØÔصÈÌØÐÔ£¬¾¡¹ÜÈç´Ë£¬ËüÈÔÈ»ÊǷdz£ÓÐÓõģ¬Ëü½µµÍÁËÎÒÃDZà³ÌµÄ¸´ÔÓ¶È£¬Ê¹ÎÒÃǵijÌÐòÄ£¿é¸ü¼ÓºÏÀí¡£
ASP ÀàÖ§³Öʲô ASP Àà±È½Ï¼òµ¥£¬Ëü²»¾ßÓÐÕæÕýÒâÒåÀàµÄ¼Ì³Ð¡¢ÖØÔصÈÌØÐÔ¡£ËüÖ§³ÖÒÔÏÂÄÚÈÝ£º
¹«ÓгÉÔ±±äÁ¿¡¢Ë½ÓгÉÔ±±äÁ¿¡¢ÊôÐÔ
¹«ÓгÉÔ±º¯Êý¡¢Ë½ÓгÉÔ±º¯Êý
¹¹Ô캯Êý¡¢Îö¹¹º¯Êý
´´½¨ºÍʹÓÃÒ»¸ö×î¼òµ¥µÄ ASP Àà һЩ³õѧÕß²»Àí½âÀàºÍ¶ÔÏóµÄÇø±ð£¬´ò¸ö±È·½£¬ÀàºÃ±ÈÊÇͼֽ£¬¶ÔÏóºÃ±ÈÊǸù¾ÝÍ¼Ö½ÖÆ×÷³öµÄʵÎï¡£ ¸ÃʾÀý¸ø³öÁË ASP À༰¶ÔÏóµÄ¼òµ¥Ê¾Àý£¬¸ÃÀà½öº¬ÓÐÒ»¸ö³ÉÔ±º¯Êý£¬ÓÃÒÔ½âÊÍÀàµÄ»ù±¾¸ñʽ£¬²¢¸ø³ö´´½¨¡¢ÊͷŶÔÏóµÄ·½·¨¡£ ÏêϸÄÚÈÝ ASP Àà³ÉÔ±±äÁ¿¡¢³ÉÔ±º¯Êý¡¢¹¹ÔìÎö¹¹º¯Êý ÕâÊÇÒ»¸ö±È½ÏÍêÕûµÄÀི½â£¬ËùÓеĽ²½â¶¼ÓÐ×¢Ê͵ķ½Ê½Ð´ÔÚ³ÌÐòµÄÅԱߡ£ ͨ¹ýÔĶÁ±¾½Ú£¬¶Ô ASP ÀàÓÐÒ»¸ö½ÏÎªÈ«ÃæµÄÀí½â£¬¿ÉÒÔ½øÐÐ ASP ÀàÄ£¿éµÄ¿ª·¢¡£ ÏêϸÄÚÈÝ ASP ÀàÊôÐÔ ASP ÀàÊôÐÔÓë ASP À๫ÓгÉÔ±±äÁ¿Ïà±È¾ßÓÐÒÔÏÂÒ»Ð©ÌØµã¡£
¿ÉÒÔÔÚ¸³ÖµµÄͬʱִÐÐÆäËü¹¦ÄÜ
¿ÉÒÔÈ·¶¨¸³Öµ·¶Î§
¿ÉÒÔ½«É趨ֻ¶Á¡¢Ö»Ð´ÊôÐÔ
ËùÒÔ ASP ÀàÊôÐÔÒ²ÊDZȽϳ£ÓÃÇÒÖØÒªµÄ¡£ ÏêϸÄÚÈÝ ASP Àà×éºÏ ASP ÀàµÄ¹¦ÄÜʵÔÚÓÐÏÞ£¬ËùÒÔÓÐʱÎÒÃÇҪʵÏÖ¸´ÔӵŦÄÜ£¬Ö»ºÃÓÃ×éºÏÀ´ÊµÏÖ¡£
´´½¨Ò»¸ö×î¼òµ¥µÄ ASP Àà
class CFoo
sub PrintHello()
response.Write "Hello World!"
end sub
end class
¿ÉÒÔ¿´³ö£¬ASP ÀàµÄ»ù±¾½á¹¹ÊÇ£º
class ˈ̞
Àà´úÂë
end class
ʹÓÃÒ»¸ö×î¼òµ¥µÄ ASP Àà
dim obj
set obj = new CFoo 'ʹÓà set new ´´½¨¶ÔÏó£¬ÓÉÓÚ²»ÊÇ·þÎñÆ÷×é¼þ£¬ËùÒÔ²»ÄÜÓà server.CreateObject ´´½¨
call obj.PrintHello '¶ÔÏóÃû³Æºó¼Óµã£¬ÔÙ¸ú³ÉÔ±±äÁ¿¡¢ÊôÐÔ»òº¯Êý£¬±íʾµ÷ÓøöÔÏóµÄ³ÉÔ±±äÁ¿¡¢ÊôÐÔ»òº¯Êý£¬½«ÏÔʾ Hello World!
set obj = nothing 'ÊͷŶÔÏó
ASP ÀàÀï²»ÄÜÖØÔØ¹¹Ô캯Êý£¬ËùÒÔÎÒÃDz»ÄÜʹÓÃÀàËÆÓÚ set obj = new CFoo("param") µÄÓï¾äÀ´´´½¨Àà¡£
ASP ÀàµÄ¹¦ÄÜʵÔÚÓÐÏÞ£¬ËùÒÔÓÐʱÎÒÃÇҪʵÏÖ¸´ÔӵŦÄÜ£¬Ö»ºÃ
Ïà¹ØÎĵµ£º
×î½ü°ïÀÏʦ×öÒ»¸ö¹ú¼Ê»áÒéµÄÍøÕ¾£¬ÓÃasp×öµÄ£¬ËäÈ»ºÜ¼òµ¥£¬µ«ÅäÖõĹý³ÌÒ²ÓÐЩ¶«Î÷ÐèҪעÒâµÄ£¬·ñÔò¼ì²é²»³öÀ´£¬ºÜÀË·Ñʱ¼ä£¬×¢ÒâÊÂÏîÂÞÁÐÈçÏ£º
1. ÍøÕ¾µÄȨÏÞÉ趨£¬Ä¬ÈÏÇé¿öÏ£¬²»ÄÜ·ÃÎÊ“¸¸Îļþ¼Ð”£¬ÕâʱºòÐèÒªÔÚiisµÄaspÑ¡ÏîÖÐÉèÖ㬓´ò¿ª¹¦ÄÜ”->“ÆôÓø¸Â·¾¶”
2. Êý¾Ý¿âÓÐʱºò ......
<%
set conn= server.createobject("ADODB.connection")
conn.open "driver={sybase driver 10};"
"srvr=SYBASE;"
"UID=sa;"
"pwd=sybase;"
sql="select no from tab_st ......
Èç¹ûÔÚÒ»¸öÍøÕ¾µÄÒ³ÃæÖÐÏëµ÷ÓÃÆäËûÍøÕ¾Ò³ÃæÄÚÈÝ£¬Ö±½ÓÓÃһϴúÂë¾Íok£¬http://www.wanyusoft.com/index.asp Õâ¸ö·¾¶¾ÍÊÇËùÒªµ÷ÓõÄÒ³ÃæÂ·¾¶¡£
<%
response.write(getHTTPPage("http://www.wanyusoft.com/index.asp"))
function getHTTPPage(url)
dim http
set http=createobject("MSXML2.XMLHTTP")
Http.o ......
֮ǰд¹ýÒ»¸ö²»ÓÃÑéÖ¤ÂëµÄ·À×¢²á»ú·½·¨£¬Ê¹ÓÃÁ˽«½ü2Äêºó£¬³¹µ×ʧЧ¡£
½ñÌìżȻײ¼ûÒ»¸ö·ÀÖ¹¶ñÒâ×¢²áµÄ·½·¨£¬ÕýÔÚ˼¿¼ing¡£ÏȰѷ½·¨ÁÐÏ£º
»ñÈ¡¿Í»§¶ËÌá½»µÄÐÅÏ¢£»
½«ÐÅÏ¢´æÈë Session£»
Éú³ÉÒ»¸öËæ»úÊý£¨³ÆÎª ticket£©£»
½«Ëæ»úÊýÒ²´æÈë Session£»
Óà JavaScript µÄÐÎʽ½«Ëæ»úÊýÒÔÁ´½ÓµÄÐÎʽÊä³ö£¬²¢Ìáʾ¿Í»§µã»÷ÉÏÒ ......
Ò»¸öASPÌæ»»º¯ÊýimgÀïÃæ¶àÓàµÄ´úÂë
<%
Response.Write(Server.HTMLEncode(FixImg("<img onclick=""if(this.width>screen.width-461) window.open('qq/20082181405371.jpg');"" alt="""" border=""0"" src=""qq/20082181405371.jpg"" />")))
%>
<%
'¹¦ÄÜ:½«IMG´úÂë¸ñʽ»¯Îª<img src= ......