题 阅读 评论 评论权限 操作 以前实习期间写的一段mfc编程，对数据库和xml格式文档的相关操作 主要相关代码 之五 导入xml格式文档数据到数据库

void CXMLwithSQLDlg::OnBnClickedCinput()
{
    m_list.DeleteAllItems();
    FieldsPtr fields;
    CString strColName;
    BSTR bstrColName;
    long ColCounti;
    _RecordsetPtr Rset;
    CFileException e;
    CString strFileName;
    try
    {
        Rset = m_ado.CreRecordset();
        HRESULT h = Rset->get_Fields(&fields);
        if(SUCCEEDED(h))
        {
            fields->get_Count(&ColCounti);
        }
        MSXML2::IXMLDOMDocumentPtr pDoc;
        MSXML2::IXMLDOMElementPtr xmlRoot;
        MSXML2::IXMLDOMElementPtr xmlNode;
        //创建DOMDocument对象
        HRESULT hr = pDoc.CreateInstance(_uuidof(MSXML2::DOMDocument30));
        if(!SUCCEEDED(hr))
        {
            MessageBox("Error");
            return;
        }
        //读取xml格式路径选择字符串
        CFileDialog FileLog(TRUE,"xml",NULL,OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT,"xml(*.xml)|*.xml|所有文件(*.*)|*.*||",NULL);

        if(FileLog.DoModal() == IDOK)
        {
            strFileName = FileLog.GetFileName();
        }
        //加载xml文档
        pDoc->load((char*)(_bstr_t)strFileName);
        xmlRoot = pDoc->GetdocumentElement();
        MSXML2::IXMLDOMNodeListPtr nodeList = NULL;
        MSXML2::IXMLDOMNodePtr pAttrItem;
        xmlRoot->get_childNodes(&nodeList);
        long iCount;
        nodeList->get_length(&iCount);
        /*解析xml文档并把数据添加到数据库中*/
        for(int t = 0;t < iCount/11;t++)
        {
            long i = 0;
            Rset->AddNew();
            VARIANT varval;
            fields->Item[i]->get_Name(&bstrColName);
            nodeList->get_item(0+t*11,&pAttrItem);
            pAttrItem->get_nodeTypedValue(&varval);
            CString strValue = (char*)(_bstr_t) varval;
            //添加数据到数据库
            Rset->PutCollect(bstrColName, _variant_t (strValue));
            i++;
            ///
            nodeList->get_item(1+t*11, &pAttrItem);
            MSXML2::IXMLDOMNodeListPtr nodeList1 = NULL;
            MSXML2::IXMLDOMNodePtr pAttrItem1;
            pAttrItem->get_childNodes(&nodeList1);
            long iCount1;
            nodeList1->get_length(&iCount1);
            for(int j = 0;j < iCount1;j++)
            {
                fields->Item[i]->get_Name(&bstrColName);
                nodeList1->get_item(j, &pAttrItem1);
                pAttrItem1->get_nodeTypedValue(&varval);
                CString strValue1 = (char*)(_bstr_t) varval;
                Rset->PutCollect(bstrColName, _variant_t (strValue1));
                i++;
            }
            ///
            nodeList->get_item(2+t*11, &pAttrItem);
            MSXML2::IXMLDOMNodeListPtr nodeList2 = NULL;
            //单个节点集合
            MSXML2::IXMLDOMNodePtr pAttrItem2;
            //创建节点列表
            pAttrItem->get_childNodes(&nodeList2);
            long iCount2;
            nodeList2->get_length(&iCount2);
            for(int m = 0;m < iCount2;m++)
            {
                fields->Item[i]->get_Name(&bstrColName);
                nodeList2->get_item(m, &pAttrItem2);
                pAttrItem2->get_nodeTypedValue(&varval);
                CString strValue2= (char*)(_bstr_t) varval;
                Rset->PutCollect(bstrColName, _variant_t (strValue2));
                i++;
            }
            //
            for(int n = 3+t*11;n < 11+t*11;n++)
            {
                fields->Item[i]->get_Name(&bstrColName);
                nodeList->get_item(n, &pAttrItem);
                pAttrItem->get_nodeTypedValue(&varval);
                CString strValue3 = (char*)(_bstr_t) varval;
                Rset->PutCollect(bstrColName, _variant_t (strValue3));
                i++;
            }
            //更新数据库
            Rset->Update();
        }    
        AfxMessageBox("导入成功");
        pDoc.Release();//释放内存
    }
    catch(_com_error e)
    {
        e.Description();
    }
}