Visual Basic

ViÕt øng dông
INDEXER
Xem bai viet bang font Unicode

thdang@tlnet.com.vn

[ ThiÕt kÕ giao diÖn ]  [ ViÕt Code ]

ViÕt ch­¬ng tr×nh t¹o trang Web chøa c¸c Link ®Õn c¸c tËp tin trong mét th­ môc ®­îc ng­êi dïng chØ ®Þnh.

Ch­¬ng tr×nh nµy cã c¸c chøc n¨ng vµ ho¹t ®éng tæng qu¸t nh­ sau:

Chän th­ môc

Läc file

Cho ng­êi dïng chän file

§Æt tªn tiªu ®Ò cho trang Web

§Æt dßng v¨n b¶n ë ®Çu danh s¸ch

§Æt dßng v¨n b¶n ë cuèi danh s¸ch

Sau khi t¹o xong cho phÐp xem b»ng IE hay Notepad

Chän canh lÒ: Tr¸i, ph¶i , gi÷a.

Khi b¹n nhÊn nót "T¹o" trong Form chÝnh (Form1) ch­¬ng tr×nh sÏ t¹o mét trang Web chøa c¸c link ®Õn c¸c file trong th­ môc, trang Web nµy ®­îc l­u vµo cïng th­ môc mµ b¹n chØ ®Þnh.

Mçi lÇn ng­êi dïng chØ ®Þnh th­ môc, ch­¬ng tr×nh sÏ tù ®éng ®iÒn ®­êng dÉn vµ tªn file (mÆc nhiªn lµ List_index.htm) vµo hép chän file name (Text1)

§Ó dÔ dµng trong viÖc chän lùa ta dïng thªm mét ListBox (List1) thÕ cho FileListBox (File1). B¹n nªn cho ListBox n»m ®Ì lªn ®èi t­îng File1 (hoÆc cho File1.Visible=False) v× ta chØ cÇn File1 ®Ó lÊy tªn c¸c tËp tin Add vµo List1 chí kh«ng dïng ®Õn.

Mét ComboBox (Combo1) ®Ó läc file theo tõng lo¹i file hoÆc tÊt c¶ (do ng­êi dïng tù chän hay gâ vµo).

§ång thêi cung cÊp thªm c¸c nót lÖnh: "Chän" chän tÊt c¶ c¸c tËp tin trong Listbox, "Kh«ng" bá chän tÊt c¶ c¸c tËp tin trong Listbox (b¹n còng cã thÓ chän b»ng c¸ch Check vµo tõng tªn file t­¬ng øng), "T¹o" nhÊn nót nµy ®Ó b¾t ®Çu t¹o trang Web, "Th«ng sè" nhÊn nót nµy ®Ó x¸c lËp thªm c¸c tïy chän cho trang Web, "Tho¸t" Tho¸t khái ch­¬ng tr×nh.

Ch­¬ng tr×nh mÉu

[ ThiÕt kÕ giao diÖn ]  [ ViÕt Code ]


chuÒ nhâòt, thaìng hai 03, 2002 05:50:58 CH
NguyÔn Hå Thiªn §¨ng


PcLeHoan 1996 - 2002
Mirror : http://www.pclehoan.com
Mirror : http://www.lehoanpc.net

Mirror : http://www.ktlehoan.com