请问如何用SELECT将SQL数据库内容转成TXT文件,菜鸟一只,希望有包括使用ADO打开数据库的完整程序。谢谢各位了

解决方案 »

  1.   

    好象是用select * into [Excel 8.0;database=导出文件].导出表名 from 表 类似这样的语法。大家帮帮忙啊
      

  2.   

    ** 导入文本文件
    EXEC master..xp_cmdshell 'bcp dbname..tablename in c:\DT.txt -c -Sservername -Usa -Ppassword'/** 导出文本文件
    EXEC master..xp_cmdshell 'bcp dbname..tablename out c:\DT.txt -c -Sservername -Usa -Ppassword'

    EXEC master..xp_cmdshell 'bcp "Select * from dbname..tablename" queryout c:\DT.txt -c -Sservername -Usa -Ppassword'导出到TXT文本,用逗号分开
    exec master..xp_cmdshell 'bcp "库名..表名" out "d:\tt.txt" -c -t ,-U sa -P password'
      

  3.   

    http://dev.csdn.net/develop/article/22/22674.shtm
      

  4.   

    '工程->引用->Microsoft ActiveX Data Objects 2.x LibraryPrivate Sub Command1_Click()    '服务器名:Server   数据库:Test   表:mTable  导出文件:YourTable.txt
    Dim cn  As New ADODB.Connection
    Dim mSQL As Stringcn.CursorLocation = adUseClientcn.Open "Driver={SQL Server};Server=Server;DataBase=Test;Uid=sa;Pwd=;"   '服务器名:Server   数据库:Test   表:mTable  导出文件:YourTable.txtmSQL = "EXEC master..xp_cmdshell 'bcp " & """" & "SELECT * FROM Test.dbo.mTable" & """" & " queryout " & App.Path & "\YourTable.txt -c -SServer -Usa -P'"cn.Execute mSQLEnd Sub