VC用Ado接口连接和使用数据库(3)

　　　NULL,

　　　CLSCTX_INPROC_SERVER,

　　　IID_IADORecordset,

　　　(LPVOID*)&prs

　　　);//初始化一个ADO数据集

　　CoCreateInstance(CLSID_CADOField,

　　　NULL,

　　　CLSCTX_INPROC_SERVER,

　　　IID_IADOFields,

　　　(LPVOID*)&pfds

　　　);//初始化一个ADO数据域集合(域即是Fox中的字段,下同)

　　CoCreateInstance (CLSID_CADOField,

　　　NULL,

　　　CLSCTX_INPROC_SERVER,

　　　IID_IADOField,

　　　(LPVOID*)&pfd

　　　);//初始化一个ADO数据域集合中的一个域

　　//打开上述ADO连接

　　pdb->Open((unsigned short*)(LPCSTR)s,(unsigned short*)"",(unsigned short*)"",0);

　　 //打开上述ADO数据集,但它的连接参数是使用的上述字符串

　　//应当存在以上面的连接替换该字符串的方法,但我没找到

　　prs->Open(COleVariant(_T("资料信息")),COleVariant(s),adOpenKeyset,adLockOptimistic,adCmdTable);

　　//数据集的域不存在打开与否,只需直接到已打开的数据集中引用即可,详情请见
　　
　　//CBKDlg::OnBeforeColUpdateDatagrid方法

　　m_dg.ClearFields ();//MS DATAGRID 控件(Activex)的数据清空

　　m_dg.SetRefDataSource(prs); //上述控件与数据集的绑定

　　return TRUE;

　　}