excel导入数据库

风子啊啊 2008-07-05 01:21:39
想做一个把excel数据导入到sybase数据库的软件
现在通过adotable打开excel文件,
但不知道怎么样能把table导入到数据库中。
请各位指点一下
...全文
350 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
西凉董卓 2008-08-27
  • 打赏
  • 举报
回复
dir=a->Text+Edit1->Text+b->Text; 这里的a和b是什么 我也遇到这个问题了 帮忙解决一下好吗?
风子啊啊 2008-07-16
  • 打赏
  • 举报
回复
谢谢,,问题解决
thncn 2008-07-07
  • 打赏
  • 举报
回复
如果你知道怎么往sybase写数据,就可以读一行,写一行完成导入啊。我用ADOQuery与ADOConnection把Excel的导入SQL2000就是这样的。部分代码:
AnsiString sql,filename,dir,str;
AnsiString sql,filename,dir,str;
dir=a->Text+Edit1->Text+b->Text;
filename=Edit2->Text;
str="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+dir+";User ID=Admin;Password=;Extended properties=Excel 5.0";
sql="select * from ["+Edit2->Text+"$]";

try{
ADO_excel->Close();
ADO_excel->ConnectionString=str;
ADO_excel->Prepared=false;
ADO_excel->SQL->Clear();
ADO_excel->SQL->Add(sql);
ADO_excel->Open();
}
catch(...){G_jdt->Visible=false;ShowMessage("打开Excel表失败!");}

sql="select top 1 * from data_excel";
ADO_datain->Close();
ADO_datain->SQL->Clear();
ADO_datain->SQL->Add(sql);
ADO_datain->Open();
ADO_excel->First();
while(!ADO_excel->Eof){
ADO_datain->Insert();
ADO_datain->FieldValues["num"]=ADO_excel->FieldValues["badgenumber"];
ADO_datain->FieldValues["checktime"]=ADO_excel->FieldValues["checktime"];
ADO_datain->Post();
ADO_excel->Next();
}

1,178

社区成员

发帖
与我相关
我的任务
社区描述
C++ Builder 数据库及相关技术
社区管理员
  • 数据库及相关技术社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧