%@ Language=VBScript%> <% dim strpagecode strpagecode= "FAIRG40" session("usertype")="NUS" %> <% response.end dim rsPrmAmt dim amount set rsPrmAmt=server.CreateObject("ADODB.Recordset") on error resume next rsPrmAmt.Open "select advanceamount from hallbookingTemp where appid= " & request("id") if err <> 0 then 'objconn.RollbackTrans response.Redirect "/inc/admin/error.asp?errortype=err_record§ion="&server.URLEncode("Hall Registration") Response.End end if on error goto 0 if not (rsPrmAmt.EOF or rsPrmAmt.BOF) then amount=rsPrmAmt("advanceamount") else amount=0 end if rsPrmAmt.Close set rsPrmAmt=nothing%>