工控编程吧

标题: 271上位机VC MFC使用ODBC新建数据表 [打印本页]

---

作者: qq263946146    时间: 2016-5-1 14:47
标题: 271上位机VC MFC使用ODBC新建数据表

(, 下载次数: 3)

上传

点击文件名下载附件

271上位机VC MFC使用ODBC新建数据表

功能展示

在我们数据库工程开发中，往往要新建表，我们当前例程演示新建表的功能，例程仅演示新数据表的建立，并没有向新表中添加任何数据，效果如图，点击菜单的<创建 新表格>，例程会新建一数据表，由于表中没有记录，所以还会弹出提示对话框；

要点提示

1.创建表格只要调用CDataBase类的成员函数ExecuteSQL便可，例程中实现的代码段为sTableCommand="CREATE TABLE 工控编程吧1(WebName varchar(10) NOT NULL,WebAddrvarchar(20))";

m_Set->m_pDatabase->ExecuteSQL(sTableCommand);

《CREATE TABLE 工控编程吧1》表示新创建数据表工控编程吧1，WebAddr，WebName 为表的字段名， varchar(10) 表示字段的类型，NOT NULL表示字段不能为空

实现功能

1.新建一视窗派生于CListView的单文档的应用程序；

3.在视窗类中包含二头文件#include<afxdb.h>#include<ODBCINST.H>

4.在视窗类中添加三成员变量public:public:

  CDatabase    m_DB;

  CListCtrl*   m_List;//列表视图控件的指针

  CRecordset*  m_Set;//记录集对象的指针并在构造函数中初始化，在析构函数中删除

1. CGkbc8View::CGkbc8View()
   
2. {
   
3.         m_Set=NULL;
   
4.         m_List=&GetListCtrl();//获取列表视图控件
   
5.         m_dwDefaultStyle|=LVS_REPORT;//以报表的格式显示
   
6. }
   
7. CGkbc8View::~CGkbc8View()
   
8. {
   
9.         if(m_Set!=NULL)
   
10.                 delete m_Set;
    
11. }
    

复制代码

5.在视窗中化函数OnInitialUpdate()中注册数据源，并连接记录集显示数据

1. void CGkbc8View::OnInitialUpdate()
   
2. {
   
3.         CListView::OnInitialUpdate();
   
4.         if(m_Set==NULL)
   
5.         {
   
6.         if(!SQLConfigDataSource(NULL, //父窗口指针；
   
7.                                         ODBC_ADD_DSN,  //添加的数据源的类型；
   
8.                                                         "Microsoft Access Driver (*.mdb)",//驱动程序名；
   
9.                                                         //属性：
   
10.                             "DSN=Students\0"  //数据源名
    
11.                             "Description=工控编程吧测试用\0"    //数据源的说明
    
12.                             "FileType=Microsoft Access\0"    //数据源文件类型
    
13.                                                         "DBQ=E:\\每日任务\\STUDENTSINFO.MDB\0"//数据库文件全路径名
    
14.                     //在根据现有数据设置列的数据类型时所要扫描的行数。 可以为 1 到 16，
    
15.                                          //默认值为 8；如果设置为 0，将扫描        所有行。（如果数字超出界限，会返回一个错误）        
    
16.                                                 "MaxScanRows=0\0")
    
17.                   )
    
18.                 {
    
19.                         AfxMessageBox("创建数据源失败!!");
    
20.                         return;
    
21.                 }
    
22.                 m_Set=new CRecordset(&m_DB);
    
23.                 if(!m_DB.OpenEx(_T("DSN=Students"),0))
    
24.                 {
    
25.                         AfxMessageBox("打开数据源失败!!");
    
26.                         return;
    
27.                 }
    
28.                 m_Set->Open(CRecordset::dynaset,_T("Select * from Basic"));
    
29.         }
    
30. 
    
31.         int i=0,j=0;
    
32.         CODBCFieldInfo DbFi;//存储记录集字段信息的结构体
    
33.         LV_COLUMN LvColumn;//存储列信息的结构体
    
34.         LvColumn.mask=LVCF_FMT|LVCF_WIDTH|LVCF_TEXT|LVCF_SUBITEM;//设置列属性
    
35.         //读取记录集的字段信息
    
36.         int nDBFields=m_Set->GetODBCFieldCount();
    
37.         for(i=0;i<nDBFields;i++)
    
38.         {
    
39.                 m_Set->GetODBCFieldInfo(i,DbFi);
    
40.                 LvColumn.iSubItem=i;
    

复制代码

1. LvColumn.fmt=LVCFMT_CENTER;
   
2.                 LvColumn.cx=DbFi.m_strName.GetLength()*10+20;
   
3.                 LvColumn.pszText=DbFi.m_strName.GetBuffer(DbFi.m_strName.GetLength());
   
4.                 GetListCtrl().InsertColumn(i,&LvColumn);
   
5.         }
   
6.         //根据记录集的数据信息添加行
   
7.         LV_ITEM LvItem;//条目结构体对象
   
8.         CString string;//字符串临时变量
   
9.         CDBVariant DbVariant;
   
10.         i=0;
    
11.         if(m_Set->IsEOF())//记录集是否为空
    
12.         {
    
13.                 AfxMessageBox("记录集没有记录");
    
14.                 return;
    
15.         }
    
16.         m_Set->MoveFirst();//从第一个记录开始
    
17.         while(m_Set->IsEOF()==0)//是否到达最后一个记录
    
18.         {
    
19.                 LvItem.mask=LVIF_TEXT;
    
20.                 LvItem.iItem=i;
    
21.                 LvItem.iSubItem=0;
    
22.                 m_Set->GetFieldValue((short)0,string);
    
23.                 LvItem.pszText=string.GetBuffer(string.GetLength());
    
24.                 m_List->InsertItem(&LvItem);//插入条目
    
25.                 //显示列数据
    
26.                 for(j=1;j<nDBFields;j++)
    
27.                 {
    
28.                         m_Set->GetFieldValue((short)j,string);
    
29.                         m_List->SetItemText(i,j,string.GetBuffer(string.GetLength()));
    
30.                 }
    
31.                 m_Set->MoveNext();//下移记录
    
32.                 i++;
    
33.         }
    
34. }
    

复制代码

6.添加菜单项<创建新表格>关联函数，实现执行SQL语句功能

1. void CGkbc8View::OnCreate()
   
2. {
   
3.         m_List->SetRedraw(FALSE);
   
4.         m_List->DeleteAllItems();
   
5.         CHeaderCtrl* pHeader = (CHeaderCtrl*) m_List->GetDlgItem(0);
   
6.         int nColCount = pHeader->GetItemCount();
   

复制代码

1. for(int k=nColCount-1;k>=0;k--)
   
2.         {
   
3.                 int re=m_List->DeleteColumn(k);
   
4.         }
   
5.         if(m_Set->IsOpen())
   
6.                 m_Set->Close();
   
7. //<>
   
8.         CString sTableCommand;
   
9.         sTableCommand="CREATE TABLE 工控编程吧1(WebName varchar(10) NOT NULL,WebAddr varchar(20))";
   
10.         m_Set->m_pDatabase->ExecuteSQL(sTableCommand);
    
11.         CString sSelect;
    
12.         sSelect="SELECT * FROM 工控编程吧1;";
    
13.         if(!m_Set->IsOpen())
    
14.                 m_Set->Open(CRecordset::dynaset,sSelect);
    
15.     int j=0;
    
16.         CODBCFieldInfo DbFi;//存储记录集字段信息的结构体
    
17.         LV_COLUMN LvColumn;//存储列信息的结构体
    
18.         LvColumn.mask=LVCF_FMT|LVCF_WIDTH|LVCF_TEXT|LVCF_SUBITEM;//设置列属性
    
19.         //读取记录集的字段信息
    
20.         int nDBFields=m_Set->GetODBCFieldCount();
    
21.         for(int i=0;i<nDBFields;i++)
    
22.         {
    
23.                 m_Set->GetODBCFieldInfo(i,DbFi);
    
24.                 LvColumn.iSubItem=i;
    
25.                 LvColumn.fmt=LVCFMT_CENTER;
    
26.                 LvColumn.cx=DbFi.m_strName.GetLength()*10+20;
    
27.                 LvColumn.pszText=DbFi.m_strName.GetBuffer(DbFi.m_strName.GetLength());
    
28.                 GetListCtrl().InsertColumn(i,&LvColumn);
    
29.         }
    
30.         //根据记录集的数据信息添加行
    
31.         LV_ITEM m_item;//条目结构体对象
    
32.         CString string;//字符串临时变量
    
33.         CDBVariant DbVariant;
    
34.         i=0;
    
35.         if(m_Set->IsEOF())//记录集是否为空
    
36.         {
    
37.                 AfxMessageBox("记录集没有记录");
    
38.                 return;
    
39.         }
    
40.         m_Set->MoveFirst();//从第一个记录开始
    
41.         while(m_Set->IsEOF()==0)//是否到达最后一个记录
    
42.         
    

复制代码

1. {
   
2.                 m_item.mask=LVIF_TEXT;
   
3.                 m_item.iItem=i;
   
4.                 m_item.iSubItem=0;
   
5.                 m_Set->GetFieldValue((short)0,string);
   
6.                 m_item.pszText=string.GetBuffer(string.GetLength());
   
7.                 m_List->InsertItem(&m_item);//插入条目
   
8.                 //显示列数据
   
9.                 for(j=1;j<nDBFields;j++)
   
10.                 {
    
11.                         m_Set->GetFieldValue((short)j,string);
    
12.                         m_List->SetItemText(i,j,string.GetBuffer(string.GetLength()));
    
13.                 }
    
14.                 m_Set->MoveNext();//下移记录
    
15.                 i++;        
    
16.                 m_List->SetRedraw();
    
17.                 m_List->Invalidate();
    
18.         }        
    
19. }
    

复制代码

我们来演示功能实现的整个过程

[iqiyi]http://player.video.qiyi.com/23c111a2059bdac622c6e8613ce8af3b/0/0/w_19rsuaiic9.swf-albumId=6383814709-tvId=6383814709-isPurchase=0-cnId=12[/iqiyi]

(, 下载次数: 0)

上传

点击文件名下载附件

[note]1[/note]

---

欢迎光临 工控编程吧 (https://www.gkbc8.com/)

Powered by Discuz! X3.4