Solved

DIR Function

Posted on 2001-07-30
10
657 Views
Last Modified: 2013-12-18
Hello i am using following code in the agent.
   but it  gives me error "Illegal function call"

 filename$ = Dir$("\\Lbriggi\dds-ljb",16)
     Msgbox(filename$)

where "Lbriggi" computername in network
and "dds-ljb" is  share directory name.

any comment wold be appreaciated.

Thanks,
shrirang
0
Comment
Question by:shrihalbe
  • 4
  • 3
  • 3
10 Comments
 
LVL 10

Expert Comment

by:zvonko
ID: 6335936
When you start the Domino server as service, than it is running under the system userid named SYSTEM.
This user does not have the shared fileservices mounted untill you mount it explicitly.

I have not testing environment at the moment, but think you can try this sequence:
rc = shell("NET USE Z: \\Lbriggi\dds-ljb topsecret /USER:domainname\username /PERSISTENT:YES")
filename$ = Dir$("\\Lbriggi\dds-ljb",16)
Msgbox(filename$)

Good luck,
zvonko
0
 
LVL 10

Accepted Solution

by:
zvonko earned 30 total points
ID: 6335946
not sure, perhaps you have to use the mounted device leter, like this:
filename$ = Dir$("Z:\dds-ljb",16)
Msgbox(filename$)
0
 
LVL 13

Expert Comment

by:CRAK
ID: 6336815
You said you run the code in an agent.
Well.... "Dir" contacts OS-level data; that's beyond the control of Notes, so you'd need pivileges to run "unrestricted agents". (Everything controlled by notes requires "restricted access")
0
Live: Real-Time Solutions, Start Here

Receive instant 1:1 support from technology experts, using our real-time conversation and whiteboard interface. Your first 5 minutes are always free.

 

Author Comment

by:shrihalbe
ID: 6340404
Hello crak,
 i have tested it as action button code but it still didn't work.
thanks,
shrirang
0
 
LVL 13

Expert Comment

by:CRAK
ID: 6344615
Have you tried zvonko's solution: assigning a driveletter to the server? It makes sense to me!

And I don't like asking, but have you taken notice of platform differences (or are you running Windows server and clients)?
0
 

Author Comment

by:shrihalbe
ID: 6344822
write now i have appl on my local machine  and i am using the windows ME.  

thnaks,
shrirang
0
 
LVL 13

Expert Comment

by:CRAK
ID: 6345015
Perhaps it's easier to look for just any file first (like Dir$("c:\*.*", 8) and then change things bit by bit: a dir instead of a file, a specified dir. or file etc. and in the end translate it to a server situation).
That should bring up something!
0
 

Author Comment

by:shrihalbe
ID: 6720962
Helo zvonok,

thanks for help

shriang
0
 

Author Comment

by:shrihalbe
ID: 6761721
thanks
shrirang
0
 
LVL 10

Expert Comment

by:zvonko
ID: 6761756
Thank you shrirang for the points :-)

can you please give a short feedback wath the final solution was.

Thanks.
0

Featured Post

Live: Real-Time Solutions, Start Here

Receive instant 1:1 support from technology experts, using our real-time conversation and whiteboard interface. Your first 5 minutes are always free.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

For users on the Lotus Notes 8 Standard client, this article provides information on checking the Java Heap size and adjusting it to half of your system RAM in attempt to get the Lotus Notes 8.x Standard client to run faster.  I've had to exercise t…
For beginners of Lotus Notes user this is important to know about the types of files and their location supported by IBM Notes. Mostly users are unaware about how many file types are created and what their usages are. This Article is fully dedicated…
Email security requires an ever evolving service that stays up to date with counter-evolving threats. The Email Laundry perform Research and Development to ensure their email security service evolves faster than cyber criminals. We apply our Threat…
The Email Laundry PDF encryption service allows companies to send confidential encrypted  emails to anybody. The PDF document can also contain attachments that are embedded in the encrypted PDF. The password is randomly generated by The Email Laundr…

786 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question