Agent cannot access to domain folders

Hi All,

I am having this problem in R6 not in R5. THis is an auto agent to pull files from folder. The workstation where the files are located is in domain as for the domino server is not in domain. When i tried to run manually it can work but set to auto-schedule it can't. Error msg is file not found. i have checked the file is located in that folder. Initially it was Permission denied then i set my agent to share and allow others to view and run .The following is my code

Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As Notesdocument
Dim form As NotesForm
Dim rtitem As NotesRichTextItem
Dim object As NotesEmbeddedObject
Dim m As String
Dim d As String

Set db = session.CurrentDatabase
Set doc = db.CreateDocument
Set form = db.Getform("Document")
Set doc = New NotesDocument( db )
Set rtitem = New NotesRichTextItem( doc, "Body" )

m = "x:\Oep-hq\Daily Sales Performance for NSOs without Cost & GP.xls"
n = "x:\Oep-hq\ErrFile\Daily Sales Performance NSC and NSO Err file.txt"
Print "............"Left(Cstr(Filedatetime(n)),8) " " Cstr(Today)
doc.Date = Today
doc.Form = "Document"
doc.Categories = "Daily Accumulated Sales Performance for NSOs Without Cost & GP"
doc.Index = "BPR Report"
doc.Country = "[OEP-SG]"
doc.From = "Dwhadmin Oepis"
'doc.Authors =
'doc.Readers = "[OEP-HQ]"
doc.Subject = "Daily Accumulated Sales Performance for NSOs without Cost & GP"
Call doc.Save(True,True)

What is the problem?Is it the domain? Then why R5 work? Is it R6 have higher security?Or is there anything i need to set ?

Pang