<% Dim strPicture1 Dim strPicture2 Const ForReading = 1, ForWriting = 2, ForAppending = 8 Dim fso, f Set fso = CreateObject("Scripting.FileSystemObject") If fso.FileExists("Pictures\Default.asp") Then Set f = fso.OpenTextFile("Pictures\Default.asp", ForReading) strPicture1 = f.ReadLine() strPicture2 = f.ReadLine() f.Close End if strPicture1 = "CoriniumHotelRestaurant.jpg" strPicture2 = "CoriniumHotelBarAndLounge.jpg" %> Corinium Hotel, Cirencester - The Corinium Hotel, one of the finest hotels in Cirencester


Food & Drink