Search code examples
vbscriptasp-classicado

Parameterized query in Classic Asp


My db access code is like following:

set recordset = Server.CReateObject("ADODB.Recordset")
set cmd1  = Server.CreateObject("ADODB.Command")
cmd1.ActiveConnection = Conn //connection object already created
cmd1.CommandText = "SELECT * FROM lbr_catmaster where catname = ?"
cmd1.CommandType = adCmdText
set prm = cmd1.CreateParameter("@prm", 200, 1,200 , "development")
cmd1.Parameters.Append prm
set recordset = cmd1.Execute

But there is no db hit going. Please help with this. I am using sql server 2005.

Thanks.


Solution

  • In my code, this is how I get a recordset from a command:

    Set rs = server.createobject("ADODB.Recordset")
    Set cmd = server.createobject("ADODB.Command")
    
    cmd.ActiveConnection = Conn //connection object already created
    cmd.CommandText = "SELECT * FROM lbr_catmaster where catname = ?"
    cmd.CommandType = adCmdText
    cmd.CommandTimeout = 900 
    
    set prm = cmd.CreateParameter("@prm", 200, 1, 200, "development")
    cmd.Parameters.Append prm
    
    ' Execute the query for readonly
    rs.CursorLocation = adUseClient
    rs.Open cmd, , adOpenForwardOnly, adLockReadOnly
    

    Hope it helps