<%
readfile = "E:\WebSites\FunnyStrange\leticia\entries\" & entry & ".txt"
Set fs=Server.CreateObject("Scripting.FileSystemObject")
If (fs.FileExists(readfile)=true) Then
Set f=fs.OpenTextFile(readfile, 1)
Response.Write(f.ReadAll)
f.Close
Set f=Nothing
End If
Set fs=Nothing
%>