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

¹ØÓÚvbÄ£¿éº¯ÊýµÄµ÷Óã¬Çë¸ßÊÖ½â´ð

Çë¿´¿´ÒÔϵ¼³öÎı¾ÎļþµÄÄ£¿éº¯Êý£¬ÎÒÓ¦¸ÃÔõôÔÚ°´Å¥µã»÷ʼþÖÐʵÏÖµ÷Óá£

Option Explicit

Public Function TabintoTxt(objConn As Object, TableName As String, Optional TextFileName As String)
        Dim rs As New ADODB.Recordset
        Set rs = New ADODB.Recordset
        Dim i As Long
        Dim WritStr As String
        Dim Fid As Long
        Dim lngCount As Long              ' ¼ÆÊý¡£

        If TextFileName = "" Then TextFileName = App.Path & "\" & TableName & ".txt"
        If objConn.State = 0 Then objConn.Open
        rs.Open "select * from " + TableName, objConn

        Fid = FreeFile
        rs.MoveFirst
        Open TextFileName For Output As #Fid
          WritStr = ""
          For i = 0 To rs.Fields.Count - 1
              WritStr = WritStr & "" & rs.Fields(i).Name & ","
          Next
          Prin


Ïà¹ØÎÊ´ð£º

¹ØÓÚASP.net(vb)²¥·Å¼à¿ØÂ¼ÏñµÄÎÊÌâ

ÎÒÓг§¼Ò×öµÄASPµÄ¼à¿ØÂ¼Ïñ£¨DVR£©µÄ¾ÖÓòÍø²¥·ÅµÄÔ´³ÌÐòÓë¿Ø¼þ£¬ÏëÒªÓÃASP.net×öÒ»¸öÊÓÆµ»Ø·ÅµÄ³ÌÐò£¨ÀûÓÃËûµÄ¿Ø¼þ£©µ«²»ÖªÈçÏÂÈ¥×ö£¬Íû¸÷λָµã¡£
ÏȸãÇå³þËûÃǵĿؼþÊÇÔõôÓõÄ,
È»ºó¾ÍÖ±½ÓÓúÃÁË.
²»¹ý,Èç ......

VBÖÐÓÐÎÞTApplication¶ÔÓ¦ÀàÐÍ

ÎÒÓÃDelphiдÁËÒ»¸öDLL, DLLÀïÓÐMDIµÄ×Ó´°Ìå,DLL³õʼ»¯Ê± ´«µÝµ÷ÓÃÕßµÄTApplication¸øDLL, ÔÚDelphi7Öе÷ÓÃÒѾ­Í¨¹ý,µ«ÊDz»ÖªµÀÔÚVBÖÐÓÐÎÞTApplication¶ÔÓ¦ÀàÐÍ, ÊÇ·ñÄÜÔÚVBÖе÷ÓÃ?
ÄãºÃ£¬ÓÃinstance²»ÊǾͿÉÒÔÁË&# ......

VB »ñÈ¡ÍøÒ³Ô´´úÂë

Ò»¸ö²éѯijÐÅÏ¢µÄASPÍøÒ³£¬Ìá½»²ÉÓõÄÊÇpost·½·¨£¬²éÕÒ½á¹ûµÄÍøÒ³±ØÐëÓÒ¼üµã»÷¡°²é¿´Ô´Îļþ¡±²ÅÄÜ¿´µ½ÕæÕý²éѯ½á¹ûÍøÒ³µÄÔ´´úÂ룬ÓÃä¯ÀÀÆ÷²Ëµ¥¿´µ½µÄÊDzéѯǰµÄÔ´´úÂë
ÓÃVBÓÐʲô°ì·¨¿ÉÒÔ»ñÈ¡µ½Õâ¸ö²éѯºóµÄÔ´´ú ......

VCÏ»­Í¼ÒªÓÃwin32 GDI API VBÏÂÄØ£¿

ÓÃʲô£¿
VB×Ô¼ººÃÏñÓл­Í¼º¯Êý°É,ÁíÍâVBÒ²ÊÇ¿ÉÒÔÓÃAPIµÄ,¶øÇҺܷ½±ã

ÒýÓÃ
VB×Ô¼ººÃÏñÓл­Í¼º¯Êý°É,ÁíÍâVBÒ²ÊÇ¿ÉÒÔÓÃAPIµÄ,¶øÇҺܷ½±ã

ΪʲôvcûÓÐ×Ô¼ºµÄ»­Í¼º¯Êý£¿

ÒýÓÃ
ÒýÓà 1 Â¥ wltg2001 µ ......

ÈçºÎÓÃVB²É¼¯²¿·ÖÍøÒ³Êý¾Ý

Òª²É¼¯µÄÒ³Ãæ£ºhttp://city.qzone.qq.com/html/user/searchpro.htm#mod=0&act=city&cd=120000&pg=1

ÎÒÏë°ÑËÑË÷³öÀ´µÄQQ¶¼²É¼¯³öÀ´£¬¸ÃÔõô×ö¡£¿´ÁËÏ´úÂëºÃÏñ²»ÊÇÆÕͨµÄÄÇÖÖ£¬ÍøÖ·Àï°Ñ1¸Ä³É2ûÓà ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ