Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

VB ×ÊÁϵ¼³ö

Ôںܶà VB µÄ×ÊÁÏ¿âÊé¼®ÖУ¬¶¼»áºÜÍêÕûµÄÌáµ½£ºÈçºÎÓÉÆäËûÖÖÀàµÄÎļþÖн«×ÊÁϵ¼Èë×ÊÁϿ⣬µ«ÊÇÈ´ºÜÉÙÓÐÊéÌáµ½£ºÈçºÎ½«×ÊÁÏ¿âÖеÄ×ÊÁÏ£¬µ¼³öµ½¸÷ÖÖ²»Í¬µÄÎļþÀàÐ͵ÄÎļþÖУ¬Á¬ VB µÄ Help ÖÐÒ²ÊÇÕâÑù£¡
»òÐíÊÇ´ó¼Ò¶¼ÈÏΪ×ÊÁÏ¿âÖ÷ÌâµÄÖØµãÊÇÔÚ×ÊÁϿⱾÉí°É£¡
µ«ÊÇ£¬ÔÚʵ¼ÊµÄ×ÊÁÏ¿â³ÌÐòÔËÓÃÖУ¬È´³£³£ÐèÒª½«×ÊÁϿ⵼³öµ½¸÷ÖÖ²»Í¬µÄÎļþÀàÐ͵ÄÎļþÖУ¬ÕâЩÎļþ¿ÉÄÜÊÇ DBaseÎļþ¡¢ÎÄ×ÖÎļþ (.Txt)¡¢Excel Îļþ¡¢Html Îļþ¡¢Access Îļþ»òÆäËûÀàÐ͵Ä×ÊÁÏ¿âÎļþ (ODBC)...µÈ¡£
ÔÚ±¾×¨ÌâÖУ¬¿¼Âǵ½²¢²»ÊÇÿһ¸öÈ˶¼ÓÐ Oracle »ò SQL Server µÄ»·¾³£¬ÎªÁËÈôó¼Ò¶¼Äܹ»Êµ×÷£¬ÎÒÃǽ«ÒÔ Access ×ÊÁÏ¿âÀ´×÷Á·Ï°£¬¶øÁ·Ï°µÄÎļþҲʹÓà VB ±¾ÉíÌṩµÄ Biblio.mdb (λÓÚ¸÷°æ±¾ VB µÄĿ¼ÏÂ)¡£
Ô¤¼ÆÒªÁ·Ï°µ¼³öµÄÎļþÀàÐÍÓÐÎåÖÖ£ºDBaseÎļþ¡¢ÎÄ×ÖÎļþ (.Txt)¡¢Html Îļþ¡¢Excel Îļþ¡¢Access Îļþ¡£³ýÁËÕâÎåÖÖÖ®Í⣬ÏÂÃæµÄÓï·¨¿ÉÒÔ½«×ÊÁÏ¿âÖ®×ÊÁϵ¼³öµ½ÈÎÒ»ÖÖ VB Ö§Ô®µÄ×ÊÁÏ¿â»òÎļþÖС£
ÔÚÁ·Ï°Ö®Ç°£¬Òª½«µ¼³öÎļþµÄ SQL Óï·¨ÏÈ˵Ã÷һϣº
SELECT Table.Fields INTO [dbms type;DATABASE=path].[unqualified filename] from [Table or Tables]
SELECT Table.Fields INTO [×ÊÁÏ¿âÖÖÀà;DATABASE=×ÊÁϿⷾ¶].[×ÊÁÏ¿âÎļþÃû³Æ] from [Table or Tables]
ÖÁÓÚ¡¾×ÊÁÏ¿âÖÖÀà¡¿¼°¡¾×ÊÁϿⷾ¶¡¿£¬ÊÓ×ÊÁÏ¿â»òÎļþÀàÐÍÖ®²»Í¬¶øÒ죬Ïê¼û¡¾×¢Ò»¡¿¡£
Èç¹ûÉÏÃæËµµÄ¶¼Çå³þÁË£¬ÄÇÎÒÃÇÒª¿ªÊ¼ÕâÒ»¸öÁ·Ï°ÁË£¡
ÔÚ Form ÉÏ·ÅÖÃÒ»¸ö CommandButton£¬ÔÚ¡¾×¨°¸¡¿¡¾É趨ÒýÓÃÏîÄ¿¡¿ÖмÓÈë Microsoft DAO 3.51
Object Library£¬ÎÒÃǽ«Ê¹Óà Biblio.mdb µÄ authors Table£¬ÔÚ Command1_Click
ÖмÓÈëÒÔϳÌÐòÂ룺
Dim db As Database
Set db = Workspaces(0).OpenDatabase(App.Path & "\biblio.mdb")
'db.execute "SELECT Table.Fields INTO [dbms type;DATABASE=path].[unqualified filename] from [Table or Tables]"
ÔÚÒÔÉϳÌÐòÖУ¬db.execute Ö¸ÁîÐÐÖ®Ö¸ÁîÒÀ×ÊÁÏ¿â»òÎļþµÄÖÖÀà˵Ã÷ÈçÏ£º
Ò»¡¢DBaseÎļþ
SQL Óï·¨£ºSELECT * INTO [dBase III;DATABASE=×ÊÁϿⷾ¶].[dbaseÎļþÃû³Æ] from [authors]
db.Execute "SELECT * INTO [dBase III;DATABASE=C:\test].[authors.DBF] from [authors]"
×¢ÒâÊÂÏ
1¡¢authors.DBF ÊÂÏȲ»¿É´æÔÚ£¬·ñÔò»á²úÉú´íÎó£¡
2¡¢ÈôÄúûÓÐ Dbase£¬Äú¿ÉÒÔʹÓà Access À´Á¬½áÕâ¸ö Table£¬ÒÔ±ã¹Û²ì½á¹û£¡
¶þ¡¢Îı¾Îļþ


Ïà¹ØÎĵµ£º

ÀûÓÃreplace º¯Êý ÔÚvbÖÐʵÏÖ Ïû³ý¿ÕÐÐ


ÕâÀïÊÇ ÀûÓÃreplace º¯Êý ÔÚvbÖÐʵÏÖ Ïû³ý¿ÕÐеÄÒ»¸ö³ÌÐò
ÕâÀïµÄÈÝÆ÷ÊÇrichtext
¿ÉÒÔÀ©³äµ½ÆäËûÈÝÆ÷ ºÍÆäËû×Ö·û ÓÃÓÚ±àд²éÕÒÌæ»»¹¦ÄÜ
'--------------------------------------------------------------------------------------------
' Ïû³ý¿ÕÐÐ , ÀûÓÃinstrº¯Êý, ËÑË÷Îı¾ÀïµÄvbcrlf(»Ø³µ + »»ÐÐ), Á½¸ö»Ø³µÌæ»» ......

VB´´½¨ACCESSÊý¾Ý¿âÈ«½â

VB´´½¨ACCESSÊý¾Ý¿âÈ«½â ¶¯Ì¬´´½¨Êý¾Ý¿â¡¢´´½¨±í£¬´´½¨¼Ç¼ ADO¡¢ADOX2009Äê04ÔÂ20ÈÕ ÐÇÆÚÒ» 10:17ÕªÒª£º ±¾ÎIJûÊöÁËÔÚVB³ÌÐòÖÐÀûÓÃADO¶ÔÏó¶¯Ì¬´´½¨Êý¾Ý¿âºÍÊý¾Ý±íµÄ·½·¨£¬ÕâЩ·½·¨ÔÚ¿ª·¢VBÊý¾Ý¿âÓ¦ÓóÌÐòÖкÜÓÐʵÓüÛÖµ£¬Ëü¿ÉÒÔÌá¸ßÊý¾Ý¿â³ÌÐòÁé»îÐÔ¡£
¡¡¡¡¹Ø¼ü´Ê£ºÊý¾Ý¿â¡¢Êý¾Ý±í¡¢ADO¡¢ADOX
¡¡¡¡1: ÎÊÌâµÄÌá³ö
¡¡¡¡Ô ......

VBÖд¦Àí¼ÓÁËÃÜÂëµÄMDBÎļþ

µ±MDB Îļþ¼ÓÁËÃÜÂ룬ֱ½ÓÓÉ   Access   ´òÓ¡MDBÎļþʱ£¬»á³öÏÖÃÜÂë¶Ô»°¿ò£¬Ñ¯ÎÊÃÜÂë¡£µ«ÊÇÈôÒªÓÉ   VB   ³ÌÐòÖдòÓ¡£¬±Ø須¸ü¸Ä   VB³ÌÐòÖдò¿ªMDBÎļþµÄÖ¸Á·ñÔò»á³öÏÖ´íÎóÐÅÏ¢£¡ÒÔÏÂÕë¶Ô¸÷ÖÖÇé¿ö£¬·Ö別¼ÓÒÔ˵Ã÷£º  
   
  1¡¢   ʹÓà   D ......

ÓÃVB Winsock¿Ø¼þ´´½¨TCP/IP¿Í»§»ú/·þÎñÆ÷³ÌÐò


ת×Ô£ºhttp://www.52arm.com/Article_Show.asp?ArticleID=186
 
×÷Õߣºweidian    ---±¾Õ¾Ô­´´    µã»÷Êý£º4721    ·¢±íʱ¼ä£º2008-5-7    ±à¼­£ºsanzang
 
Winsock¿Ø¼þ½¨Á¢ÔÚTCP¡¢UDPЭÒéµÄ»ù´¡ÉÏ£¬Íê³ÉÓëÔ¶³Ì¼ÆËã»úµÄ ......

VbÖд°Ìå×Ô¶¨Òå×ø±ê


¿ªÊ¼Ê¹ÓÃvbµÄʱºòϲ»¶ÓÃÊÖ»­³öÄǸö¿Ø¼þµÄλÖÃ.È»ºóÒ»¸öÒ»¸öµÄÍ϶¯,Ò»µãÒ»µãµÄÒÆ¶¯.Ö±µ½¸Ð¾õÂúÒâÁËΪֹ.Èç¹ûÊǿؼþ¶àÁËÕâ¸ö¾ÍºÜÂé·³ÁË
Ò»²»Ð¡ÐÄ¿ÉÄܻὫı¸ö¿Ø¼þÍϵ½Ò»±ßÈ¥
ËùÒÔ,ÎÒÃÇÔÚÒÔºóµÄ×÷Æ·ÖÐ
¾¡Á¿Ê¹ÓôúÂëÀ´¶¨Òå¿Ø¼þλÖÃ,,ÒªÁé»îµÄÕÆÎÕ×ø±êλÖÃ.,¿ÉÒÔʹÓÃ×Ô¶¨Òå×ø±ê.ʹÓÃÏñËØÀ´¸üºÃµÄÀ´·ÖÇøÏÔʾ¿Ø¼þ.
 
& ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ