%@ Language=VBScript%> <% 'dim strpagecode 'strpagecode= "FAIRG40" 'session("usertype")="NUS" %> <% ' request("id")=session("appid") 'Response.write session("appid") 'Response.write "Hello" 'Response.end dim rsPrmAmt dim amount set rsPrmAmt=server.CreateObject("ADODB.Recordset") 'on error resume next rsPrmAmt.Open "select advanceamount from hallbookingTemp where appid=" & session("appid"),objConn 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 'session("advamt")=amount rsPrmAmt.Close set rsPrmAmt=nothing%>