我做过从文本文件到入数据库,文本以‘|’为分隔符,倒入到SQL中
本人先编一段小程序将‘|’分解,在用SQL插入小程序如下:
procedure Dispatchs(var s:string);
var
Len:Integer;
i,j:Integer;
s1:string;
StringList:TStringList;
begin
StringList:=TstringList.Create;
Len:=Length(S);
j:=1;
For i:=1 to Len do
if s = #44 then
begin
s1:=copy(s,j,(i-j));
StringList.Add(s1);
j:=i+1;
end;
end;
余下问题想必你会编写,在下也不多说了,不过可记得给我加分!