<%
Set objFSO2 = Server.CreateObject("Scripting.FileSystemObject")
txtfile = Request.QueryString("id")
strtemplatepath4 = server.mappath("pages") & "\Page1.txt"
Set objTextStream4 = objFSO2.OpenTextFile(strTemplatePath4,1)
menu = objTextStream4.ReadAll
Set objTextStream4 = nothing
arrtxt = split(menu,"|||")
title = arrtxt(0)
content = arrtxt(1)
content = replace(content,"||","'")
%>
Wilson Access - Michael Wilson and Son - Recent Projects
