[ASPÖÐʹÓÃÈý²ã¼Ü¹¹] 4.aspÖÐʹÓÃÀà
ClassÔÚaspÖгöÏÖÂù¾ÃÁË,²»¹ýºÜÉÙ¿´µ½Ëü±»ÓÃÔÚ´úÂëµ±ÖÐ.¼ÇµÃµ±ÄêÑо¿¶¯ÍøµÄÂÛ̳³ÌÐòµÄʱºò,¿´µ½ÁËһЩÀý×Ó,µ±Ê±»¹¾õµÃ±È½Ï³ç°Ý----¶Ô×Ô¼ºÃ»ÓùýµÄ¼¼Êõ.
µ«ÊÇClassÕâ¸ö¶«Î÷,Èç¹ûÓõñȽÏÉÙ,³äÆäÁ¿Ö»ÊÇÒ»¸ö´óÄ£¿éµÄ°ü×°·½Ê½. Ö»Óдó¹æÄ£µØÓÃËüÀ´¿ª·¢,²ÅÄÜÏÔ³öËü¶ÔÏîÄ¿¹ÜÀíµÄÓÅÔ½ÐÔÀ´. ËùνµÄÒâ´óÀûÃæÌõʽ´úÂë,¾Í»áºÍasp»®ÉϾäºÅÁË.
ÎÒÏëĿǰ´ó²¿·ÖµÄasp³ÌÐòÔ±Öж¼»¹Ã»ÓÐʹÓÃClass,¶ÔÃæÏò¶ÔÏóÕâÖÖÊõÓïÒ²²»Ì«ÊìϤ,ÐèÒªÔö¼ÓÒ»ÕÂÀ´ÃèÊöÒ»ÏÂaspÖеÄÀàËù°çÑݵĽÇÉ«,ÒÔ¼°ºÍÃæÏò¶ÔÏó±à³ÌµÄ¹ØÏµ.
ÎÒ»áÓþ¡Á¿Ìù½ü±à³Ìʵ¼ùµÄ·½Ê½À´½âÊÍClassµÄÔËÓÃ,µ«²»»á¶¯ÓÃÃæÏò¶ÔÏóÖ®ÀàµÄ³éÏóÊõÓï,Èç¹ûÄãÓÐÁËÃæÏò¶ÔÏóµÄÀíÂÛ»ù´¡,¿ÉÒÔ°ÑÕâЩÄÚÈÝÓëÆä½áºÏ,»òÕß»áÓÐÄã¶ÀÌØµÄ·¢ÏÖ. Èç¹ûûÓÐÁ˽â¹ýÃæÏò¶ÔÏó,Ò²²»ÓÃÒ»¶¨ÒªÖªµÀÃæÏò¶ÔÏóÊÇÔõô»ØÊÂ,ֻҪͨ¹ýÔĶÁ±¾ÏµÁеÄÎÄÕÂ,ѧ»áÁËClassµÄÓ÷¨,²¢ÇÒÔÚ±à³ÌÖÐÒÀ¾ÝÁËÆäÖеķ¨Ôò,¾Í¿ÉÒÔ×ã¹»½¡×³µØ¹ÜÀíÄãµÄasp´úÂëÁË.
ClassÏ൱ÓÚÒ»¸ö°ü×°Ïä,Ëü¿ÉÒÔ½«±äÁ¿ºÍº¯Êý°ü×°ÆðÀ´,ÐγÉÒ»¸öÕûÌå,±¾ÏµÁÐÎÄÕÂÒª½²µÄËùÓÐÄÚÈÝ,¿ÉÒÔ˵Êǰü×°µÄѧÎÊ.
ÀýÈç,ÎÒÃÇ¿ÉÒÔ°ü×°Ò»¸öÊýѧ´¦ÀíµÄClass,²¢Ê¹ÓÃËü:
1 Class Con_Math
2 Public A
3 Public B
4 Private intC
5
6 Public Function Sum()
7 intC = cint(A) + cint(B)
8 Sum = intC
9 End Function
10 End Class
11
12 set math = new Con_Math
13 math.A = 19
14 math.B = 80
15
Ïà¹ØÎĵµ£º
ÔÚASPÏîÄ¿ÖУ¬µ±³öÏÖ“×¢²á±í´íÎó£¬ÎÞ·¨Ð´Èë”´íÎóµÄʱºò£¬±¾ÈËÓöµ½µÄ´íÎóÔÒòÓÐÁ½¸ö£¬ÔÚÕâÀï¸ú´ó¼Ò¹²Í¬Ì½ÌÖÏ¡£
µÚÒ»¸öÊÇ£¬µçÄÔµÄÎļþϵͳʽNTFS¸ñʽµÄ£¬ÕâÑùµÄ»°Êý¾Ý¿âûÓÐȨÏÞ¡£
½â¾ö·½·¨£ºÔÚÊý¾Ý¿âËùÔÚÎļþ¼ÐÉÏ£¨»ò±ÈËü¸ßµÄÈÎÒ ......
ÓÉÓÚ¹¤×÷ÔÒò£¬±ÊÕß¾³£ÐèҪʹÓÃAsp¿ª·¢Ò»Ð©Ð¡ÐͳÌÐò£¬ÔÚWindows 2000Ï¿ª·¢ºÍʹÓÃÏà¹Ø³ÌÐòʱһ°ã²»»á³öÏÖʲôÎÊÌ⣬²¢ÇÒÒ²ºÜÈÝÒ×½â¾ö¡£µ«ÊÇÓÉÓÚ±ÊÕßΪÁ˳¢ÏÊʹÓÃÁËWindows 2003 Serverʱ£¬¿ª·¢Ïà¹Ø³ÌÐò¾Í³öÏÖÁËÕâÑùÄÇÑùµÄÎÊÌ⣬±ÈÈçä¯ÀÀÆ÷²»ÄÜÏÔʾÏêϸ³ö´íÐÅÏ¢£¬Á¬½ÓAccessʱ×ÜÊDZ¨´íµÈ£¬ÈñÊÕ߿಻¿°ÑÔ¡£ÔÚ¶à´Îʵ¼ùºÍ²é¿´ ......
ASPÓëJSPµÄ±È½Ï
¡¡¡¡´Ó΢ÈíÍÆ³öÁËASP(ActiveServerPage)ºó£¬ËüÒÔÆäÇ¿´óµÄ¹¦ÄÜ£¬¼òµ¥Ò×ѧµÄÌØµã¶øÊܵ½¹ã´óWEB¿ª·¢ÈËÔ±µÄϲ»¶¡£µ«ÊÇËüÈ´ÓÐ΢Èí²úÆ·µÄͨ²¡,Ö»ÄÜÔÚWindowsƽ̨ÏÂʹÓã¬ËäÈ»Ëü¿ÉÒÔͨ¹ýÔö¼Ó¿Ø¼þ¶øÔÚLINUXÏÂʹÓ㬵«ÊÇÆä¹¦ÄÜ×îÇ¿´óµÄDCOM¿Ø¼þÈ´²»ÄÜʹÓ᣶øSUN¹«Ë¾ÔÚJAVAµÄ»ù´¡Ï¿ª·¢³öµÄJSP(Java
ServerPages)Ê ......
µÚ¶þ¸öÖØÒªµÄÀà,×÷ÓÃÊÇÀàÐÍת»»,ÀàÃûCon_Convert.ÔÚÒ³Ãæ´úÂëµÄ¿ªÍ·ÊµÀý»¯,¶ÔÏóÃûΪConvert,½èÓÃÁË.netµÄÀàÐÍת»»µÄ¶ÔÏóÃû³Æ.
Õâ¸öÀàÖ÷Òª½â¾öÔÚÀàÐÍת»»Ê±,Èç¹ûÖ±½ÓʹÓÃÀàÐÍת»»º¯Êý,»áÒòΪ±äÁ¿Îª¿Õ»òÕ߸ñʽ²»¶Ô¶øµ¼Ö³ÌÐò±¨´í,¶øÕâÖÖ±¨´ ......
<%
Response.Buffer = true
Response.Clear
dim url
Dim fso,fl,flsize
dim Dname
Dim objStream,ContentType,flName,isre,url1
Dim strFileName
strFileName=replace(replace(Request("file"),"\",""),"/","") '´«²Î
strFileName="/files/"&strFileName ' ¸Ä³ÉÄãÄãÎļþµÄ´æ ......