MFC下ADO方式，该如何调用Oracle库函数raw_TSNPing呢?

在MFC下使用ADO方式调用Oracle库函数`raw_TSNPing`，需要使用ADO的Command对象来执行SQL语句。以下是一个示例代码：

// 初始化COM组件
CoInitialize(NULL);

// 创建Connection对象
_ConnectionPtr pConn("ADODB.Connection");
pConn->ConnectionString = "Provider=OraOLEDB.Oracle;Data Source=<Oracle TNS Name>;User ID=<username>;Password=<password>";
pConn->Open("", "", "", adConnectUnspecified);

// 创建Command对象
_CommandPtr pCmd("ADODB.Command");
pCmd->ActiveConnection = pConn;

// 设置SQL语句
pCmd->CommandText = "SELECT raw_TSNPing('www.oracle.com', 5000) FROM dual";

// 执行SQL语句
_RecordsetPtr pRs = pCmd->Execute(NULL, NULL, adCmdText);

// 获取结果
if (!pRs->BOF && !pRs->EndOfFile) {
    _variant_t varResult = pRs->GetCollect(0);
    if (varResult.boolVal) {
        // 连接成功
    }
    else {
        // 连接失败
    }
}

// 释放资源
pRs->Close();
pConn->Close();
CoUninitialize();

在这个示例中，首先使用`CoInitialize`函数初始化COM组件，然后创建`Connection`对象，设置连接字符串并打开连接。接着创建`Command`对象，设置SQL语句并执行，最后获取结果并释放资源。注意，在SQL语句中需要使用`SELECT`语句来调用`raw_TSNPing`函数，而`FROM`子句中需要指定一个表（这里使用`dual`表）。

另外，需要将`<Oracle TNS Name>`、`<username>`和`<password>`替换为实际的连接信息。