= L"TEST";

      rs->Update(vtMissing, vtMissing);



   // 恢复原名称

      rs->Fields->GetItem((long)2)->PutValue(vtFirstName);

      // -or-

      rs->Fields->GetItem((long)2)->Value = vtFirstName;

      rs->Update(vtMissing, vtMissing);

      rs->Close();

   }

   catch (_com_error &e)

   {

      printf("Description = ''%s''\n", (char*) e.Description());

   }

   ::CoUninitialize();

}



利用(IDispatch *)转换ADO对象的指针类型

1．在一个Variant中显式地封装一个活动的Connection对象，然后用(IDispatch *)进行类型转换确保正确的构造函数被调用。同时明确地设置第二个参数为缺省的true，使该对象的引用计数在Recordset::Open操作完成后仍得到正确的维护。

2．表达式(_bstr_t)不是一个类型转换，而是一个_variant_t的操作符，用以从中提取一个_bstr_t字符串。

表达式(char*)也不是一个类型转换，而是一个_bstr_t的操作符，用以从中提取封装在_bstr_t中的字符串的指针。

下面这些代码演示了_variant_t和_bstr_t的一些常见操作。

#import "c:\Program Files\Common Files\System\ADO\msado15.dll" \

no_namespace rename("EOF", "EndOfFile")



#include <stdio.h>



void main(void)

{

   CoInitialize(NULL);

   try

   {

      _ConnectionPtr pConn("ADODB.Connection");

      _RecordsetPtr  pRst("ADODB.Recordset");



      pConn->Open("Provider=sqloledb;Data Source=a-tima10;"

         "Initial Catalog=pubs;User Id=sa;Password=;",

         "", "", adConnectUnspecified);

// Note 1

      pRst->Open(

         "authors",

         _variant_t((IDispatch *) pConn, true),

         adOpenStatic,

         adLockReadOnly,

         adCmdTable);

      pRst->MoveLast();

// Note 2

      printf("Last name is ''%s %s''\n",

            (char*) ((_bstr_t) pRst->GetFields()->GetItem("au_fname")->GetValue()),

            (char*) ((_bstr_t) pRst->Fields->Item["au_lname"]->Value));



      pRst->Close();

      pConn->Close();

   }