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

Çë½ÌÒ»¸öVBÎÊÌâ.°³ÊÇСϺ£¬åÇÊÇ´óϺ£¡

±¾µØÎªACCESS±í£¬·þÎñÆ÷ΪSQL±í¡£
'´ò¿ª±¾µØÊý¾Ý¿â
  Set rs = New ADODB.Recordset
      sql = "select * from HistTable22"
         
      rs.Open sql, cn, adOpenStatic, adLockOptimistic
      rs.MoveFirst
             
'´ò¿ª·þÎñÆ÷Êý¾Ý¿â
  Set rssql = New ADODB.Recordset
      str = "SELECT * from f1"
      rssql.Open str, cnnsql, adOpenDynamic, adLockOptimistic
     
      For i = 1 To rs.RecordCount Step 1
        rssql.AddNew
          For j = 0 To 3 Step 1
            rssql.Fields(j) = rs.Fields(j)
          Next j
        rssql.Update

        rs.Move i
      Next i

Çë´óϺÃǶÔÕÕÉÏÃæ³ÌÐò£¬¼ÙÉèrs¼Ç¼¼¯ÓÐ100Ìõ¼Ç¼£¬°³ÎʵÄÊÇ£ºÓÃrs.move i »òrs.movenextΪʲô²»ÄÜÈÃrs¼Ç¼×Ô¼ºÍùÏÂÒÆ£¬ÖðÌõ´«µ½·þÎñÆ÷±íÖÐÄØ£¿£¨Ä¿Ç°¹ÊÕÏÏÖÏó£ºÔÚ´«ËÍÁ˵ÚÒ»Ìõ¼Ç¼ºó£¬´«Ë͵ڶþÌõ¼Ç¼ÔËÐе½rssql.updateʱ³öÏÖÎ¥·´ÁËPrimary KeyÔ¼Êø£¬²»ÄܲåÈëÖØ¸´µÄÎÊÌ⣩
±¾µØÎªACCESS±í£¬·þÎñÆ÷ΪSQL±í¡£
'´ò¿ª±¾µØÊý¾Ý¿â
  Set rs = New ADODB.Recordset
     


Ïà¹ØÎÊ´ð£º

Çó½ÌÏÂVBÈçºÎ¸øD3DÓÎϷдÆÁ - VB / API

ÏëÔÚwarcraft3Àï½øÐÐдÆÁ²Ù×÷¡¾Èç¶Ôսƽ̨ÖеÄʤ¸ºÌáʾÐÅÏ¢¡¿£¬Ð§¹û¾ÍÏñÓÎϷƽ̨ÖÐÒ»Ñù£¬ÎÒÊÔ¹ýÔÚÒ»´°¿ÚÖÐдÈëÎÄ×Ö£¬È»ºóÒ»Ö±Èô°¿ÚÇ¿ÖÆ×îǰ£¬ËäÈ»ÄÜʵÏÖÎÄ×ÖÏÔʾ£¬µ«ÊÇÎÄ×ֻ᲻¶ÏÉÁ˸£¬¶øÇÒÓв»È·¶¨BUG£¬Í¨¹ýÂÛ̳ËÑ ......

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

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

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

ÓÃVB±àдTXTÎĵµ - .NET¼¼Êõ / VB.NET

ÎÒÊÇVBµÄгÉÔ±£¬ÏÖÔÚÏëÓÃVBÀ´×ö¸öTXTÎĵµ£¬Çë´ó¼Ò¸øÎÒ´úÂë¼°½éÉÜÒ»ÏÂÏàÓ¦µÄ¿Ø¼þ£¡
·Ç³£¸Ðл£¡£¡£¡£¡£¡£¡
¿ÉÒÔÓÃһЩOFFICE¿Ø¼þ

googleÉÏÕÒһϰÉ,VBдÈëTXT,ºÜ¶àÑùÀý´úÂëµÄ

Ö±½Óµ÷²éÓþͿÉÒÔÁË

Ãæ¶ÔÃÀÅ® ......

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

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

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

vb¿ÉÒÔÕâÑù×ö²»£¿ - VB / ·Ç¼¼ÊõÀà

¿ÉÒÔÂð
ºÃÆæ¹ÖµÄÌâÄ¿¶î£¡£¡

¿ÉÒÔ¸æËßÎÒÃÇÄãµ½µ×ÏëÎÊʲô £¿

2·Ö¸øÎҵϰ¾Í¿ÉÒÔ¡£

........................¿ÉÒÔÂð

¿ÉÒÔ!


  ¾À½á£¬

29. vb¿ÉÒÔÕâÑù×ö²»£¿ ( H )¡Ì
 A. ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ