C++中如何实现把EXCEL数据导入数据库-创新互联

这篇文章给大家分享的是有关C++中如何实现把EXCEL数据导入数据库的内容。小编觉得挺实用的，因此分享给大家做个参考，一起跟随小编过来看看吧。

成都创新互联主要从事成都网站建设、做网站、网页设计、企业做网站、公司建网站等业务。立足成都服务天峨,十载网站建设经验,价格优惠、服务专业,欢迎来电咨询建站服务:13518219792

C++ 中实现把EXCEL的数据导入数据库(ACCESS、MSSQL等)实例代码

在把EXCEL的数据导入数据库之前，先进行一些简单的准备工作：

1。把数据所在的EXCEL表另保存为DBF 4格式。

2。打开BCB，添加AdoTable(改名为DBFTable)和DataSource这两个控件

OK，准备工作，到此结束，剩下的就是打代码了

1。在Form_Load()事件中，加入以下代码：

AnsiString filepath=ExtractFilePath(FileName); 
//FileName为DBF文件名 
AnsiString tablename=ExtractFileName(FileName).SubString(0,ExtractFileName(FileName).Length()-4);//去除文件的扩展名
//--------------------用于连接DBF文件-------------------------------- 
  DBFTable->ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;
Password=/"/";Data Source=/""+filepath+"/";
Extended Properties=dbase 5.0;Persist Security Info=True";  
 DBFTable->TableName=tablename;  DBFTable->Open();

2。新建一个类的成员函数void __fastcall ExcelToDB(TADOQuery *ADOQuery);

以下是函数的具体实现：

void __fastcall TDBFToDBForm::ExcelToDB(TADOQuery *ADOQuery) 
 
 {//实现很简单，只是把DBFTable的数据逐项添加的本地的数据库   
 
 DBFTable->First();   
 
 for(int j=0;j<DBFTable->RecordCount;j++)  
 
 {   
 
 ADOQuery->Append();    
 
 for(int i=0;i<DBFTable->FieldCount;i++)   ADOQuery->FieldByName(DBFTable->FieldList->Strings[i])->AsString=DBFTable->FieldByName(DBFTable->FieldList->Strings[i])->AsString;   ADOQuery->Post();    
 
 DBFTable->Next();   
 
 } ShowMessage("导入成功!"); }

说明:DBFTable使用来装载EXCEL另保存的数据，而程序本身装载数据用的是ADOQuery(当然，你也可以改变),

感谢各位的阅读！关于“C++中如何实现把EXCEL数据导入数据库”这篇文章就分享到这里了，希望以上内容可以对大家有一定的帮助，让大家可以学到更多知识，如果觉得文章不错，可以把它分享出去让更多的人看到吧！

另外有需要云服务器可以了解下创新互联建站www.cdcxhl.com，海内外云服务器15元起步，三天无理由+7*72小时售后在线，公司持有idc许可证，提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案，具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势，专为企业上云打造定制，能够满足用户丰富、多元化的应用场景需求。

分享文章：C++中如何实现把EXCEL数据导入数据库-创新互联
文章起源：https://www.cdcxhl.com/article38/dhhhsp.html

成都网站建设公司_创新互联，为您提供做网站、动态网站、网站改版、搜索引擎优化、手机网站建设、网站内链

广告

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源： 创新互联