access中用ADO执行带参数的存储过程 access数据库ado编程

转载

mob64ca1415f0ab 2024-05-07 14:07:48

文章标签 数据库 access table integer sql 文章分类 架构后端开发

我们一般用ADOX创建数据库，然后再用ADO创建数据库的表。

例程CREATE_DB_AND_TABLE演示如何使用ADO创建ACCESS数据库的表。

打开VC++ 6.0，新建一个基于对话框的工程CREATE_DB_AND_TABLE。在对话框IDD_CREATE_DB_AND_TABLE_DIALOG中添加如下控件：

控件名称	ID	用途
编辑框	IDC_DBNAME	输入数据库名称
按钮	IDC_BTN_CREATE	创建数据库
编辑框	IDC_TABLENAME	输入表名
按钮	IDC_BTN_CREATE_TABLE	创建表

使用ClassWizard给两个编辑框创建CString变量：

编辑框	CString变量
编辑框IDC_DBNAME	m_dbName
编辑框IDC_TABLENAME	m_tableName

双击IDC_BTN_CREATE按钮，并编辑OnBtnCreate()函数如下：

void CADOXCreateDatabaseDlg::OnBtnCreate() 
{
    UpdateData(TRUE);
 
 
    CString str;
    str="d://"+m_dbName+".mdb";
 
    if(PathFileExists(str))
    {
       CString strTemp;
       strTemp.Format("%s已存在!",str);
       AfxMessageBox(strTemp);
       return ;
    }
    _CatalogPtr m_pCatalog = NULL;
    CString DBName="Provider=Microsoft.JET.OLEDB.4.0;Data source=";
    DBName=DBName+str;
    try
    {
       m_pCatalog.CreateInstance(__uuidof(Catalog));
       m_pCatalog->Create(_bstr_t((LPCTSTR)DBName));
    }
    catch(_com_error &e)
    {
       AfxMessageBox(e.ErrorMessage());
       return ;
 
    }   
}

以上代码例程ADOXCreateDatabase中已经详细叙述。

双击IDC_BTN_CREATE_TABLE按钮，并编辑OnBtnCreateTable()函数如下：

void CCREATE_DB_AND_TABLEDlg::OnBtnCreateTable() 
{
 
    //先判断表名编辑框是否为空
    UpdateData(TRUE);
 
    if(!m_tableName.IsEmpty())
    {
       ADOX::_CatalogPtr m_pCatalog=NULL;
 
        ADOX::_TablePtr m_pTable=NULL;
 
 
        CString str;
       str="d://"+m_dbName+".mdb";
 
       CString DBName="Provider=Microsoft.JET.OLEDB.4.0;Data source=";
        DBName=DBName+str;
        //这段代码先检查表是否已经存在，如果表已经存在，不再创建，直接返回。
        //其实这段代码不必深入研究，只需知道它的功能，直接拿来使用即可
       try
       {
           m_pCatalog.CreateInstance(__uuidof(ADOX::Catalog));
           m_pCatalog->PutActiveConnection(_bstr_t(DBName));
           int tableCount=m_pCatalog->Tables->Count;
           int i=0;
           while(i<tableCount)
           {
              m_pTable=(ADOX::_TablePtr)m_pCatalog->Tables->GetItem((long)i);
              CString tableName=(BSTR)m_pTable->Name;
              if(tableName==m_tableName)
              {
                  AfxMessageBox("该表已经存在!");
                  return;
              }
              i++;
           }
 
       }
       catch(_com_error &e)
       {
           AfxMessageBox(e.Description());
           return;
       }
 
       ADODB::_ConnectionPtr m_pConnection;
       //创建表
       _variant_t RecordsAffected;
       try
       {
           m_pConnection.CreateInstance(__uuidof(ADODB::Connection));
 
           
           //Open方法的原型：
           //Open(_bstr_t ConnectionString,_bstr_t UserID,_bstr_t Password,long Options)
           //ConnectionString为连接字串，UserID是用户名，Password是登陆密码
           //Options是连接选项，可以是如下几个常量：
           //adModeUnknown 缺省，当前的许可权未设置
           //adModeRead 只读
           //adModeWrite 只写
           //adModeReadWrite 可以读写
           //adModeShareDenyRead 阻止其它Connection对象以读权限打开连接
           //adModeShareDenyWrite 阻止其它Connection对象以写权限打开连接
           //adModeShareExclusive 阻止其它Connection对象打开连接
           //adModeShareDenyNone 阻止其它程序或对象以任何权限建立连接
 
           m_pConnection->Open(_bstr_t(DBName),"","",ADODB::adModeUnknown);
       }
       catch(_com_error e)
       {
           CString errormessage;
           errormessage.Format("连接数据库失败!/r错误信息:%s",e.ErrorMessage());
           AfxMessageBox(errormessage);
           return;
       }
       try
       {
           CString strCommand;
            /*

执行SQL命令：CREATE TABLE创建表格

该表包含三个字段：记录编号 INTEGER,姓名 TEXT,出生年月 DATETIME

SQL语言中的create table语句被用来建立新的数据库表格。

create table语句的使用格式如下：

create tablename (column1 data type,column2 data type,column3 data type);

如果用户希望在建立新表格时规定列的限制条件，可以使用可选的条件选项

create table tablename 
               (column1 data type[constraint],
              column2 data type[constraint],
              column3 data type[constraint]);

举例：

create table employee
           (firstname varchar(15),
           lastname varchar(20),
           age number(3),
           address varchar(30),
           city varchar(20));

简单来说，创建新表格时，在关键词create table后面加入所要建立的表格的名称，

然后在括号内顺次设定各列的名称，数据类型，以及可选的限定条件等。

使用SQL语句创建的数据库表格和表格中列的名称必须以字母开头，

后面可以使用字母，数字或下划线，名称的长度不能超过30个字符，

注意，用户在选择表格名称时不要使用SQL语言中的保留关键字，

如select,create,insert等，作为表格或列的名称

*/
 
           strCommand.Format("CREATE TABLE %s(记录编号 INTEGER,姓名 TEXT,出生年月 DATETIME)",m_tableName);
 
 
           //Execute(_bstr_t CommandText,VARIANT* RecordsAffected,long Options)
           //其中CommandText是命令字串，通常是SQL命令，
           //参数RecordsAffected是操作完成后所影响的行数
           //参数Options表示CommandText中内容的类型，可以取下列值之一：
           //adCmdText 表明CommandText是文本命令
           //adCmdTable 表明CommandText是一个表名
           //adCmdProc 表明CommandText是一个存储过程
           //adCmdUnknown 未知
 
           m_pConnection->Execute(_bstr_t(strCommand),&RecordsAffected,ADODB::adCmdText);
 
           if(m_pConnection->State)
              m_pConnection->Close();
       }
       catch(_com_error &e)
       {
           AfxMessageBox(e.Description());
       }
    }
 
}

这段代码先用ADOX的Catalog对象检查表是否已经存在，如果该表已经存在，直接返回；如果还没有该表，使用ADO的Connection对象的Execute函数创建表。

Connection对象的用法：首先定义一个Connection类型的指针，然后调用CreateInstance（）来创建一个连接对象的实例，再调用Open函数建立与数据源的连接。最后使用Execute（）函数执行SQL语句创建表。

关于调用CreateInstance（）来创建连接对象的实例，还需作一点说明。ADO库包含三个基本接口：_ConnectionPtr接口，_RecordsetPtr接口和_CommandPtr接口。其分别对应Connection对象（完成应用程序对数据源的访问连接），Recordset对象（将查询的结果以记录集的方式存储）和Command对象（对已连接的数据源进行命令操作）。

_ConnectionPtr m_pConnection;
_RecordsetPtr m_pRecordset;
_CommandPtr m_pCommand;

而这三个对象实例的创建，可以使用如下语句：

m_pConnection.CreateInstance(__uuidof(Connection));

或者：

m_pConnection.CreateInstance(“ADODB.Connection”);
 
m_pRecordset.CreateInstance(__uuidof(Recordset));

或者：

m_pRecordset.CreateInstance(“ADODB.Recordset”);
 
m_pCommand.CreateInstance(__uuidof(Command));

或者：

m_pCommand.CreateInstance(“ADODB.Command”);

两种方法的作用完全相同，使用哪种方法，完全是您的个人爱好问题。

如例程ADOXCreateDatabase，在BOOL CCREATE_DB_AND_TABLEApp::InitInstance()函数中加入：

if(!AfxOleInit())
    {
       AfxMessageBox("OLE初始化出错！");
       return FALSE;
    }

在stdafx.h中加入如下语句：

#import "C:/Program Files/Common Files/system/ado/msadox.dll" 
#import "C:/Program Files/Common Files/system/ado/msado15.dll" rename("EOF","adoEOF")

关于这两条语句，需要进行特别说明：

由于该例程同时使用ADOX和ADO，需要同时引入msado15.dll和msadox.dll两个库。这两个库的名字空间是不同的，msado15.dll的名字空间是ADODB，msadox.dll的名字空间是ADOX。在使用ADO所属的名字空间的变量，函数时，在前面加上ADODB::，在使用ADOX所属的名字空间的变量，函数时，在前面加上ADOX::。

另外，一般ADOX和ADO分开操作。您也可以在ADOX操作部分使用using namespace ADOX::，而在ADO操作部分使用using namespace ADO:，以区分名字空间。这样，您就不必再使用ADOX::和ADODB::了。

rename(“EOF”,”adoEOF”) //重命名EOF是必要的，因为典型的VC应用都已经定义了EOF作为常数－1，为了避免冲突，将ADO中的EOF重命名为adoEOF。

#import中有一个属性为no_namespace，这是告诉编译器该类不在一个单独的名字空间中，使用no_namespace意味着你不需要在初始化变量的时候引用名字空间。当然如果在您的应用中需要导入多个类型库的话，不要使用no_namespace，以免引起名字冲突。

再通俗一点讲，就是只导入一个类型库的话，可以在#import语句中加入no_namespace属性，您的程序可以直接使用这个类型库的名字空间的内容，而不必使用using namespace XXX;或XXX::，这是因为no_namespace属性告诉编译器该类型库不再名字空间，而是在全局空间上工作；如果您导入几个类型库，而这几个类型库之间没有定义冲突，您也可以在使用no_namespace属性；但如果两个类型库中有定义冲突，就不能使用no_namespace属性，如果使用no_namespace属性，就会在全局空间产生定义冲突。

对于本例程，您可以把stdafx.h中的

#import "C:/Program Files/Common Files/system/ado/msadox.dll" 
#import "C:/Program Files/Common Files/system/ado/msado15.dll" rename("EOF","adoEOF")

改为

#import "C:/Program Files/Common Files/system/ado/msadox.dll" 
#import "C:/Program Files/Common Files/system/ado/msado15.dll" no_namespace  rename("EOF","adoEOF")

这样改动后，void CCREATE_DB_AND_TABLEDlg::OnBtnCreateTable()中的ADODB::需要完全省略掉。

当然，您也可以把这两行改为：

#import "C:/Program Files/Common Files/system/ado/msadox.dll" no_namespace
#import "C:/Program Files/Common Files/system/ado/msado15.dll" rename("EOF","adoEOF")

但这样改动后，void CCREATE_DB_AND_TABLEDlg::OnBtnCreateTable()中的ADOX::需要完全省略掉。由于ADOX和ADO有定义冲突，也就是说，msado15.dll和msadox.dll有相同的定义部分，所以在一个程序中，不允许同时使用no_namespace。

本文章为转载内容，我们尊重原作者对文章享有的著作权。如有内容错误或侵权问题，欢迎原作者联系我们进行内容更正或删除文章。