Get the recordset from Stored Procedure

I try to get the recordset return by a stored procedure, but failed. I check the Database, the insert command has run successfully, but the error raises when I try to read the record set. I try to use GetRecordCount() method to get the number of records, but get the same error.
The error message is: Unknown error 0x800A0E78

// Stored Procedure
CREATE PROCEDURE SP_ACCOUNT_INSERT
@ACCOUNT varchar(40),
@BALANCE decimal(15,4)
AS
BEGIN
declare @ACCOUNT_ID bigint
INSERT INTO ACCOUNTS (ACCOUNT, BALANCE) VALUES (@ACCOUNT, @BALANCE)
SET @ACCOUNT_ID=SCOPE_IDENTITY()
SELECT ACCOUNT_ID, ACCOUNT, BALANCE FROM ACCOUNTS WHERE ACCOUNT_ID=@ACCOUNT_ID
END

// VC++ Code
varchar nAccount[40] = "TEST ACCT";
double dBalance = 10.04;
_variant_t vtAccount = _com_util::ConvertStringToBSTR(nAccount)
vtAccountId.vt = VT_BSTR;
_variant_t vtBalance = double_to_DECIMAL(dBalance);
vtBalance.vt = VT_DECIMAL;

_CommandPtr pComm;
pComm.CreateInstance(__uuidof(Command));
pComm->ActiveConnection = m_pConnection;
pComm->CommandText = _bstr_t("SP_ACCOUNT_INSERT");
pComm->PutCommandType(adCmdStoredProc);
try
{
pComm->Parameters->Refresh();  // Get the Parameter List from Database
long paramCnt = pComm->Parameters->GetCount();
pComm->Parameters->GetItem("@ACCOUNT")->Value = vtAccount;
pComm->Parameters->GetItem("@BALANCE")->Value = vtBalance;

_RecordsetPtr pRs;
pRs.CreateInstance(__uuidof(Recordset));
pRs = pComm->Execute(NULL, NULL, adCmdStoredProc);   // Successfully done

LONGLONG llAccountId = -1;
_variant_t vtAccountId = pRs->GetCollect("ACCOUNT_ID");   // Error happends here
llAccountId = vtAccountId.llVal;
}
catch (_com_error e)
{
CString errMsg = e.ErrorMessage();
AfxMessageBox(errMsg);
}