Using a scanner to store files in a folder on the hard drive

[RAM]

I currently use the following code to scan and store information:
strFile = "Z:\CADSScannedReportImages\" & [PTFolder] & "\" & [LblImage] &
"\" & [PTName] & [ID] & " " & [LblImage] & " " & Format([LblSDate], "dd mmm
yyyy")
strType = "jpg" This works OK. But I would like to set up code to check to
see if a PTFOLDER \PTName\ID exist and if it does not then automatically
create it. Can anyone help me with this request.

Thanks,

RAM

 

[John W. Vinson]

But I would like to set up code to check to
see if a PTFOLDER \PTName\ID exist and if it does not then automatically
create it. Can anyone help me with this request.

Take a look at the VBA help for the Dir and MkDir functions.

 

[RAM]

John thank you for the information but I could use a little more help I found
this Dir[(pathname[, attributes])] and tried to use in this way
Dir[(C:\bobimages[, jane doe 1])] to see what would happen. I got an error,
I don't understand exactly what I'm doing as you can probably see. Can you
provide a little more direction.

Thanks,

RAM

 

[John W. Vinson]

Hello Ram,

Here is what you need:

Thanks Steve!

 

[John... Visio MVP]

So now stevie, it is your turn to behave and stop grovelling for work.

John... Visio MVP

Now this is more like the old gentleman gentleman's John Vinson!!!!!!!!!

Thank you for the response.

Steve

 

[John W. Vinson]

So now stevie, it is your turn to behave and stop grovelling for work.

He did, he posted some useful advice, and I thanked him for doing so. Please
don't interfere.

 

[John... Visio MVP]

He did, he posted some useful advice, and I thanked him for doing so.
Please
don't interfere.

John W. Vinson [MVP]

As you wish.

John... Visio MVP