delphi7 如何将文本文件中的数据添加到数据库中

数据库是ACCESS还是sql?试试吧，我还没试，作为参考

一、将表中数据导出到文本文件（TXT）：

Select * INTO [TEXTDATABASE=E:\TEMP].TESTABC.txt FROM Sheet2

二、导入TXT文件并生成新表：

Select * INTO ABC FROM [TEXTDATABASE=E:\TEMP].TESTABC.txt

三、将TXT文件导入到一个现有表中：

Insert INTO ABC Select * FROM [TEXTDATABASE=E:\TEMP].TESTABC.txt

TXT->Access:

procedure TForm1.Button2Click(Sender: TObject)

var

str:string

begin

str:= 'select * into form from [TextDatabase=d:\].3.txt'

with AccessConnection do

begin

Connected := True

Execute(str)

end

end

Access->txt:

procedure TForm1.Button1Click(Sender: TObject)

var

ssql:string

begin

sSql := 'select * into [TextDatabase=d:\].aaa.txt from form'

with AccessConnection do

begin

Connected := True

Execute(sSql)

end

end

在buttonclick事件中写如下：

procedure TWork_frm.submitClick(Sender: TObject)

begin

with Myquery do

begin

SQL.Clear

SQL.Add('insert into table(字段1,字段2)')

SQL.Add('values('''+lab.Caption+''','''+tx.Text+''')')

Execute

表.Refresh

MessageDlg('信息添加成功',mtInformation,[mbOK],0)

exit

end

end

类似就是这样的 朋友可以看一下^_^ 希望对你有帮助

delphi 通过odbc连接sql server

一、数据库的准备

打开“开始／程序／Microsoft SQL Server/企业管理器”展开“控制台根目录”的目录，在标有“数据库”的目录项上点击右键，再点“新建数据库”，如“TEST”。再右键点击表，新建表，如“TABLE1”。

二、设置ODBC数据源

打开“开始／设置／控制面板／管理工具／数据源（ODBC）”，在“User DSN”下，点Add，选择“SQLServer”，完成，输入数据源名称，如“TEST-ODBC”和SQL Server服务器名称，后面一直点“下一步”到最后一页，再点“Test data source..”检测设置是否正确。如果正确显示“tests completed successfully!”的信息。

三、设置数据引擎

打开“开始／程序／Borland Delphi7/BDE Administrator”，\在"Databases"页面下，可以看到，刚才设置的ODBC数据源“TEST-ODBC”，右键，选择“OPEN”，出现输入"user name"、"Password"的对话框，输入用户名Administrator及密码后点击“OK”使它有效。这时，如果连接正常，右侧的项目名称的字体变成粗体。注意：如要修改参数值，应先鼠标右键点击左侧的数据库名称，选择“Close”，在修改参数值后，用鼠标右键点击左侧的数据库名称，选择“Apply”保存，再选择“OPen”使新的参数值生效。

---