关于把excel 导入到 sql server2000,该怎么处理

关于把excel 导入到 sql server2000
各位老师:关于把excel 导入到 sql server2000相应的表

做一个学生信息管理;班主任把新生的名册按一定格式放在Excel 文件, 字段"学号,专业,班级,姓名...",
如何通过 delphi 的界面上一个按键编程把Excel 文件中的数据导入到 sql server2000中呢.

------解决方案--------------------

探讨
谢谢bdmh老师的提示,前两步我都会,再说最后一步,就是数据可以读出,但循环的写到目的表里总写不进呵.
就好象在工资表中计算税金后写到表的税金字段,循环写不进,只一条按一下按钮的写了,太笨了,不好意思,还请您多赐教.

------解决方案--------------------

Delphi(Pascal) code

ADODataSet1.Close;   //导入
ADODataSet1.CommandText:='select * from tb';
ADODataSet1.Open;
ADODataSet1.DisableControls;
try
  ADOQuery1.First;
  while not (ADOQuery1.Eof)  do
  begin
      ADODataSet1.Insert;
      ADODataSet1.FieldByName('字段').AsString:=trim(ADOQuery1.fields[0].AsString);
      ADODataSet1.FieldByName('字段').AsString:=trim(ADOQuery1.fields[1].AsString);
      ADODataSet1.FieldByName('字段').AsString:=trim(ADOQuery1.fields[2].AsString);
      ADODataSet1.FieldByName('字段').AsString:=trim(ADOQuery1.fields[3].AsString);
      ADODataSet1.FieldByName('字段').AsString:=trim(ADOQuery1.fields[4].AsString);
      ADODataSet1.FieldByName('字段').AsFloat:=ADOQuery1.fields[5].AsFloat;
      ADOQuery1.Next;
  end;
    ADODataSet1.Post;
    Application.MessageBox('數據導入已完成!', '提示', MB_ICONINFORMATION);
    edit2.Text:='';
 finally
   ADODataSet1.EnableControls;
END;
ADODataSet1.Close;
end;

关于把excel 导入到 sql server2000,该怎么处理

相关推荐