By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
438,659 Members | 1,678 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 438,659 IT Pros & Developers. It's quick & easy.

Object required: '' classic asp page

P: 4
Hello Experts,

Please help me out to resolve my issue. Facing an error Object required : ""

while exectuing the below asp page. Without using procedure section page is working fine, but once i use that section am facing the error message.

As am a newbie to asp, not able to figure it out where exactly am going wrong.

Your kind assistance with the valuable soultions will be really highly appreciated.

Please find below my asp page code.


<%
' Declaring variables
Dim data_source, con, sql_insert, r_new_req_id, MCMS, REQUEST

' A Function to check if some field entered by user is empty
Function ChkString(string)
If string = "" Then string = " "
ChkString = Replace(string, "'", "''")
End Function

'========= Approvals ===================
'line 13 mgrres
mgrres = LTRim(RTrim(ChkString(Request.Form("rdoMgrApproval "))))
hrres = LTRim(RTrim(ChkString(Request.Form("rdoHRApproval" ))))

data_source = "Provider=MSDAORA.1;User ID=owf_mgr;Password=owfmgr;Data Source=orcl;Persist Security Info=False"

r_new_req_id = session("RequestNo")

if mgrres <> "" then

sql_update = "update owf_mgr.request_forms set mgr_res='" & mgrres & "' where request_no='" & session("RequestNo") & "'"

'response.write sql_update
'response.end
'======= Start Of Calling procedure ================'
Set conn = Server.CreateObject("ADODB.connection")
conn.Open data_source

Set Cmd = Server.CreateObject("ADODB.Command")
Set objRs = Server.CreateObject("ADODB.Recordset")
Set Cmd.ActiveConnection = conn
Cmd.CommandType = 4
Cmd.CommandText = "wf_engine.ResumeProcess(MCMS,'" & REQUEST & "-" & r_new_req_id & "')"
Set objRs = Cmd.Execute
'objRs.close
'Set objRs = Nothing

'============ End Of Procedure Part ============'

elseif hrres <> "" then

sql_update = "update owf_mgr.request_forms set hr_res='" & hrres & "' where request_no='" & session("RequestNo") & "'"

endif

Set con = Server.CreateObject("ADODB.connection")
con.Open data_source

on error resume next
con.Execute sql_update
if err<>0 then
Response.Write("There is some problem" & err.description)
else
'Response.Write("<h3> Record Updated Successfully</h3>")
response.redirect("recordupdated.html")
end if

' Done. Close the connection

con.Close
Set con = Nothing

%>
Jul 31 '12 #1
Share this Question
Share on Google+
1 Reply


P: 4
Error Detai :


Error Type:
Microsoft VBScript runtime (0x800A01A8)
Object required: ''
/Web-Forms/updateempdetails.asp, line 13
Jul 31 '12 #2

Post your reply

Sign in to post your reply or Sign up for a free account.