goss
Active Member
- Joined
- Feb 2, 2004
- Messages
- 372
Hi all,
I have several files in a folder.
I would like to append the file name to the front of each record in each file
Something like;
Anyone ever done something like this?
I have several files in a folder.
I would like to append the file name to the front of each record in each file
Something like;
Code:
Sub AppendNameRecord()
Dim strFileName as string
For each file in folder
strFileName = file.name
Do While Not EOF
For each rec in file
strRecord = strFileName & "," & rec
Next
Next
End sub