请问怎样把查询到的记录生成*.TXT文件,先谢谢大家了!

解决方案 »

  1.   

    Sql = "SELECT * INTO [Text;DATABASE=C:\temp\].[aaaa.TXT] FROM [table]"
    Cn.Execute Sql
      

  2.   

    Dim mycon As New ADODB.Connection
    Dim myrec As New ADODB.Recordset
    mycon.Open "dsn=你在ODBC起的名字"
    myrec.Open "你的SQL语句", mycon, adOpenForwardOnly
    fileNO = FreeFile
    Open "包含目录的文件名称" For Output As #fileNO
    Do While Not myrec.EOF
    Write #fileNO, myrec.Fields(0).Value, myrec.Fields(1).Value,.....
    Loop
    当然你可以用commomn dialog控件来获取包含目录的文件名称,将TXT文本存在你想要的地方
      

  3.   

    在vb中 一样呀dim cn as new adodb.connection
    cn.open "....."
    cn.execute "...上面的在查询分析器中可执行的字符窜"
      

  4.   

    这么多人给我回答问题,我真感动呀,csdn真好!