VC ODBC使用总结

    技术2022-05-11  46

     

    1.打开数据库

    CDatabase database;database.OpenEx( _T( "DSN=zhuxue" ),CDatabase::noOdbcDialog);//zhuxue为数据源名称

    2.关联记录集

    CRecordset recset(&database);

    3.查询记录

    CString sSql1=""; sSql1 = "SELECT * FROM tablename" ;     recset.Open(CRecordset::forwardOnly, sSql1, CRecordset::readOnly);

    int ti=0;CDBVariant var;//var可以转换为其他类型的值

     while (!recset.IsEOF())        {   //读取Excel内部数值   recset.GetFieldValue("id",var);   jiangxiang[ti].id=var.m_iVal;   recset.GetFieldValue("name", jiangxiang[ti].name);   ti++;   recset.MoveNext();  }

    recset.Close();//关闭记录集

    4.执行sql语句

    CString sSql=""; sSql+="delete * from 院系审核";//清空表 database.ExecuteSQL(sSql);

    sSql也可以为Insert ,Update等语句

    5.读取字段名

     sSql = "SELECT * FROM Sheet1" ;    //读取的文件有Sheet1表的定义,或为本程序生成的表.              // 执行查询语句   recset.Open(CRecordset::forwardOnly, sSql, CRecordset::readOnly);   int excelColCount=recset.GetODBCFieldCount();//列数   CString excelfield[30];  //得到记录集的字段集合中的字段的总个数    for( i=0;i<excelColCount;i++)     {      CODBCFieldInfo fieldinfo;   recset.GetODBCFieldInfo(i,fieldinfo);   excelfield[i].name =fieldinfo.m_strName;//字段名       } 

    6.打开excel文件

    CString sDriver = "MICROSOFT EXCEL DRIVER (*.XLS)"; // Excel安装驱动 CString sSql,sExcelFile; //sExcelFile为excel的文件路径

    TRY {  // 创建进行存取的字符串  sSql.Format("DRIVER={%s};DSN='';FIRSTROWHASNAMES=1;READONLY=FALSE;CREATE_DB=/"%s/";DBQ=%s",sDriver, sExcelFile, sExcelFile);    // 创建数据库 (既Excel表格文件)  if( database.OpenEx(sSql,CDatabase::noOdbcDialog) ){

    //可以把excel作为一个数据库操作

    }

     } catch(e) {  TRACE1("Excel驱动没有安装: %s",sDriver);  AfxMessageBox("读取失败,请检查是否定义数据区Sheet1"); }


    最新回复(0)