ADO创建ACCESS数据库的表(3)

我们一般用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。