RE: LotusScript reading files Domino on Linux

"Nur, Mohamed S" <[email protected]> Mon, 4 Dec 2006 15:07:49 +1100
Newsgroups gmane.linux.suse.domino
Message-ID <6215401E01247448A306C54F499111F201BE0C7D@WSMSG2103V.srv.dir.telstra.com>
Hi having problem running the following scripts in suse linux where it
works
Fine under windows.

Any clues...? The path I have is

sPath =3D  "/os_backup/smartplan/"=09
	sFile =3D "test.txt"

Where in windows

sPath =3D "c:\os_backup\smartplan\"=09
sFile =3D "test.txt"



Scripts below:

________________________________________________________________________
_____________


Dim session As New NotesSession
	Dim agentlog As NotesLog
	Dim iPos As Integer, iPrevPos As Integer
	Dim sPath As String
	Dim sFile As String
	Dim varFiles As Variant
=09
	On Error Goto Error_Handler
	sPath =3D  "/os_backup/smartplan/"=09
	sFile =3D "test.txt"
=09
     'Check to see if file exists and return results...=09
	Set agentlog =3D New NotesLog("Test Filepath")
	Call agentlog.OpenAgentLog
	Call agentlog.LogAction("About to test ...")
=09
	varFiles =3D Dir$(sPath, 0)
	Forall testfile In varFiles	=09
		Call agentlog.LogAction("Found " & testfile)
		If testfile =3D sFile Then
			Call agentlog.LogAction("Found file " & sPath &
sFile)
		Else
			Call agentlog.LogAction("File " & sPath & sFile
& " not found")  <=3D=3D  I only ever get this message in the agent log
		End If
	End Forall
=09
	Call agentlog.LogAction("Finished")
	Call agentlog.Close
=09
	Exit Sub
=09
Error_Handler:
	Call agentlog.LogAction("An error occurred")
	Call agentlog.LogAction("Finished")
	Call agentlog.Close
	Exit Sub