Creating a background processor 1

[jcastilletti]

I would like to create a program which will run all day long looking for certain files in a certain directory.
These files will have been placed in the directory through an outside service using FTP.

Once this program sees files in this directory it will move them out of the directory and into another after the files have been encyrpted using pretty good privacy (PGP).

Any ideas or clues as to I start with this task.

Any Help is greatly appreciated.

John

 

[MatsHulten]

Do a regular program, that checks for new files at a specified interval using the timer control.

Simple and effecient.

-Mats

 

[jcastilletti]

How do I monitor a directory for files.
If files present how do I pass each one off into an ecrytion program (PGP).

Thanks...John

 

[MatsHulten]

Use the dir function to check for files (see below for example) and shell function to encrypt each file.

Dim MyFile, MyPath, MyName
' Returns "WIN.INI"  if it exists.
MyFile = Dir("C:\WINDOWS\WIN.INI")   

' Returns filename with specified extension. If more than one *.ini
' file exists, the first file found is returned.
MyFile = Dir("C:\WINDOWS\*.INI")

' Call Dir again without arguments to return the next *.INI file in the 
' same directory.
MyFile = Dir

' Return first *.TXT file with a set hidden attribute.
MyFile = Dir("*.TXT", vbHidden)

Good Luck
-Mats