C++代码
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
|
///
//在StdAfx.h文件中加入:
#include <afxdb.h>
#include <odbcinst.h>
void
Ctest_excelDlg::OnBnClickedButton1()
{
//写入EXCEL
CDatabase database;
CString sDriver = _T(
"MICROSOFT EXCEL DRIVER (*.XLS)"
);
// Excel安装驱动
CString sExcelFile = _T(
"c:\demo.xls"
);
// 要建立的Excel文件
CString sSql;
TRY
{
// 创建进行存取的字符串
sSql.Format(_T(
"DRIVER={%s};DSN='';FIRSTROWHASNAMES=1;READONLY=FALSE;CREATE_DB="
%s
";DBQ=%s"
),sDriver, sExcelFile, sExcelFile);
// 创建数据库 (既Excel表格文件)
if
( database.OpenEx(sSql,CDatabase::noOdbcDialog) )
{
// 创建表结构(姓名、年龄)
sSql = _T(
"CREATE TABLE demo (Name TEXT,Age NUMBER)"
);
database.ExecuteSQL(sSql);
// 插入数值
sSql = _T(
"INSERT INTO demo (Name,Age) VALUES ('徐景周',26)"
);
database.ExecuteSQL(sSql);
sSql = _T(
"INSERT INTO demo (Name,Age) VALUES ('徐志慧',22)"
);
database.ExecuteSQL(sSql);
sSql = _T(
"INSERT INTO demo (Name,Age) VALUES ('郭徽',27)"
);
database.ExecuteSQL(sSql);
}
// 关闭数据库
database.Close();
}
CATCH_ALL(e)
{
TRACE1(
"Excel驱动没有安装: %s"
,sDriver);
}
END_CATCH_ALL;
}
void
Ctest_excelDlg::OnBnClickedButton2()
{
//读入EXCEL
CDatabase database;
CString sSql;
CString sItem1, sItem2;
CString sDriver;
CString sDsn;
CString sFile = _T(
"c:Demo.xls"
);
// 将被读取的Excel文件名
// 检索是否安装有Excel驱动 "Microsoft Excel Driver (*.xls)"
sDriver = GetExcelDriver();
if
(sDriver.IsEmpty())
{
// 没有发现Excel驱动
AfxMessageBox(_T(
"没有安装Excel驱动!"
));
return
;
}
// 创建进行存取的字符串
sDsn.Format(_T(
"ODBC;DRIVER={%s};DSN='';DBQ=%s"
), sDriver, sFile);
TRY
{
// 打开数据库(既Excel文件)
database.Open(NULL,
false
,
false
, sDsn);
CRecordset recset(&database);
// 设置读取的查询语句.
sSql = _T(
"SELECT Name, Age FROM demo ORDER BY Name "
);
// 执行查询语句
recset.Open(CRecordset::forwardOnly, sSql, CRecordset::readOnly);
// 获取查询结果
while
(!recset.IsEOF())
{
//读取Excel内部数值
recset.GetFieldValue(_T(
"Name"
), sItem1);
recset.GetFieldValue(_T(
"Age"
), sItem2);
AfxMessageBox(sItem1);
// 移到下一行
recset.MoveNext();
}
// 关闭数据库
database.Close();
}
CATCH(CDBException, e)
{
// 数据库操作产生异常时...
AfxMessageBox(_T(
"数据库错误: "
) + e->m_strError);
}
END_CATCH;
}
CString Ctest_excelDlg::GetExcelDriver()
{
wchar_t
szBuf[2001];
wchar_t
excl[] = L
"Excel"
;
WORD
cbBufMax = 2000;
WORD
cbBufOut;
wchar_t
*pszBuf = szBuf;
CString sDriver;
// 获取已安装驱动的名称(函数在odbcinst.h里)
if
(!SQLGetInstalledDrivers(szBuf, cbBufMax, &cbBufOut))
return
L
""
;
// 检索已安装的驱动是否有Excel...
// AfxMessageBox(CString(pszBuf));
do
{
if
(wcsstr(pszBuf, excl) != 0)
{
//发现 !
sDriver = CString(pszBuf);
break
;
}
wchar_t
ze = {
'�'
};
pszBuf = wcschr(pszBuf, ze) + 1;
}
while
(pszBuf[1] !=
'�'
);
return
sDriver;
}
|