ADO连接ACCESS和EXCEL数据库并且读写

ADO数据库操作之ACCESS和EXCEL和获取结果集表
数据库连接和操作
int CTYPE_TRANSFORMDlg::connect_db()
{

HRESULT hr;
hr = m_rea.CreateInstance(_uuidof(Recordset));//
if(FAILED(hr))
{
	AfxMessageBox(L"m_rea CreateInstance failed....");
	return -1;
}
hr = m_ree.CreateInstance(_uuidof(Recordset));//
if(FAILED(hr))
{
	AfxMessageBox(L"m_ree CreateInstance failed....");
	return -1;
}
_bstr_t strConnecta = _T("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\Users\\1000263417\\Desktop\\1_database.accdb;Persist Security Info=False;");
_bstr_t strConnecte = _T("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\\Users\\1000263417\\Desktop\\foup.xlsx;Extended Properties=\"Excel 12.0;HDR=YES;\"");
try
{
	hr = m_coa.CreateInstance(_uuidof(Connection));//实例化m_co对象、COM技术ADODB.Connection
	if(SUCCEEDED(hr))
	{
		hr = m_coe.CreateInstance(_uuidof(Connection));//实例化m_co对象、COM技术ADODB.Connection
		if(SUCCEEDED(hr))//实例化是否成功
		{
			m_coa->ConnectionTimeout = 20;//设置连接超时时间
			m_coe->ConnectionTimeout = 20;//设置连接超时时间
			hr = m_coa->Open(_bstr_t( LPCTSTR(strConnecta)),"","",adConnectUnspecified);//同步连接数据库
			if(SUCCEEDED(hr))
			{
				hr = m_coe->Open(_bstr_t( LPCTSTR(strConnecte)),"","",adConnectUnspecified);//同步连接数据库
				if(SUCCEEDED(hr))
				{
					AfxMessageBox(L"m_coe and m_coa all connect success....");
					return -1 ;
				}
				else
				{
		
					AfxMessageBox(L"m_coe connect failed....");
				}
			}
			else
			{
				AfxMessageBox(L"m_coa connect failed....");
			
			}
		}
		else
		{
			AfxMessageBox(L"m_coe createInstance failed...");
			return -1;
		}
	}
	else
	{
		AfxMessageBox(L"m_coa createInstance failed...");
	}
}	
catch (_com_error &e)//错误捕获
{
	_bstr_t bstrSouce(e.Source());
	_bstr_t bstrDescription(e.Description());
	AfxMessageBox(bstrDescription+bstrSouce);
	return -1;
}
return 0;

}
int CTYPE_TRANSFORMDlg::excel_to_access()
{
/**数据转换/
CString sql;
CString columname;
BSTR filedname;
Fields * fields = NULL;
HRESULT hr;
long filedcount;
if(sqlOpen(CString (_T(“EXCEL”)),CString(_T(“select from [sheet2$]")))<0)///\ast insertinto[sheet2$] values(‘fff’,33)/
{
AfxMessageBox(L"Excute failed”);
return -1;
}
hr = m_ree->get_Fields (&fields); //得到记录集的字段集和
///////////////////////////////////////////////////
if(FAILED(hr))
{
AfxMessageBox(L"Excute failed");
return -1;
}
filedcount = (m_ree->Fields)->Count;//获取列的个数
if(sqlExcute(CString (_T(“ACCESS”)),CString(_T(“create table [food]”)))<0)
{
AfxMessageBox(L"Excute failed");
}
for(int i = 0;i < filedcount;++i)
{
//fields->Item[(long)i]->get_Name(&filedname);可用于获取表头数据
m_ree->GetFields()->GetItem((long)i)->get_Name(&filedname);//可用于获取表头数据
columname = COLE2T(filedname);//////////////////////////////////////////////////
sql.Format(_T(“alter table food add [%s] varchar(10)”),columname);
if(sqlExcute(CString (_T(“ACCESS”)),sql)<0)
{
AfxMessageBox(L"Excute failed");
}

}
/*CString str;
	
	str.Format(L"%d",a);
	a = m_ree->GetRecordCount();*/
m_ree->Close();
m_ree = NULL;
/****************************************************************************************************/

return 0;
}
int CTYPE_TRANSFORMDlg::sqlOpen(CString &sqlname,CString &cstring)
{
HRESULT hr;
if(m_ree == NULL)
{
hr = m_ree.CreateInstance(_uuidof(Recordset));//
if(FAILED(hr))
{
AfxMessageBox(L"m_re failed…");
return -1;
}
if(m_rea == NULL)
{
hr = m_rea.CreateInstance(_uuidof(Recordset));//
if(FAILED(hr))
{
AfxMessageBox(L"m_re failed…");
return -1;
}

	}
}

try
{
	CString sql = cstring;
	//sql = _T("create table sheet2(name TEXT,age TEXT)");
	if(sqlname == L"EXCEL")
	{
		hr = m_ree->Open(_variant_t (sql),m_coe.GetInterfacePtr(),/*adOpenDynamic*/adOpenStatic ,adLockOptimistic,adCmdText);
		if(FAILED(hr))
		{
			AfxMessageBox(L"open failed .....");
			return -1;
		}
	}
	else if(sqlname == L"ACCESS")
	{
		hr = m_rea->Open(_variant_t (sql),m_coa.GetInterfacePtr(),/*adOpenDynamic*/adOpenStatic ,adLockOptimistic,adCmdText);
		if(FAILED(hr))
		{
			AfxMessageBox(L"open failed .....");
			return -1;
		}
	}
	else
	{
		AfxMessageBox(L"sqlname errror");
			return -1;
	}
}

catch(_com_error &e)
{
	_bstr_t bstrSouce(e.Source());
	_bstr_t bstrDescription(e.Description());
	AfxMessageBox(bstrDescription+bstrSouce);
	AfxMessageBox(e.ErrorMessage());
	return -1;
}
//m_re = m_co->Execute(_bstr_t (csql),NULL,adCmdText);
// TODO: Add your control notification handler code here
return 0;

}

int CTYPE_TRANSFORMDlg::sqlExcute(CString &sqlname,CString &cstring)
{
HRESULT hr;
CString sql = cstring;
try
{
if(sqlname == L"EXCEL")
{
hr = m_coe->Execute(_bstr_t(sql) ,NULL,adCmdText);
if(FAILED(hr))
{
AfxMessageBox(L"create failed 2…");
return -1 ;
}
}
else if(sqlname == L"ACCESS")
{

			hr = m_coa->Execute(_bstr_t(sql) ,NULL,adCmdText);
			if(FAILED(hr))
			{
				AfxMessageBox(L"create failed 2......");
				return -1 ;
			}
	}
	else
	{
		AfxMessageBox(L"sqlname errror");
		return -1;
	}
}

catch(_com_error &e)
{
	_bstr_t bstrSouce(e.Source());
	_bstr_t bstrDescription(e.Description());
	AfxMessageBox(bstrDescription+bstrSouce);

	AfxMessageBox(e.ErrorMessage());
	return -1;
}
return 0;

}

插入链接与图片

标题ADO数据库操作之ACCESS和EXCEL和获取结果集表头

链接: link.

图片:

带尺寸的图片:

居中的图片:

居中并且带尺寸的图片:

当然，我们为了让用户更加便捷，我们增加了图片拖拽功能。

如何插入一段漂亮的代码片

去博客设置页面，选择一款你喜欢的代码片高亮样式，下面展示同样高亮的 代码片.

// An highlighted block
var foo = 'bar';

生成一个适合你的列表

• 项目
  • 项目
    • 项目

1. 项目1
2. 项目2
3. 项目3

• 计划任务
• 完成任务

创建一个表格

一个简单的表格是这么创建的：

项目	Value
电脑	$1600
手机	$12
导管	$1

设定内容居中、居左、居右

使用:---------:居中
使用:----------居左
使用----------:居右

第一列	第二列	第三列
第一列文本居中	第二列文本居右	第三列文本居左

SmartyPants

SmartyPants将ASCII标点字符转换为“智能”印刷标点HTML实体。例如：

TYPE	ASCII	HTML
Single backticks	'Isn't this fun?'	‘Isn’t this fun?’
Quotes	"Isn't this fun?"	“Isn’t this fun?”
Dashes	-- is en-dash, --- is em-dash	– is en-dash, — is em-dash

创建一个自定义列表

Markdown

Text-to- HTML conversion tool

Authors

John

Luke

如何创建一个注脚

一个具有注脚的文本。¹

注释也是必不可少的

Markdown将文本转换为 HTML。

KaTeX数学公式

您可以使用渲染LaTeX数学表达式 KaTeX:

Gamma公式展示 $\Gamma (n)=(n-1)!\forall n\in \mathbb{N}$ 是通过欧拉积分

$$\Gamma (z)={\int }_0^{\infty }{t}^{z-1}{e}^{-t}dt.$$

你可以找到更多关于的信息 LaTeX 数学表达式here.

新的甘特图功能，丰富你的文章

Mon 06 Mon 13 Mon 20 已完成 进行中 计划一 计划二 现有任务 Adding GANTT diagram functionality to mermaid

• 关于 甘特图 语法，参考 这儿,

UML 图表

可以使用UML图表进行渲染。 Mermaid. 例如下面产生的一个序列图：:

张三 李四 王五 你好！李四, 最近怎么样? 你最近怎么样，王五？ 我很好，谢谢! 我很好，谢谢! 李四想了很长时间, 文字太长了 不适合放在一行. 打量着王五... 很好... 王五, 你怎么样? 张三 李四 王五

这将产生一个流程图。:

链接

长方形

圆

圆角长方形

菱形

• 关于 Mermaid 语法，参考 这儿,

FLowchart流程图

我们依旧会支持flowchart的流程图：

Created with Raphaël 2.2.0 开始 我的操作 确认？ 结束 yes no

• 关于 Flowchart流程图 语法，参考 这儿.

导出与导入

导出

如果你想尝试使用此编辑器, 你可以在此篇文章任意编辑。当你完成了一篇文章的写作, 在上方工具栏找到 文章导出 ，生成一个.md文件或者.html文件进行本地保存。

导入

如果你想加载一篇你写过的.md文件，在上方工具栏可以选择导入功能进行对应扩展名的文件导入，
继续你的创作。

---

1. 注脚的解释 ↩︎