ADODB...
Hi Guys,
I have the following code and it gives the error provided below.
Any help is appreciated.
*******CODE**************
dim i_title
dim i_text
dim valid_date
dim iauto_delete
dim expiry_date
dim current_date
dim user_id
dim dbCmd
i_title = request("title")
i_text=request("bulletin_txt")
Valid_date = request("expdate")
iauto_delete= request("auto_delete")
expiry_date= request("expirydate")
current_date = request("hidSysDate")
user_id=123
call open_db_connection()
set dbCmd = Server.CreateObject("ADODB.COMMAND")
cmd.ActiveConnection = con
Const Bulletin_insert = "{call HMIS_BULLETIN_Pkg.INSERT_BULLETIN_PROC(?,?,?,?,?,? ,?,?)}"
with dbCmd
.CommandText = Bulletin_insert
.CommandType = adCmdText
.Parameters(0).direction = adParamInput
.Parameters(1).direction = adParamInput
.Parameters(2).direction = adParamInput
.Parameters(3).direction = adParamInput
.Parameters(4).direction = adParamInput
.Parameters(5).direction = adParamInput
.Parameters(6).direction = adParamInput
.Parameters(0).Value = i_title
.Parameters(1).Value = i_text
.Parameters(2).Value =current_date
.Parameters(3).Value =i_valid_date
.Parameters(4).Value = i_auto_delete
.Parameters(5).Value = expiry_date
.Parameters(6).Value = user_id
.execute
end with
dbCmd.Cancel
set dbCmd = nothing
********ERROR***********
ADODB.Command error '800a0cc1'
Item cannot be found in the collection corresponding to the requested name or ordinal.
/hmis/NITIN/asp_files/HMIS_Add_Bulletins.asp, line 347
Cheers,
Nitin
|
