植物专家系统

是应用人工智能技术，总结和汇集各层次各方面农业专家长期积累的宝贵经验，以及通过试验获得的各种资料和数据，总结和汇集农技推广人员和农民群众的长期实践经验，针对具体的自然条件和生态环境，用相应的计算机语言编制的各种能从理论和实践相结合上科学地指导农业生产，以实现高产、优质、低耗高效目标的计算机智能软件。

// AdoModule.cpp: implementation of the CAdoModule class.
//
//////////////////////////////////////////////////////////////////////

#include “stdafx.h“
//#include “BookBorrowReturnSys.h“
#include “AdoModule.h“

#ifdef _DEBUG
#undef THIS_FILE
static char THIS_FILE[]=__FILE__;
#define new DEBUG_NEW
#endif

//////////////////////////////////////////////////////////////////////
// Construction/Destruction
//////////////////////////////////////////////////////////////////////

CAdoModule::CAdoModule（）
{

}

CAdoModule::~CAdoModule（）
{

}

void CAdoModule::OnInitADOConn（CString mdb）
{
	::CoInitialize（NULL）;
	try
	{
		m_pConnection.CreateInstance（“ADODB.Connection“）;
		
//			CString strConnect=“DRIVER={Microsoft Access Driver（*.mdb）};\
//				uid=;pwd=;DBQ=C:\\Program Files\\Common Files\\ODBC\\Data Sources\\wq.mdb“;//+mdb;
CString strConnect=“Provider=Microsoft.Jet.OLEDB.4.0;Data Source=“+mdb+“;Persist Security Info=False“;
//m_pConnection->CursorLocation=adUseClient;
m_pConnection->Open（（_bstr_t）strConnect““““adModeUnknown）;

	}
	catch（_com_error e）
	{
		
		AfxMessageBox（e.Description（））;
	}
}

_RecordsetPtr& CAdoModule::OpenRecordset（CString sql）
{   
	ASSERT（!sql.IsEmpty（））;
	try{

    m_pRecordset.CreateInstance（_uuidof（Recordset））;
	m_pRecordset->CursorLocation=adUseClient;
	///*_variant_t（m_pConnectiontrue）*/////adLockReadOnly
    m_pRecordset->Open（_bstr_t（sql）m_pConnection.GetInterfacePtr（）
	                   adOpenDynamicadLockOptimisticadCmdText）;
	//AfxMessageBox（“ok“）;
	}
	catch（_com_error e）
	{
		AfxMessageBox（e.Description（））;
	}
	//AfxMessageBox（“ok yes“）;
	return m_pRecordset;
}

void CAdoModule::ExitConnect（）
{
	if（m_pRecordset!=NULL）
	m_pRecordset->Close（）;
	//m_pConnection->Close（）;
}

void CAdoModule::CloseConn（）
{
	m_pConnection->Close（）;
	
	::CoUninitialize（）;
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2009-06-28 19:32  植物专家\
     目录           0  2017-12-19 16:29  植物专家\plant2\
     文件        1902  2009-06-17 16:19  植物专家\plant2\AdoModule.cpp
     文件         718  2009-06-15 20:10  植物专家\plant2\AdoModule.h
     目录           0  2017-12-19 15:57  植物专家\plant2\Debug\
     文件       57156  2009-06-25 22:36  植物专家\plant2\Debug\AdoModule.obj
     文件           0  2009-06-25 22:36  植物专家\plant2\Debug\AdoModule.sbr
     文件      333654  2009-06-24 23:50  植物专家\plant2\Debug\hetao.bmp
     文件       90671  2008-04-13 19:13  植物专家\plant2\Debug\msado15.tlh
     文件       76640  2008-04-13 19:13  植物专家\plant2\Debug\msado15.tli
     文件       19003  2009-06-25 22:36  植物专家\plant2\Debug\NewRuleDlg.obj
     文件           0  2009-06-25 22:36  植物专家\plant2\Debug\NewRuleDlg.sbr
     文件      851968  2009-06-28 21:34  植物专家\plant2\Debug\plant.mdb
     文件     5923840  2009-06-28 19:39  植物专家\plant2\Debug\plant2.bsc
     文件      483415  2009-06-28 19:39  植物专家\plant2\Debug\plant2.exe
     文件      297792  2009-06-28 19:39  植物专家\plant2\Debug\plant2.ilk
     文件       18213  2009-06-26 00:23  植物专家\plant2\Debug\plant2.obj
     文件     9665556  2009-06-25 22:36  植物专家\plant2\Debug\plant2.pch
     文件      689152  2009-06-28 19:39  植物专家\plant2\Debug\plant2.pdb
     文件      277644  2009-06-26 08:35  植物专家\plant2\Debug\plant2.res
     文件           0  2009-06-26 00:23  植物专家\plant2\Debug\plant2.sbr
     文件      127975  2009-06-28 19:39  植物专家\plant2\Debug\plant2Dlg.obj
     文件           0  2009-06-28 19:39  植物专家\plant2\Debug\plant2Dlg.sbr
     文件      798720  2004-07-25 17:02  植物专家\plant2\Debug\SkinPlusPlusDLL.dll
     文件        5232  2009-06-24 11:27  植物专家\plant2\Debug\SkinPlusPlusDLL.lib
     文件       43520  2009-06-23 00:26  植物专家\plant2\Debug\SkinPlusPlusDLL.opt
     文件      133229  2009-06-25 22:36  植物专家\plant2\Debug\StdAfx.obj
     文件     1766901  2009-06-25 22:36  植物专家\plant2\Debug\StdAfx.sbr
     文件      402432  2009-06-28 20:04  植物专家\plant2\Debug\vc60.idb
     文件      569344  2009-06-28 19:39  植物专家\plant2\Debug\vc60.pdb
     文件      123925  2004-07-06 08:58  植物专家\plant2\Debug\XPCorona.ssk
............此处省略46个文件信息