基于B/S体系结构开发应用系统

pRecordSet->Open(bstrSQL,bstrDSN,adOpenKeyset,adLockOptimistic,adCmdText);

pRecordSet->PutRefActiveConnection(NULL);

pRecordSetClone = pRecordSet->Clone(adLockOptimistic);

pRecordSetClone->QueryInterface(IID_IDispatch, (void**)ppRecordset);

pRecordSet->Close();

pRecordSet = NULL;

::SysFreeString(bstrDSN);

::SysFreeString(bstrSQL);

//事物成功完成，则提交该事物

I f(m_spObjectContext-)

m_spObjectContext->SetComplete();

}

catch(_com_error &e){

if(m_spObjectContext) //事物失败，回滚事物处理

m_spObjectContext->SetAbort()

// 其他错误处理，从略

}

return hr;

}

RequeryAllScores()实现部分从略。另外ASP调用实现部分比较简单从略。

组件编译结束后可以用COM+组件服务管理工具来管理COM+组件及其所在的应用程序。COM+组件服务是个图形界面的管理工具，利用它可以安装和发布组件、配置组件及其所在应用程序的属性，以实现组件安全性、MTS支持、排对组件、设置组件构造参数等。