00001010203040506000010550
00002010203040506000010550
00003010212020833000020000
00004010212021159000020000
00005010212021302000020000
00006010212021732000020000 要实现将每条记录分为几块插入表中.
如:
00006 01 021202 1732 00002 0000

解决方案 »

  1.   

    问(浪子):
       如何取的TXT中的数据?有命令吗?
       BCP虽然可以,但BCP是外部命令不能用到存储过程中.
      

  2.   

    你可以按一定格式先处理你的文本
    然后调用BCP啊,我这两天就在做这事.
    事实上没有必要用到存储过程.
      

  3.   

    procedure TForm1.Button3Click(Sender: TObject);
    var
    ss,tem,filename:string;
    oldf,newf:tstrings
    begin
    old.
    begin
    oldf:=Tstringlist.Create;
    newf:=tstringlist.Create;
    oldf.LoadFromFile('c:\test.txt');
    for i:=0 to  oldf.Count-1 do
    begin
        ss:=oldf.Strings[i];
        //这里添加你要处理的语句
        TEM:=ss;
        newf.Add(tem);
        end;
        filename:='c:\test1.txt';
    newf.SaveToFile('filename');
    ss:='c:\sybase\bin\bcp ivsp.dbo.T_MS_7 in '+filename+' -Udata -Ptry -Sdbadba -c -t#';
    form1.Caption:=ss;
    winexec(pchar(ss),1);
    end;end.
      

  4.   

    procedure TForm1.Button3Click(Sender: TObject);
    var
    ss,tem,filename:string;
    oldf,newf:tstrings
    i:integer;
    begin
    oldf:=Tstringlist.Create;
    newf:=tstringlist.Create;
    oldf.LoadFromFile('c:\test.txt');
    for i:=0 to  oldf.Count-1 do
    begin
        ss:=oldf.Strings[i];
        //这里添加你要处理的语句
        TEM:=ss;
        newf.Add(tem);
        end;
        filename:='c:\test1.txt';
    newf.SaveToFile('filename');
    ss:='c:\sybase\bin\bcp ivsp.dbo.T_MS_7 in '+filename+' -Udata -Ptry -Sdbadba -c -t#';
    form1.Caption:=ss;
    winexec(pchar(ss),1);
    end;end.