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

vbÁ¬½ÓACCESSÊý¾Ý¿âinsert intoÎÊÌâ

´úÂëÈçÏ£º
Dim cn1 As New ADODB.Connection
Dim rs1 As New ADODB.Recordset
Dim dogid As Integer
            dogid = 11602
            cn1.Open "Driver={Microsoft Access Driver (*.mdb)};
            DBQ=e:\data\data\hf2.mdb"
            Set rs1 = cn1.Execute("insert into ¼ÓÃܹ·ID values (dogid,0,'""','""')")
            cn1.Close
³öÏֵĴíÎóÊDzÎÊý²»×㣬ÆÚ´ýÊÇÒ»
´Ë ¼ÓÃܹ·ID ±í ǰÁ½¸öÁÐÊÇÊýÖµÐÍ£¬ºóÁ½¸öÊÇÕûÐÍ

ΪºÎ»á³öÏÖÕâÖÖ´íÎóÄØ
Set rs1 = cn1.Execute("insert into ¼ÓÃܹ·ID values (dogid,0,'""','""')")
ɾ³ýSet rs1 =

Â¥ÉϵÄÐֵܣ¬»¹ÊDz»ÐУ¬²»¹ý»¹ÊÇллÄãµÄ°ïæÁË

¡­¡­Äã°ÑinsertÓï¾äǰºóµÄÀ¨ºÅÈ¥µô

ÕûÐÍÒ²ÊÇÊýÖµÐÍ.
Set rs1 = cn1.Execute("insert into ¼ÓÃܹ·ID(×Ö¶ÎÃû1,×Ö¶ÎÃû2) values (dogid,0)")


ÕûÐͲ»ÓÃ'' ,ÉÏÃæµÄд·¨ÊÇÖ¸¶¨ÐèҪдÈëµÄ×Ö¶Î.·ñÔò¿ÉÒÔд:
Set rs1 = cn1.Execute("insert into ¼ÓÃܹ·ID values (dogid,0,0,0)")
ÕâÑùºóÃæÄ¬ÈÏÌí¼ÓÁËÁ½¸ö0



http://download.csdn.net/source/1498324


Ïà¹ØÎÊ´ð£º

ÇëºÃÐÄÈ˰ïÎÒ°ÑVBÔ´ÂëתΪVB.NET~

Ï£Íû´ó¼ÒÄܹ»°ïÎÒÏÂ.¸ÐлÁË..


Ô´Âë´«ÔÚ´óÃ×ÅÌ VB6 µÄÔ´Âë http://www.damipan.com/file/3wNoKLW.html

תΪVB.NETÔ´Âë.

СµÜÍêÈ«ÊÇÐÂÊÖ ²»¶®µÄ˵.Âé·³¸÷λ°ïæһÏÂ

ÎÒµÄEMAILÊÇ:4452 ......

¡¾¼±Çó¡¿VBÖÐʹÓÃWScriptµ÷ÓÃÍⲿÃüÁî - VB / »ù´¡Àà

ÔÚÏÂÊÇvbµÄÐÂÊÖ£¬Ïëд¶Î³ÌÐò£¬ÔÚvbÖУ¬Ê¹ÓÃwscriptµ÷ÓÃһЩÍⲿµÄÃüÁµ«ÊdzÌÐòÖ´ÐÐÒ»Ö±ÓдíÎó£¬Çë¸÷λ¸ßÊÖ°ïæ½â´ðÏ£¬Ð»Ð»¡£
´úÂëÈçÏ£º
VB code:

Private Function getFile_CMD(filename, filepath) As Bo ......

vb Å£Âð - Web ¿ª·¢ / vbScript

vbÊDz»ÊǺÜÅ£°¡ ÔõôÄÇô¶àµÄ²¡¶¾¶¼ÊÇvb×öµÄ°¡ c#Ðв»ÐУ¿
c#ÔÚXPÔËÐв»ÁË£¬³ý·ÇÈñðÈËÏÈ×°ÉÏ.net.
VBÏà¶ÔÓÚC,C++,ASMµÈµÈ£¬¾ÖÏÞÐÔ´ó¶àÁË¡£

±ðÔÙ˵ʲôÓïÑÔ²»ÈçʲôÓïÑԵϰÁË£¬Ö»ÓÐÄã²»»áÓûòÓÃ×Ų»Ë³ÊÖµÄÓ ......

ACCESSÎı¾¿ò³¤¶ÈÊǶàÉÙ? - ÆäËûÊý¾Ý¿â¿ª·¢ / Access

ÎÒ½«Ò»¶Î4000À´×ÖµÄÎı¾¸³Öµ¸øËüÔõô¾Í³ö´íÁË,ÌáʾÔËÐÐʱ´íÎó2176 Õâ¸öÊôÐÔµÄÉèÖÃֵ̫³¤?
ÄãÊÇÔõÑù¸³ÖµµÄ£¿

²âÊÔÁËһϣ¬Óñ¸×¢×ֶθøÎı¾¿ò×öÊý¾ÝÔ´£¬Ã»ÓÐÌáʾÉèÖÃֵ̫³¤,14893×Ö·û

ÒýÓÃÎÒ½«Ò»¶Î4000À´×ÖµÄÎ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ