Hi.
I have migrated our telephone service from Windows to Linux.
When I open our page the error occure:
"error compiling Pr_alf_b.asp: maybe use strict error: Bareword found where
operator expected at /srv/www/htdocs/Inetpub/Telefony/Pr_alf_b.asp line 5, near
") <---> fileName" <---> , /usr/lib/perl5/site_perl/5.10.0/Apache/ASP.pm line
1466"
Pr_alf_b.asp file:
<%Response.Expires=0%>
<%
OK = false
Server.MapPath (".")
fileName = Server.MapPath(".") & "/Alf_All.txt"
set fileSys = Server.CreateObject("Scripting.FileSystemObject")
set schFile = fileSys.OpenTextFile(fileName)
%>
<HTML>
<HEAD>
<meta http-equiv="Content-Type"
content="text/html; charset=windows-1250">
<TITLE>Spis telefonów</TITLE>
</HEAD>
<BODY LINK="BLUE" ALINK="RED">
<FONT FACE="Arial CE" SIZE=2>
<CENTER>
<TABLE WIDTH=600>
<%
schfile.Close
set schFile = fileSys.OpenTextFile(fileName)
do until schFile.AtEndOfStream
linia = schFile.ReadLine
nazwisko = Left(linia, 35)
if Left(nazwisko,1) = "B" then
Response.Write "<TR><TD>" & nazwisko & "</TD>"
Response.Write "<TD>" & Mid(linia, 36, 14) & "</TD>"
Response.Write "<TD>" & Mid(Linia, 50, 100) & "</TD></TR>"
else
end if
loop
%>
</TABLE>
</BODY>
</HTML>
Thanks
