我想导入一个文件的数据。。例如
列名 test1 test2 test3 test4 test5 test6 test7 test8 test9
数据 abc dsji djfsi jfid did did dif didd fjdi
数据 dfi e43 jdif dfdi dif dfd difj iji iji我只想导入里面的 test1 test3 test4 test7 test8 其他的不要导入。。我应该在导入的储存过程修改写什么呢?bcp "IISLog..tablename" in "\pach.log" -a 2048 -c -t " " -r \n -S sevserName -U Sa -P password只要用代码实现的话,什么方法都可以使用。。
先谢谢各位大侠
列名 test1 test2 test3 test4 test5 test6 test7 test8 test9
数据 abc dsji djfsi jfid did did dif didd fjdi
数据 dfi e43 jdif dfdi dif dfd difj iji iji我只想导入里面的 test1 test3 test4 test7 test8 其他的不要导入。。我应该在导入的储存过程修改写什么呢?bcp "IISLog..tablename" in "\pach.log" -a 2048 -c -t " " -r \n -S sevserName -U Sa -P password只要用代码实现的话,什么方法都可以使用。。
先谢谢各位大侠
procedure TForm1.Button2Click(Sender: TObject);
var
i,Acount : Integer;
strLen, strtemp : TStringList;
strSql, str1,temp, TableName, str123 : string;begin TableName := FormatDateTime('yyMMdd',Now); try
strLen := TStringList.Create;
strLen.LoadFromFile('文件名');
ExtractStrings([' '],[' '],PChar(str1),strtemp);
for i := 0 to strLen.Count - 1 do
begin
strtemp := TStringList.Create;
str1 := strLen[i];
Acount := ExtractStrings([' '],[' '],PChar(str1),strtemp);
strSql := 'insert into ex'+ TableName + '(test1,test3,test4,test7,test8)
+ 'values ('''+ strtemp[0] +''',''' + strtemp[2] + ''','''+ strtemp[3]'
+ ''',''' + strtemp[6] + ''',''' + strtemp[7] ''')';
ADOQuery1.Close;
ADOQuery1.SQL.Text := strSql;
ADOQuery1.ExecSQL;
ADOQuery1.Close;
strtemp.Free;
end; finally
strLen.Free;
end;end;