高手请入，如何再在程序中实现SQL SERVER中的数据导入导出工作？

Question

自己做，结构通过执行SQL脚本实现，数据可存为ACCESS或文本再导入!

Answer 1

你可以创建一个DTS包，然后再程序中执行这个DTS包（你还可以在程序中手动生成DTS包再执行）。
下面是一个VB执行DTS包的例子：
Private WithEvents mobjPkgEvents As DTS.Package
Private Sub RunPackage()
'Run the package stored in file C:\DTS_UE\TestPkg\VarPubsFields.dts.
Dim objPackage      As DTS.Package2
Dim objStep         As DTS.Step
Dim objTask         As DTS.Task
Dim objExecPkg      As DTS.ExecutePackageTaskOn Error GoTo PackageError
Set objPackage = New DTS.Package
Set mobjPkgEvents = objPackage
objPackage.FailOnError = True'Create the step and task. Specify the package to be run, and link the step to the task.
Set objStep = objPackage.Steps.New
Set objTask = objPackage.Tasks.New("DTSExecutePackageTask")
Set objExecPkg = objTask.CustomTask
With objExecPkg
    .PackagePassword = "user"
    .FileName = "C:\DTS_UE\TestPkg\VarPubsFields.dts"
    .Name = "ExecPkgTask"
End With
With objStep
    .TaskName = objExecPkg.Name
    .Name = "ExecPkgStep"
    .ExecuteInMainThread = True
End With
objPackage.Steps.Add objStep
objPackage.Tasks.Add objTask
'Run the package and release references.
objPackage.ExecuteSet objExecPkg = Nothing
Set objTask = Nothing
Set objStep = Nothing
Set mobjPkgEvents = NothingobjPackage.UnInitialize
End Sub

Answer 2

楼上的，我是用DELPHI的旁观者，请教一下，DELPHI中如何做，感谢，如需要可以送上大洋50。

Answer 3

我觉得最简单的方法是使用bcp进行导入导出数据。数据存作文本文件

Answer 4

hydnoahark(诺亚方舟)：
ExecutePackageTask和objTask.CustomTask是不同类型的对象，可以直接这样传递吗，VB可以，delphi就不行，为什么呀？我的程序现在就卡壳在这里。

Answer 5

如果想在安装程序中实现数据库的导入功能呢，我倒是有个简单的办法：
使用isql实用程序和系统存储过程“sp_attachdb”，将一个mdf文件（也可带ldf文件）导入成dbms中的数据库。我以前就是这样做的。