%@language=vbscript%> <% dim strpagecode strpagecode= "4EXIS01" %> <% dim strBookingNo dim strBookingRemarks dim rsBookingStatus strBookingNo=request("BookingNo") strBookingStatus="select b.Remarks from Exhib_Book_Proposed b where b.bookingno='" & strBookingNo & "'" set rsBookingStatus=server.CreateObject("adodb.recordset") rsBookingStatus.Open strBookingStatus,objconn if not rsBookingStatus.eof then strBookingRemarks=rsBookingStatus("Remarks") else strBookingRemarks="Sorry, No Remarks available" end if Response.Write "" & strBookingRemarks & "" %>