How to write using ADODB RecordSet

[sanika1507]

Hi
.Actually I want to count the number of records in a recordset. So I m using the ADODB.Recordset . I just want some one to correct me.

Set Cmd = Server.CreateOb ject("ADODB.Rec ordset")
Cmd.ActiveConne ction = C
Cmd.CommandText = "CP.dbo.spBCode "
Cmd.CommandType = adCmdStoredProc


cmd.Parameters. Append cmd.CreateParam eter("@Bcode", adVarChar, adParamInput, 255, dbQuoteOrNull(s BCode))
cmd.Parameters. Append cmd.CreateParam eter("@F_Ind",a dInteger, adParamInput, , dbQuoteOrNull(b FInd))
cmd.Parameters. Append cmd.CreateParam eter("@S_Ind", adInteger, adParamInput, , dbQuoteOrNull(b SInd))
cmd.Parameters. Append cmd.CreateParam eter("@H_Ind", adInteger, adParamInput, , dbQuoteOrNull(b HInd))
cmd.Parameters. Append cmd.CreateParam eter("@Active", adInteger, adParamInput, , dbQuoteOrNull(b Active))
cmd.Parameters. Append cmd.CreateParam eter("@ACF", adInteger, adParamInput, , dbQuoteOrNull(b ACF))
cmd.Parameters. Append cmd.CreateParam eter("@Base", adInteger, adParamInput, , dbQuoteOrNull(b Base))
cmd.Parameters. Append cmd.CreateParam eter("@MHN", adInteger, adParamInput, , dbQuoteOrNull(b MHN))
cmd.Parameters. Append cmd.CreateParam eter("@SHEVHO", adInteger, adParamInput, , dbQuoteOrNull(b SHEVHO))


The error i m gettin here is
LogTime = 11/7/2007 3:28:07 PM
ASPCode =
ASPDescription =
Category = Microsoft VBScript runtime
Column = -1
Description = Object doesn't support this property or method: 'Cmd.CommandTex t'
File = /cp/an/ref/BCode.asp
Line = 414
Number = -2146827850
Source =
-----------------------
Here only the Bcode is a character type , the rest are all bit type.


Can anyone look into this plzzzzzzzzzz .
just want to be sure we use the recordset here or the ADODB command????????

thanks in advance..

[sonu5588]

Aik Bar phir Aapka Advance Thanks Acha Laga
AAp Mail Id Do Mujhe On sonu5588@yahoo. com