如何将数据库文件导入数据库中

工具/材料：Management Studio。

1、首先在桌面上，点击“Management Studio”图标。

2、然后在该界面中，选中要导入数据的数据库。

3、之后在该界面中，右键点击“任务”里“导入数据”选项。

4、接着在该界面中，输入服务器名称。

5、然后在该界面中，选择要导入的数据库。

6、然后在该界面中，点击“下一步”按钮。

7、其次在该界面中，选择“复制一个或多个表或视图的数据”。

8、继续在该界面中，点击“下一步”按钮。

9、接着在该界面中，勾选“立即运行”。

10、最后在该界面中，点击“完成”按钮。

给你一个宏，可以完成这个工作。注意，只有主要功能。至于其它辅助防错等等，需要的话，你可以自己加工。

前提：

1、TXT文件为：c:\1.txt——可以根据实际需要更改程序参数

2、章号独立占一行，首字为“第”，最后一字为“章”——可以根据实际情况调整程序

程序如下：

Sub readtxt()

Filename = "c:\1.txt"

Open Filename For Input As #1

'读文件内容

Dim InputStr, TxtBuf As String

Line Input #1, InputStr

i = 1

TxtBuf = ""

While Not EOF(1)

If Left(InputStr, 1) = "第" And Right(InputStr, 1) = "章" Then

Cells(i, 2) = TxtBuf

TxtBuf = ""

i = i + 1

Cells(i, 1) = InputStr

Else

TxtBuf = TxtBuf &InputStr &Chr(13) + Chr(10)

End If

Line Input #1, InputStr

Wend

Cells(i, 2) = TxtBuf &InputStr

Close #1

MsgBox ("完成")

End Sub

---