有没有sql语句对带有一定格式的txt文件导入表中?

[wzs]

[ether]

入：
(Table1.fieldbyname('MyBlobField') as TBLOBField).loadfromfile('c:\aa.txt');
出：
(Table1.fieldbyname('MyBlobField') as TBLOBField).savetofile('c:\aa.txt');

[wzs]

to:ether(void)　兄
你误会我的意思了!我指的是多个字段由一个文本文件导入到表，这个文本文件是有一定规则的，如：
aa,123,kkk,(bolob),13134,20001-1-1
adaa,23,kk,(bolob),3134,20001-11-16

[wzs]

如果用SQL无法做到,那用哪种方法较简单?

[illcat]

用PowerBuilder就可以办到啊,用Tab键分隔,我以前倒数据都是这么干的

[wzs]

to:illcat(沙龙巴斯)　兄!我指的导入"较简单"是在DELPHI程序中进行的

[a_fee]

delphi 可以直接读文本格式的数据。一个是概要文件*.sch，一个是数据文件*.txt。

[TableName]
filetype=Fixed
charset=ascII
Field1=FieldName,Field Type,size,..
field2=num,MUMBER,16,
...

数据文件:
aa,123,kkk,(bolob),13134,20001-1-1
adaa,23,kk,(bolob),3134,20001-11-16

后面用TTable组件。

[liuchcn]

只能自己写代码来生成sql。

[AChung666]

有一个DBCVT控件可将 ASCII 文字档转入或转出 Paradox Table 的单元，即你所想实现的功能.

[ether]

自己做个函数吧。举个例：
procedure TForm1.Button1Click(Sender: TObject);
var
Src, Data: TStrings;
i, p: Integer;
s: String;
begin
Src := TStringList.Create;
Src.Assign(Memo1.Lines); // Src.Loadfromfile也行，可以用你上面的例试。
Data := TStringList.Create;
for i:=0 to Src.Count-1 do
begin
Data.Clear;
s := Src[i];
while Length(s)>0 do
begin
p := Pos(',', s);
if p<1 then
begin
Data.Add(s);
break;
end;
Data.Add(Copy(s, 1, p-1));
s := Copy(s, p+1, MaxInt);
end;
ShowMessage(Data.Text); // 现在Data的每行就是一字段了，可以写数据库。
end;
Src.Free;
Data.Free;
end;

[wzs]

to :ether(void)　你这种做法是可以,不过有一点小问题,你这种方法能确定字段对应的文本数据的类型是一致的吗?也就是说如:
字段1//类型是int
文本数据1='123'
但你在做把"字段1='123'"时必须判断"字段1"的数据类型这种做法较麻烦万一"文本数据1"的值是'123a'来说那还要判断"文本数据1"的数据类型.所以我现在要的是一种较简单的做法,有没有更好方法来解决这种事情?
我很感谢大家给我提这么多意见,小弟在这谢谢了!

[bigfox]

ether的方法可行，你可以增加地一些功能把文本格式变成如下：
'123',645,true,'sdfhgs','sadfjas'
这样不就可以分清数据类型了吗
只不过要在ether提供的函数中加一些区分'的函数即可

[ether]

这个要看你的数据来源了，如果是自己生成的，自然知道每个字段的类型，可以通过
StrToInt()或StrToIntDef之类函数作转换。
也可以参考bigfox的方法，不过您认为“123”是整型还是浮点性？“HELLO!”是
varchar还是memo? :)
如果你的文件格式象上面的举例，根本无法准确识别类型的，只能靠自己判断。