VC中如何用ADO访问EXCEL表格

2003-09-17 04:28:48 592 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

ESP32水墨屏日历实战：低功耗自动更新与HTTPS数据解析本文详细介绍了ESP32水墨屏日历项目的开发实践，重点讲解了低功耗自动更新与HTTPS数据解析的实现方法。通过ESP32的自动休眠功能和水墨屏的零功耗特性，结合HTTPS请求安全获取网络数据，实现了高效节能的桌面日历应用。项目代码开源，适合物联网开发者参考。阅读详情

VC中如何用ADO访问EXCEL表格

...全文

计算机考研常见面试题写在前面本人参加20考研，由于复试没有具体要求会问哪几门课，所以我就找了网上一些常见的计算机专业的面试题，整理如下主要结构: 数据库软件工程操作系统计算机组成原理计算机网络数据结构 C++ Java 数据库 1、数据：数据库中存储的基本对象。数据库：长期存储在计算机内的、有组织的、可共享的数据集合。数据库管理系统:专门用于建立和管理数据库的一套软件。对外部程序提供访问数据库的方法，对内进行数据管理。数据库系统：与和数据库相关的整个系统，一般由数据库、数据库管理系统、应用程序、数阅读详情

漂行者

数据库 4,017 成员 39,805 内容

+ 关注 + 加入社区

切换为时间正序

zlxcjy 2004-01-11

打赏
举报

请问还能像访问access那样这样写sql语句吗？
sql=”select * from Sheet1“
还有我这样打开纪录怎么不对？在access中正确的
CString sql="select * from Sheet1";
m_pRecordset.CreateInstance("ADODB.Recordset");
m_pRecordset->Open(
(_bstr_t)sql,
_variant_t(pConn,true),
adOpenStatic,adLockOptimistic,
adCmdText); ///打开记录

zhangnanonnet 2004-01-11

打赏
举报

给你一个用ODBC的吧
CFileDialog filedlg(TRUE,NULL,NULL,OFN_HIDEREADONLY,
"XLS Files (*.xls)|*.xls",NULL);
CString filename;
CDatabase database;
CString sSql;
CString sItem1, sItem2;
CString sDriver;
CString sDsn;
char cDefaultfile[MAX_PATH], num[100], name[100], msg[100];
CDBVariant varValue;
int iCount;

memset(msg, 0, 100);
memset(num, 0, 100);
memset(name, 0, 100);
memset(cDefaultfile, 0, MAX_PATH);

sDriver = theApp.GetExcelDriver();
if( sDriver.IsEmpty() )
{

AfxMessageBox("No Excel ODBC driver found");
return;
}

sprintf(cDefaultfile, "%s\\temple\\联系簿\\联系簿模板.xls", theApp.GetAppPath());
filedlg.m_ofn.lpstrFile = cDefaultfile;
filedlg.m_ofn.nMaxFile = MAX_PATH;
filedlg.m_ofn.lpstrDefExt = "XLS";
if (filedlg.DoModal() == IDOK)
{
// m_List.DeleteAllItems();
filename = filedlg.GetPathName();
sDsn.Format("ODBC;DRIVER={%s};DSN='';DBQ=%s",sDriver,filename);

TRY
{
// Open the database using the former created pseudo DSN
database.Open(NULL,false,false,sDsn);

// Allocate the recordset
CRecordset recset( &database );

// Build the SQL string
// Remember to name a section of data in the Excel sheet using "Insert->Names" to be
// able to work with the data like you would with a table in a "real" database. There
// may be more than one table contained in a worksheet.
sSql = "SELECT * from [Sheet1$]";

// Execute that query (implicitly by opening the recordset)
recset.Open(CRecordset::forwardOnly,sSql,CRecordset::readOnly);

// Browse the result
iCount = 0;
short nFields = recset.GetODBCFieldCount( );

while( !recset.IsEOF() )
{
// Read the result line
for( short index = 0; index < nFields; index++ )
{
// do something with varValu
switch (index)
{
case 0:
recset.GetFieldValue(index, sItem1);
sprintf(name, "%s", sItem1);
break;
case 1:
recset.GetFieldValue(index, sItem2);
sprintf(num, "%s", sItem2.Left(sItem2.GetLength()-2));
break;
default:
break;
}
}
if (strlen(num)!=11)
{
MessageBox("导入的手机号位数不正确，将不允许被导入","联系簿导入");
}
else
{
InsertList(num, name, "", "");

iCount++;
}

// Skip to the next resultline
recset.MoveNext();
}

// Close the database
sprintf(msg, "导入成功,本次共计导入%d条记录", iCount);
MessageBox(msg,"批量发送");
database.Close();

}
CATCH(CDBException, e)
{
// A database exception occured. Pop out the details...
AfxMessageBox("Database error: "+e->m_strError);
}
END_CATCH;
}

漂行者 2003-12-18

打赏
举报

我已经试过了，可是还会报错的，说什么sam卡没有安装

cdwy411 2003-09-18

打赏
举报

strConnection = _T("Driver={Microsoft Excel Driver (*.xls)};DriverId=790;"
"Dbq=C:\\DatabasePath\\DBSpreadSheet.xls;DefaultDir=c:\\databasepath;");

连接后可以和一般的数据库一样的操作来读取，添加，修改.........!!!

导工 2003-09-17

打赏
举报

使用这个连接字符串
Provider=MSDASQL.1;Persist Security Info=False;Extended Properties="DBQ=文件名.xls;Driver={Microsoft Excel Driver (*.xls)};DriverId=790;FIL=excel 8.0;MaxBufferSize=2048;MaxScanRows=8;PageTimeout=5;ReadOnly=0;SafeTransactions=0;Threads=3;UID=admin;UserCommitSync=Yes;"

VC中如何用ADO访问EXCEL表格

相关推荐