有个CSV的文本,每行是一个挺小的小数,有N行。怎么把这个文件关联到数据库呢?ADO哪个组件,点哪呀。谢谢!
解决方案 »
- 制作多页面浏览器,请教!
- 请问,如何在Delphi7.0中,安装Indy 10?
- 求胜天进销存源码!!!!!!!!!
- EXCEL,WORD都提供了一个COM接口可以访问EXCEL,WORD的功能,如创建文件,写数据等等.请问各位可以从哪里找到关于这个COM接口编程的详细资料,
- ◆查询中,如何将“是/否”类型显示为“好/坏”?
- 怎样把DBgrid里面的数据导出到DBF文件中
- Dispatch的汇编代码如何理解?
- 那里有Adobe Acrobat Reader下载?
- 怎样在Delphi程序中设置共享文件夹?急请高手指点。
- 向各位高手请教
- delphi 执行SQL的Update出错
- delphi服务调用 RM打印报表的DLL(打印DLL封装了),打印不了在默认打印机上
一点提示:
用ado组件ADOConnection,ADOQuery连接
if OpenDialog1.Execute then
begin
ADOConnection1.Connected := False;
ADOConnection1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' +
ExtractFilePath(OpenDialog1.FileName) + ';Extended Properties=Text';
try
ADOConnection1.Connected := True;
except
ShowMessage('文件连接出错,请检查文件格式!');
end;
end;
查询csv文件中所有数据 with ADOQuery1 do
begin
Close;
SQL.Clear;
sql1 := StringReplace(ExtractFileName(OpenDialog1.FileName),
ExtractFileExt(OpenDialog1.FileName), '', [rfReplaceAll]);
sql1 := 'select * from ' + sql1 + '#csv';
SQL.Add(sql1);
Open;
end;
while not ADOQuery1.Eof do
begin
//你要对获取的数据进行的操作
..........
ADOQuery1.Next;
end;
"Driver={Microsoft Text Driver (*.txt; *.csv)}; Dbq=C://DatabasePath//;Extensions=asc,csv,tab,txt;"
如果文本文件使用tab作为分隔符,你必须创建schema.ini文件,你必须在连接串中使用Format=TabDelimited选项。
你必须在sql语句中指定文件名(例如"Select Name, Address From Clients.csv")
用ODBC也可以,ODBC及schema.ini文件格式参考我回过的(#9)
http://topic.csdn.net/t/20060414/10/4686187.html