怎样将SQLSERVER的表导出为DBF表(好久了没人解决，不得不拿到这个人气旺的版块)

Question

我曾经将dbf文件导入到SQL server过，希望对你有帮助！--------------------------------------------------
我的做法是这样的：用一foxpro程序取得表的结构，然后在SQL server中建立所有表的结构，然后用delphi的转换控件将数据导入。
--------------------------------------------------

Answer 1

用DTS.
这里有文档和例子.
http://SQLDev.Net/DTS/DotNETCookBook.htm========================
未经测试.

Answer 2

直接用SQLSERVER2000我知道行。现在要在程序里搞定。
我有一超市程序，后台为PB，前台为FOXPRO做的。每天下发数据就是将SQLSERVER中的表导出为DBF表，供前台下载使用。因为后台程序没有源程序了，所以不知道怎样写的。但是用了很简单的方法。现在要改后台程序为VB的，所以很烦恼，不知道怎样下放数据为DBF表。

Answer 3

答对者200分全给。http://expert.csdn.net/Expert/topic/1473/1473149.xml?temp=6.110781E-02

Answer 4

用DTS啊，定时执行，可以搞定。

Answer 5

SQL Server Enterprise 中打开数据转换服务，点击本地包，新建一个包，具体操作可以看帮助，就可以了，你还可以将生成的包转为VB代码，放到你的程序中：在保存时位置选VB文件即可：-）

Answer 6

楼上的，这个我会呀。看我怎么问的呀，不过也谢你了
请教怎样将SQLSERVER的表导出为DBF表，并且表中的数据不变。
用BCP怎样写。或用别的方法。但不能用企业管理器点鼠标啊。

Answer 7

程序->sql菜单->导入和导出数据

Answer 8

要是不用命令解决，我也就不用拿到这里来了
郁闷ing......

Answer 9

Dim Kc As New ADODB.Command
    With Kc
        .ActiveConnection = Mcon
        .CommandType = adCmdStoredProc
        .CommandText = "to_excel"
        .Parameters.Append .CreateParameter("@sql", adChar, adParamInput, 500, TSQL)
        .Parameters.Append .CreateParameter("@message", adChar, adParamOutput, 100, "数据导入未能完成。")
        .Execute
    End With
    If Trim(Kc.Parameters(1).Value) = "ok" Then
       Exit Sub
    Else
       MsgBox Trim(Kc.Parameters(2).Value), vbInformation + vbOKOnly, "提示"
       Exit Sub
    End If
用存储过程，to_excel，已经消息发给你了