<%@ Page Language="vb" Debug="false" Explicit="true" %> <%@ Import Namespace="System" %> <%@ Import namespace="System.Text" %> <%="" %> EBC: About Rides <% On Error Resume Next Dim strFileName As String Dim fs As Object Dim f As Object strFileName = "../net/frametop-ce.htm" fs = Server.CreateObject("Scripting.FileSystemObject") f = fs.OpenTextFile(Server.MapPath(strFileName), 1) Response.Write(f.Readall) If Err.Number <> 0 Then Response.Write("

The content page " & strFileName & " is not available at this time.

") End If f.Close() strFileName = "../userfiles/RidesChair/about-rides.htm" %>
<% f = fs.OpenTextFile(Server.MapPath(strFileName), 1) Response.Write(f.Readall) If Err.Number <> 0 Then Response.Write("

The content page " & strFileName & " is not available at this time.

") End If f.Close() fs.close On Error GoTo 0 %>