Lập trình Ứng dụng Web với công nghệ ASP

Më ®Çu Trë vÒ qu¸ khø, c¸ch mµ c¸c øng dông phÇn mÒm ®îc ¸p dông vµo thùc tÕ lµ lËp tr×nh ra nã trong mét ng«n ng÷ lËp tr×nh, sau ®ã ®îc cµi vµo c¸c m¸y kh¸c nhau. ChØ cã mét phiªn b¶n nh vËy ®îc ch¹y trong cïng mét thêi ®iÓm. §ã lµ m« h×nh mét øng dông mang tÝnh tËp trung. Ngµy nay, khi c«ng nghÖ Internet ra ®êi tõ lóc cßn s¬ khai cho ®Õn khi ®ang ë giai ®o¹n ®Ønh ®iÓm th× c¸c øng dông phÇn mÒm cã mét quan niÖm kh¸c. §Æc biÖt lµ khi c«ng nghÖ Web ®îc coi lµ “søc sèng” cña m¹ng Internet ra ®êi th× viÖc sö dông c¸c øng dông ph©n t¸n díi d¹ng øng dông Web ®îc coi lµ phæ biÕn. Nã cho phÐp cïng mét øng dông cã thÓ ®îc sö dông bëi nhiÒu ngêi trong cïng mét thêi ®iÓm. Vµ do ®ã dÉn tíi mét xu thÕ hiÖn nay lµ “H·y ngåi ë nhµ, víi chiÕc m¸y tÝnh cña b¹n, ®Ó giao tiÕp víi thÕ giíi bªn ngoµi qua c¸c trang Web”. Qua ®ã ta thÊy r»ng, Web vµ Internet lµ hai thuËt ng÷ kh¸ phæ biÕn hiÖn nay. B¾t ®Çu tõ c¸c trang Web tÜnh HTML cho phÐp hiÓn thÞ c¸c th«ng tin cè ®Þnh th× tiÕp tôc n¶y sinh vÊn ®Ò ph¶i t¹o ra ®îc c¸c trang Web biÓu thÞ c¸c th«ng tin thay ®æi theo yªu cÇu cña ngêi dïng. §ã lµ c¸c trang Web ®éng. Bµi viÕt nµy ®îc chia lµm 4 phÇn : PhÇn 1 : Tæng quan vÒ Web. PhÇn 2 : ASP. PhÇn 3 : X©y dùng øng dông Web VTV1. PhÇn 4 : Listing. PhÇn 1 : Tæng Quan vÒ Web I. Web lµ g× ? Web lµ c«ng nghÖ trªn Internet cho phÐp thÓ hiÖn c¸c th«ng tin mét c¸ch sinh ®éng, gÇn gòi víi con ngêi h¬n trªn 1 trang th«ng tin gäi lµ trang Web. Trang Web ®îc tr×nh bµy trªn c¸c bé duyÖt Web (Browser) trªn c¸c m¸y Client. Trang Web chÝnh lµ c¸c file v¨n b¶n d¹ng Text ®îc cÊu tróc ho¸ theo ng«n ng÷ HTML. II. HTML lµ g× ? HTML lµ ng«n ng÷ ®¸nh dÊu siªu v¨n b¶n (HyperText Markup Language). HTML ®îc cÊu t¹o bëi c¸c thÎ gäi lµ c¸c Tab. C¸c thÎ nµy lµ c¸c tõ ®îc ®¸nh trong 2 dÊu . CÊu tróc chung 1 trang Web HTML : Tiªu ®Ò cña trang Web III. C¸c lo¹i trang Web : C¸c trang Web ®îc ph©n thµnh 3 lo¹i nh sau : · Trang Web tÜnh (trang .HTML) : Lµ trang ®· ®îc lu tr÷ trªn Server tõ tríc. Khi cã yªu cÇu tõ phÝa Client, trang nµy sÏ ®îc t¶i vÒ Client vµ ®îc hiÓn thÞ trªn Server . · Trang Web ®éng (DHTML : Dynamic HTML ): Lµ c¸c file ch¬ng tr×nh ®îc ch¹y trªn Server. Sau khi ch¹y xong, Server sÏ sinh ra trang Web tÜnh HTML t¬ng øng víi ch¬ng tr×nh ®ã vµ göi vÒ Client. Nh vËy ®Õn ®©y ta cã thÓ coi r»ng trang Web ®éng lµ c¸c trang Web HTML kh«ng tån t¹i tõ tríc trªn Server mµ tr¸i l¹i tuú theo yªu cÇu tõ phÝa Client, trang Web nµy sÏ ®îc t¹o ra sau khi ch¹y ch¬ng tr×nh trªn Server . C¸c trang Web ®éng cã thÓ t¹o ra b»ng c¸c c¸ch sau : + CGI (Common Gateway Interface) : Lµ chuÈn chung phæ biÕn nhÊt ®Ó c¸c browser cã thÓ ch¹y 1 ch¬ng tr×nh trªn server, cã thÓ cµi ®Æt trªn mäi hÖ ®iÒu hµnh vµ Web server. Nã lµ tªn gäi ®Ó chØ c¸c ch¬ng tr×nh ch¹y trªn Server mµ ®Çu vµo lµ c¸c th«ng tin tõ phÝa Client, ®Çu ra lµ c¸c trang HTML ®Ó göi vÓ phÝa Client. CGI cho c¸ch t¹o c¸c trang Web ®éng 1 c¸ch “ch¾c ch¾n” nhÊt trong ®ã mäi hÖ ®iÒu hµnh ®Òu hç trî. Tuy nhiªn viÖc dïng CGI lµ kh¸ phøc t¹p. + ASP (Active Server Page) : Lµ thµnh phÇn ®îc cµi thªm vµo Web Server ®Ó t¹o ra c¸c trang Web ®éng. §Çu vµo lµ c¸c file.asp cã cÊu tróc t¬ng tù nh trang .HTML nhng cã thªm c¸c lÖnh Script ®Ó t¹o ra trang Web. C¸c file .asp nµy ®îc ch¹y trªn Server. §Ó ch¹y ®îc ASP b¾t buéc ph¶i cµi nã trªn c¸c Web Server cña MicroSoft. Ta sÏ nãi râ thªm vÒ ASP ë phÇn sau. + JSP (Java Server Page) : Lµ c«ng nghÖ míi c«ng bè cña riªng h·ng Sun MicroSystem. Nã lµ sù tÝch hîp cña c¶ Web Server vµ JSP ®Ó t¹o trang Web ®éng. Nã kh«ng phô thuéc vµo møc Web Server vµ hÖ ®iÒu hµnh ë díi. · Trang Web cã nhóng c¸c Applet vµ Script : Lµ c¸c trang HTML cã nhóng c¸c c©u lÖnh Script vµ Applet ®îc viÕt b»ng ng«n ng÷ JavaScript , VBScript , Perl ...C¸c Applet nµy ®îc ch¹y bªn phÝa Client. §Ó c¸c Applet , Script cã thÓ ch¹y ®îc , c¸c Browser ph¶i hç trî c¸c bé dÞch ng«n ng÷ Script, Applet t¬ng øng. C¸c lo¹i Applet ch¹y trªn Browser (Client) : + Java Applet : X©y dùng dùa trªn ng«n ng÷ Java. + ActiveX : Lµ c¸c ®èi tîng díi d¹ng modul cã s½n. ChØ ch¹y trªn hÖ ®iÒu hµnh Window. + Plug-In : C¸c thµnh phÇn bæ trî cho c¸c chøc n¨ng míi cña Browser. IV. M« h×nh giao t¸c Client/Server : Tríc hÕt ta cÇn hiÓu c¸c kh¸i niÖm vÒ Client, Server : Server : + §îi c¸c yªu cÇu (Request) tõ c¸c m¸y Client. Ph©n tÝch c¸c yªu cÇu ®ã ®Ó xö lý. Göi kÕt qu¶ tr¶ lêi (Response)vÒ Client. + Chøa c¸c phÇn mÒm Web Server, Database Server... + Lu«n trong tr¹ng th¸i On-Line. Client : + T¹o c¸c kÕt nèi. Göi c¸c yªu cÇu ®Õn m¸y Server vµ chê nhËn kÕt qu¶ tõ Server. + Chøa c¸c phÇn mÒm Web Browser nh IE, Nestcape... + Cã thÓ ë tr¹ng th¸i BËt/T¾t bÊt cø lóc nµo. Nh vËy m« h×nh mét giao t¸c gi÷a Client vµ Server nh sau : §Çu tiªn, Client göi mét yªu cÇu kÕt nèi ®Õn Server theo ®Þa chØ URL mµ nã cÇn kÕt nèi. Server t¬ng øng sÏ “nghe” vµ kiÓm tra xem c¸c kªnh kÕt nèi dµnh cho nã cã kªnh nµo rçi kh«ng. NÕu cã kªnh rçi nã sÏ thiÕt lËp liªn kÕt vµ göi kÕt qu¶ tr¶ vÒ Client t¬ng øng. §èi víi c¸c yªu cÇu kh¸c hoÆc d÷ liÖu mµ Client göi tíi, Server sÏ lµm t¬ng tù. M« h×nh Client/Server trong ASP : PhÇn 2 : ASP (Active Server Page) I.ASP lµ g× ? ASP lµ mét thµnh phÇn ®îc cµi t¹i Web Server ®Ó hç trî viÖc dïng c¸c trang Web ®éng .asp. øng dông ASP lµ tËp hîp c¸c trang ASP vµ c¸c thµnh phÇn ActiveX. C¸c file ASP (.asp) gåm phÇn v¨n b¶n (text), HTML vµ c¸c lÖnh script. Mçi khi browser göi yªu cÇu vÒ mét file .asp cho Web Server, ASP xö lý phÇn lÖnh script råi tr¶ l¹i cho browser kÕt qu¶ lµ mét trang HTML. C¸c script lµ c¸c c©u lÖnh cã nghÜa b»ng bÊt cø ng«n ng÷ scripting nµo, ®îc ng¨n c¸ch víi phÇn HTML b»ng cÆp dÊu . Ng«n ng÷ t¹o kÞch b¶n (scripting language) Scripting lµ ng«n ng÷ kÕt hîp gi÷a HTML vµ c¸c ng«n ng÷ lËp tr×nh nh J, C++, VB.. Trong ®ã: + HTML t¹o v¨n b¶n vµ kÕt nèi c¸c trang. + C¸c ng«n ng÷ lËp tr×nh t¹o ra nh÷ng lÖnh phøc t¹p cho m¸y tÝnh. - Ng«n ng÷ scripting chñ yÕu t¹o ra c¸c v¨n b¶n d¹ng text vµ gäi ®Õn c¸c component ®· ®îc biªn dÞch s½n viÕt b»ng c¸c ng«n ng÷ lËp tr×nh trªn. - Server míi lµ bªn ®äc vµ xö lý c¸c script trong ASP, v× thÕ chØ c¸c Web server míi cÇn hç trî cho ng«n ng÷ nµy. - Client browser chØ cÇn ®a ra yªu cÇu vÒ c¸c trang .asp vµ chê ®îc ®¸p øng, nã kh«ng cÇn hç trî c¸c ng«n ng÷ scripting. - Scripting engine: lµ ch¬ng tr×nh xö lý c¸c lÖnh viÕt b»ng ng«n ng÷ scripting nµo ®ã. ASP cã hai scripting engine lµ VBScript vµJScript. - Ng«n ng÷ scripting c¬ së: lµ ng«n ng÷ ®îc mÆc ®Þnh ®Ó xö lý c¸c lÖnh trong cÆp dÊu . §iÒu nµy phô thuéc vµo tõng server cô thÓ. Cã thÓ ®Æt ng«n ng÷ cho mét trang hoÆc tÊt c¶ c¸c trang cña øng dông. VÝ dô nh - §Æt ng«n ng÷ cho mét trang: b»ng chØ dÉn II. C¸c ®Æc ®iÓm cña ASP : · Cã thÓ thùc hiÖn ®îc c¸c Script trªn Web Server mµ kh«ng ph¶i thùc hiÖn trªn c¸c Browser. Do ®ã Browser kh«ng hç trî c¸c ng«n ng÷ Script vÉn cã thÓ thùc hiÖn ®îc c¸c Script b»ng c¸ch göi c¸c yªu cÇu cho Server thùc hiÖn. §iÒu nµy t¹o ra mét ®Æc tÝnh tiÖn lîi mµ Ýt ai nhËn ra lµ cã thÓ thùc hiÖn ®îc c¸c trang Web sinh ®éng mµ cã thÓ dïng c¸c tr×nh duyÖt Web ®¬n gi¶n kh«ng cã hç trî c¸c Script. · C¸c file .asp chØ ®îc lu tr÷ trªn Web Server mµ kh«ng tån t¹i ë m¸y Client. · C¸c trang Web .asp sÏ ®îc thùc hiÖn (biªn dÞch) bëi thµnh phÇn Script Engine cµi trong ASP ë Web Server. · ViÖc sö dông ASP cho phÐp t¹o ra c¸c øng dông Web m¹nh vµ linh ho¹t, cã giao diÖn th©n thiÖn víi ngêi dïng qua trang HTML. III. C¸c thµnh phÇn cña ASP : Thµnh phÇn chñ yÕu trong ASP ®îc gäi lµ ActiveX Server Components ActiveX lµ mét c«ng cô m¹nh ®Ó x©y dùng c¸c øng dông Web v× nã cung cÊp c¸c ®èi tîng ®Ó b¹n cã thÓ sö dông trong script cña m×nh. B¹n cã thÓ x©y dùng c¸c øng dông Web ®éng, cã t¬ng t¸c nhê sö dông c¸c component do server cung cÊp. C¸c component nµy ®îc sö dông nh lµ nh÷ng khèi c¬ b¶n trong script hoÆc c¸c øng dông Web, chóng thùc hiÖn nh÷ng c«ng viÖc th«ng thêng ®Ó b¹n kh«ng cÇn ph¶i viÕt l¹i m· lÖnh n÷a. Component lµ m· lÖnh ®· ®îc dÞch, s½n sµng ®Ó ch¹y, ®îc ®Æt díi d¹ng c¸c file .dll hoÆc .exe. B¹n cã thÓ dïng c¸c component do ASP cung cÊp hoÆc lÊy tõ mét nguån nµo ®ã hay t¹o ra c¸c component cho m×nh. ASP cung cÊp 5 thµnh phÇn (components) c¬ b¶n: Advertisement Rotator T¹o ®èi t Browser Capabilities T¹o ®èi tîng BrowserType quyÕt ®Þnh kiÓu, kh¶ n¨ng vµ version cña mçi browser truy nhËp ®Õn Web site cña b¹n Database Access Cung cÊp c¸c truy nhËp ®Õn c¬ së d÷ liÖu sö dông ActiveX Data Objects (ADO). Content Linking T¹o ®èi tîng NextLink ®Ó t¹o ra b¶ng néi dung cña trang Web vµ nèi chóng l¹i nh lµ c¸c trang trong mét quyÓn s¸ch. File Access Cung cÊp c¸c truy nhËp ®Õn c¸c file. IV. B¹n ph¶i lµm g× ®Ó t¹o ®îc trang Web ®éng .asp : - L¾p ®Æt hÖ thèng phÇn cøng vÒ m¹ng (nèi c¸c m¸y, cµi ®Æt hÖ ®iÒu hµnh..) · Cµi ®Æt phÇn mÒm Web Server trªn m¸y mµ b¹n ®Þnh chän lµm Server. C¸c phÇn mÒm phæ biÕn cã thÓ lµ : + IIS (Internet Information Server) : Web Server ( cña Microsoft ) dïng ®Ó cµi trªn Window NT. Thêng ®îc cµi trong thùc tÕ ®Ó lµm Web Server trªn Internet. + PWS (Personal Web Server) : Web Server ( cña Microsoft ) dïng ®Ó cµi trªn Window 9x. Thêng ®îc cµi trªn m¸y tÝnh c¸ nh©n ®¬n lÎ ®Ó test øng dông Web .asp. Nã m« pháng m« h×nh Client/Server trªn mét m¸y ®¬n lÎ. + FTS (FastTrack Server) : Web Server cña Netscape. Còng thêng ®îc cµi trong thùc tÕ ®Ó lµm Web Server trªn Internet. + Ngoµi ra cßn mét sè c¸c phÇn mÒm Web Server kh¸c. · Cµi ASP §Õn ®©y b¹n hoµn toµn cã thÓ t¹o c¸c trang ASP b»ng mét bé so¹n th¶o v¨n b¶n bÊt kú. Sau ®ã copy file .asp võa so¹n th¶o vµo th môc InetPub hoÆc WebShare trªn Server. Tuy nhiªn ®Ó cã thÓ t¹o ra c¸c øng dông Web cã trang Web ®éng .asp mét c¸ch dÔ dµng vµ chuyªn nghiÖp h¬n, b¹n nªn cµi thªm c¸c thµnh phÇn sau : · FrontPage Server Extensions : Cho phÐp copy c¸c file HTML vµ ASP tõ th môc project (cña FrontPage hoÆc Visual Interdev) vµo th môc InetPub hoÆc WebShare cña Web Server mét c¸ch tù ®éng. · Visual InterDev (trong bé Visual Studio cña MicroSoft): PhÇn mÒm cho phÐp t¹o øng dông Web ASP mét c¸ch dÔ dµng. · FrontPage : PhÇn mÒm so¹n th¶o trang HTML. V. C¬ chÕ Submit mét form trong ASP : Submit lµ thuËt ng÷ ®Ó chØ mét giai ®o¹n khi Web Browser trªn m¸y Client göi c¸c th«ng tin mµ ngêi sö dông ®iÒn trong mét form vÒ Web Server. VÝ dô khi ngêi sö dông ®iÒn th«ng tin trong mét Text Box vµ bÊm Submit. Nh vËy cã thÓ hiÓu theo c¸ch kh¸c lµ khi Browser göi yªu cÇu (Request) ®Õn Server th× gäi lµ Submit. Cã 2 method Submit : Get vµ Post. + Post Method : Th«ng tin sÏ n»m trong phÇn th©n cña form göi vÒ Server. Bªn Server dïng Collection Form cña ®èi tîng Request ®Ó lÊy gi¸ trÞ nµy. + Get Method : Th«ng tin sÏ ®îc g¾n vµo sau ®Þa chØ URL ®îc ng¨n c¸ch bëi dÊu ? díi d¹ng mét chuçi Query. D¹ng cña chuçi nµy nh sau : §Þa_ChØ_URL?Name1=Value1,.. Bªn Server dïng Collection QueryString cña ®èi tîng Request ®Ó lÊy gi¸ trÞ nµy. Mét qu¸ tr×nh truyÒn th«ng tin vÒ Server (Submit) thêng kÌm theo ®Þa chØ cña trang ASP sÏ tiÕp nhËn th«ng tin ®ã, xö lý th«ng tin ®ã vµ t¹o ra kÕt qu¶ lµ trang HTML göi tr¶ vÒ Browser. §Þa chØ cña trang ASP nµy ®îc x¸c ®Þnh bëi thuéc tÝnh Action trong Tab Form cña trang HTML chøa form. VÝ dô : Cã mét trang HTML nh sau : Khi form ®îc Submit vÒ Server nã sÏ göi gi¸ trÞ cña NAME1 ®ång thêi link tíi trang ReceiveParam.asp. Do ®ã ®Ó lÊy ®îc gi¸ trÞ cña NAME1 bªn Server ta ph¶i t¹o mét file ReceiveParam.asp vµ dïng Collection Form cña ®èi tîng Request nh sau : <% Set ReceivedValue = Request.Form(“NAME1”) %> §Ó Test kÕt qu¶ ë trªn h·y thùc hiÖn c¸c bíc sau trªn m¸y ®· cµi Web Server vµ ASP : · T¹o mét th môc Test trong InetPub(hoÆc WebShare víi PWS)\WWWROOT · T¹o mét file Test.htm trong th môc Test vµ Paste nh÷ng dßng trang HTML ë trªn vµo file ®ã. · T¹o mét file ReceiveParam.asp trong th môc Test vµ Paste nh÷ng dßng trang ASP ë trªn vµo file ®ã. · Trªn Browser bÊt kú ®¸nh ®Þa chØ URL : VI. Mét vÝ dô ®¬n gi¶n vÒ trang Web ®éng ASP : H·y trë l¹i víi mét vÝ dô ®¬n gi¶n vÒ trang HTML “Hello World” : Hello World ! NÕu chØ hiÓn thÞ 1 dßng nh vËy th× sÏ kh«ng cã vÊn ®Ò x¶y ra. Tuy nhiªn gi¶ sö ta ph¶i tr×nh bµy dßng Hello World ! trªn nhiÒu dßng vµ víi cì ch÷ to dÇn. C¸ch lµm ë ®©y lµ viÕt lÆp l¹i 2 dßng , Hello World víi i t¨ng dÇn. §iÒu ®ã sÏ lµm cho viÖc ®¸nh trë nªn cång kÒnh vµ “con ong ch¨m chØ”, kh«ng tËn dông ®îc c¸c chøc n¨ng lÆp cña 1 ng«n ng÷ lËp tr×nh b×nh thêng. Gi¶i ph¸p ë ®©y lµ x©y dùng 1 trang Web ®éng .asp nh sau : > Hello World ! ChØ víi 8 dßng ë trªn ta cã thÓ thay cho 24 dßng trong trang Web tÜnh HTML. BÝ quyÕt lµ giao cho Server thùc hiÖn c¸c lÖnh trªn ®Ó nã t¹o ra 24 dßng HTML vµ göi vÒ Client (yªu cÇu trang .asp ë trªn). PhÇn 3 : X©y dùng øng dông Web VTV1. I.Yªu cÇu vÒ øng dông Web : · Dùa trªn m« h×nh øng dông Web Client/Server. · Truy cËp ®îc c¬ së d÷ liÖu tõ xa trªn m¸y Server. · óng dông Web ®éng dïng c«ng nghÖ ASP. II.Giíi thiÖu vÒ trang Web VTV01 : VTV01 lµ trang Web cho phÐp qu¶n lý vµ theo dâi lÞch ph¸t sãng cña kªnh VTV1 §µi TruyÒn H×nh ViÖt Nam. Nã cã c¸c chøc n¨ng chÝnh sau : + Theo dâi lÞch ph¸t sãng. + CËp nhËt, söa ®æi c¸c ch¬ng tr×nh ®· lªn kÕ ho¹ch tõ tríc. + Lªn kÕ ho¹ch c¸c ch¬ng tr×nh míi. + B¸o c¸o ch¬ng tr×nh ®· lªn kÕ ho¹ch theo tõng th¸ng. VTV01 ®îc x©y dùng trªn nÒn m¹ng LAN cña c«ng ty FPT. PhÇn mÒm lµ IIS cña MicroSoft vµ hÖ ®iÒu hµnh Window NT. VTV01 dïng thµnh phÇn Database Access cña ASP ®Ó truy cËp c¬ së d÷ liÖu VTV.mdb ®îc t¹o trªn Access 97. Ngoµi ra cã 2 ng«n ng÷ Script ®îc dïng trong øng dông lµ VBScript ®Ó truy vÊn c¬ së d÷ liÖu vµ JavaScript ®Ó thùc hiÖn c¸c kÕt qu¶ b¸o c¸o in ra... III. C¬ së d÷ liÖu cña trang Web VTV1 : VTV01 cã 1 file c¬ së d÷ liÖu duy nhÊt lµ VTV.mdb ®îc t¹o ra trªn Access. Nã gåm 2 b¶ng cã cÊu tróc nh sau : · B¶ng LÞch : Field Name Data Type Description 1 b¶n ghi trong b¶ng ID AutoNumber 2 Ngay Date/Time Ngay phat song 4/24/99 GioPhut Date/Time Gio phat song 11:30 The_Loai Text The loai chuong trinh Ho¹t h×nh Ten_Chuong_Trinh Text Ten chuong trinh Phim ho¹t h×nh WaltDisney Bien_Tap Text Ten nguoi bien tap Dhh Bien_Dich Text Ten nguoi bien dich neu co Haidh Thoi_Luong Number So phut phat song 20 Vung_SX Text Vung san xuat V2 He_So_Qui_Doi Number He so qui doi 2 Thu_Lao_BT Number Thu lao cho BT 0 Thu_Lao_DD Number Thu lao cho DD 0 Thu_Lao_QP Number Thu lao cho QP 0 Thu_Lao_CTV Number Thu lao cho CTV 0 · B¶ng The_Loai : Field Name Data Type Description BG1 BG2 BG3 BG4 BG5 BG6 ID Auto Number 1 2 3 4 5 6 The_Loai Text The loai chuong trinh TG§V VQTG PKH Phim Tµi LiÖu Ho¹t H×nh T¹p ChÝ Quan hÖ gi÷a 2 b¶ng : IV. C¸c trang Web trong VTV01 : - Default.htm : Trang Web mÆc ®Þnh t¬ng øng víi ®Þa chØ URL : Lµ trang t¹o ra 3 frame ®Ó hiÓn thÞ cïng 1 lóc 3 trang Web kh¸c nhau. · Global.asa (File Active Server Application): Lµ file kh«ng bao gåm nh÷ng néi dung göi vÒ phÝa Client. Nã lµ file lùa chän cho phÐp khai b¸o c¸c ®èi tîng ë møc phiªn vµ møc øng dông ®Ó dïng trong øng dông Web ASP. Nã lu tr÷ c¸c th«ng tin vÒ c¸c sù kiÖn vµ c¸c ®èi tîng ®îc sö dông mét c¸ch toµn côc trong øng dông. §îc lu tr÷ trong th môc gèc cña øng dông Web vµ mçi øng dông chØ cã duy nhÊt mét file Global.asa. Trong øng dông VTV01 c¸c ®èi tîng møc phiªn dïng Database Access ®îc khai b¸o ë ®©y. Trong th môc (Folder) Code : · About.htm : Trang Web giíi thiÖu. §îc hiÓn thÞ lóc ®Çu trong Default.htm. · Header.htm : Trang Web ¶nh cña VTV1 vµ FPT. HiÓn thÞ trªn phÇn ®Çu trang. · LeftBat.htm : Trang Web link ®Õn c¸c trang ®éng .asp kh¸c. HiÓn thÞ ë khung bªn tr¸i. · ScheduleInit.asp : Tr×nh bµy form ®Ó User nhËp th«ng tin vÒ th¸ng cÇn xem lÞch ph¸t sãng. · Schedule.asp : VÏ lÞch ph¸t sãng t¬ng øng víi th¸ng mµ User yªu cÇu. · ListOne.asp : HiÓn thÞ néi dung mét ch¬ng tr×nh. · UpdateElm.asp : Tr×nh bµy form ®Ó söa ®æi néi dung mét ch¬ng tr×nh. · UpdateAsp.asp : Thùc hiÖn viÖc cËp nhËt c¬ së d÷ liÖu vµ tr×nh bµy kÕt qu¶ thay ®æi néi dung ch¬ng tr×nh. · DeleteAsp.asp : Xo¸ mét ch¬ng tr×nh khái c¬ së d÷ liÖu vµ tr×nh bµy kÕt qu¶ xo¸. · Input.asp : Tr×nh bµy form ®Ó t¹o mét ch¬ng tr×nh míi. · InputAsp.asp : Thùc hiÖn viÖc thªm mét ch¬ng tr×nh míi vµo c¬ së d÷ liÖu vµ tr×nh bµy kÕt qu¶ thªm. · MonthReport.asp : Tr×nh bµy form ®Ó nhËp th«ng tin vÒ th¸ng cÇn b¸o c¸o. · BKTTCT.asp : VÏ b¸o c¸o c¸c ch¬ng tr×nh trong mét th¸ng theo mÉu cña §µi TruyÒn H×nh ViÖt Nam. Trong th môc (Folder) Inc : - FieldNull.inc : File include trong BKTTCT.asp. Chøa c¸c hµm chuyÓn ®æi ngµy giê.. V. S¬ ®å liªn kÕt gi÷a c¸c trang Web trong VTV01 : VI. NhËn xÐt : øng dông ®îc cµi ®Æt trªn nÒn Web Server : MicroSoft Internet Information Server vµ hÖ ®iÒu hµnh Window NT 4.0. Nh×n chung ®· ®¶m b¶o ®îc c¸c yªu cÇu ®Ò ra ë trªn. Tuy nhiªn cßn mét sè h¹n chÕ lµ cha cã kh¶ n¨ng kiÓm tra lçi th«ng tin nhËp vµ kh¶ n¨ng t¬ng thÝch víi c¸c Web Server vµ hÖ ®iÒu hµnh kh¸c lµ cha ®îc ®¶m b¶o. PhÇn 4 : Listing · Global.asa : 'You can add special event handlers in this file that will get run automatically when 'special Active Server Pages events occur. To create these handlers, just create a 'subroutine with a name from the list below that corresponds to the event you want to 'use. For example, to create an event handler for Session_OnStart, you would put the 'following code into this file (without the comments): 'Sub Session_OnStart '**Put your code here ** 'End Sub 'EventName Description 'Session_OnStart Runs the first time a user runs any page in your application 'Session_OnEnd Runs when a user's session times out or quits your application 'Application_OnStart Runs once when the first page of your application is run for the first time by any user 'Application_OnEnd Runs once when the web server shuts down Sub Application_OnStart '==Visual InterDev Generated - startspan== '--Project Data Connection Application("Connection_ConnectionString") = "DSN=VTV;DBQ=D:\PROJECTS\vtv\Database\vtv.mdb;DriverId=25;FIL=MS Access;MaxBufferSize=512;PageTimeout=5;" Application("Connection_ConnectionTimeout") = 15 Application("Connection_CommandTimeout") = 30 Application("Connection_CursorLocation") = 3 Application("Connection_RuntimeUserName") = "" Application("Connection_RuntimePassword") = "" '-- Project Data Environment 'Set DE = Server.CreateObject("DERuntime.DERuntime") 'Application("DE") = DE.Load(Server.MapPath("Global.ASA"), "_private/DataEnvironment/DataEnvironment.asa") '==Visual InterDev Generated - endspan== End Sub function Session_OnStart() { //Create ADO Object Session("objConnection") = new ActiveXObject("ADODB.Connection"); Session("objConnection").ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=VTV;DriverId=25;FIL=MS Access;MaxBufferSize=512;PageTimeout=5;"; Session("objConnection").ConnectionTimeOut = 30; Session("objConnection").open(); } · Default.htm : VTV Program <frame name="banner" scrolling="no" marginwidth="0" marginheight="0" noresize target="contents" src="Code/Header.htm"> <frame name="contents" target="main" src="Code/LeftBar.htm" marginwidth="0" marginheight="0" scrolling="no"> This page uses frames, but your browser doesn't support them. · About.htm : Document Title   VTV - ver 1.0 B¶n quyÒn cña C«ng ty FPT   VTV lµ ch¬ng tr×nh cho phÐp c¸c c¸n bé cña ®µi tryÒn h×nh qu¶n lý vµ theo dâi lÞch ph¸t sãng cña ®µi. Ch¬ng tr×nh gåm c¸c chøc n¨ng chÝnh sau:  <font color="Blue">Xem lÞch : Theo dâi lÞch ph¸t sãng  <font color="Blue">Ch¬ng tr×nh míi : NhËp c¸c ch¬ng tr×nh s