Rediff On The NeT Travel: The hotel section home page

<% Mybudget=Request.Form("budget") Mycity=Request.Form("city") If Mybudget <> "" AND Mycity <> "" Then Set FileObject = Server.CreateObject("Scripting.FileSystemObject") HotelIndex=Server.MapPath("/events")&"\hotelguide\hotelind1.txt" 'Response.write HotelIndex 'Response.write "ggggggggggggg" Set InStream=FileObject.OpenTextFile(HotelIndex,1,False,False) Msg="Search for hotels in "&Mycity&" "&Mybudget&" rupees budget found:" End If %> Rediff On The NeT Travel: The hotel section home page

AIRLINES

HOME | TRAVEL | HOTEL GUIDE


	Welcome to the Rediff Hotel Guide, your source of information for hotels across India, recognised by the Federation of Hotel and Restaurant Association. All you have to do is key in the details and you're on your way! Goa hotels however have their own guide. Should you wish to check out information of the latest package discounts on offer please do check out Hotel Packages. If you would like to book a hotel online please try Hotel Reservations.		<%=Msg%> <% If Mybudget <> "" AND Mycity <> "" Then While not InStream.AtEndOfStream EachLine=InStream.ReadLine linevals=Split(EachLine,":") If Mybudget = linevals(3) AND Mycity = linevals(1) Then Response.write ""&linevals(0)&" " dodisp=true End If Wend Set InStream=Nothing Set FileObject=Nothing If dodisp = "" Then Response.write "We have no details of hotel accommodation available to match your budget. Try a different price range." End If End If %>