Convert .CAP files to .Txt Files

[Alice]

Anyone knows how to convert .CAP files to .TXT files ?

because Access doesn't read .CAP files, so in order to import it, i'd
have to manually open all the .CAP files and "save as" filename.txt
before importing them onto Access.

is there a way to automate this process?

Thanks,

[missinglinq via AccessMonster.com]

Here is a site that gives the poop on (as well as the download site for) a
utility from Micro$oft named Log Parser. This program will convert .CAP files
to .CSV files, which can then be imported into Access.

http://blogs.conchango.com/stuartpre...2/22/2967.aspx

Good Luck!

--
There's ALWAYS more than one way to skin a cat!

Answers/posts based on Access 2000

Message posted via AccessMonster.com
http://www.accessmonster.com/Uwe/For...ccess/200705/1

[Bob Quintal]

Alice <al*******@gmail.comwrote in
news:11**********************@i38g2000prf.googlegr oups.com:

Anyone knows how to convert .CAP files to .TXT files ?

because Access doesn't read .CAP files, so in order to import
it, i'd have to manually open all the .CAP files and "save as"
filename.txt before importing them onto Access.

is there a way to automate this process?

Thanks,

Public Sub CAP2TXT(stDirectory as string)
dim stCAPfile as string
dim stTXTfile as string

If right(stDirectory,1) <>"\" then
stDirectory = stDirectory & "\"
End If

stCAPfile = Dir(stDirectory + "*.CAP")

Do until stCAPfile = ""
stTXTfile = left(stCAPfile,len(stcapfile - 3) & "TXT"
filename stDirectory & stCAPfile, stDirectory & stTXTfile
stCAPfile = Dir()
LOOP
end sub

--
Bob Quintal

PA is y I've altered my email address.

--
Posted via a free Usenet account from http://www.teranews.com

[Alice]

On May 27, 4:20 am, Bob Quintal <[e-mail]:

Alice <[e-mail] innews:11**********************@i38g2000prf.google groups.com:

Anyone knows how to convert .CAP files to .TXT files ?

because Access doesn't read .CAP files, so in order to import
it, i'd have to manually open all the .CAP files and "save as"
filename.txt before importing them onto Access.

is there a way to automate this process?

Thanks,

Public Sub CAP2TXT(stDirectory as string)
dim stCAPfile as string
dim stTXTfile as string

If right(stDirectory,1) <>"\" then
stDirectory = stDirectory & "\"
End If

stCAPfile = Dir(stDirectory + "*.CAP")

Do until stCAPfile = ""
stTXTfile = left(stCAPfile,len(stcapfile - 3) & "TXT"
filename stDirectory & stCAPfile, stDirectory & stTXTfile
stCAPfile = Dir()
LOOP
end sub

--
Bob Quintal

PA is y I've altered my email address.

--
Posted via a free Usenet account fromhttp://www.teranews.com

hmm...i just got the code to run, but the files are still in CAP
file.
The problem is, when i change the CAP file manually, i've to open up
the file and do SAVE AS to *.txt. If i were to just change the file
name w/o opening it, it'll remains as CAP file.

Is there any way to get around that?

Thanks,

[Alice]

On May 27, 4:20 am, Bob Quintal <[e-mail]:

Alice <[e-mail] innews:11**********************@i38g2000prf.google groups.com:

Anyone knows how to convert .CAP files to .TXT files ?

because Access doesn't read .CAP files, so in order to import
it, i'd have to manually open all the .CAP files and "save as"
filename.txt before importing them onto Access.

is there a way to automate this process?

Thanks,

Public Sub CAP2TXT(stDirectory as string)
dim stCAPfile as string
dim stTXTfile as string

If right(stDirectory,1) <>"\" then
stDirectory = stDirectory & "\"
End If

stCAPfile = Dir(stDirectory + "*.CAP")

Do until stCAPfile = ""
stTXTfile = left(stCAPfile,len(stcapfile - 3) & "TXT"
filename stDirectory & stCAPfile, stDirectory & stTXTfile
stCAPfile = Dir()
LOOP
end sub

--
Bob Quintal

PA is y I've altered my email address.

--
Posted via a free Usenet account fromhttp://www.teranews.com

hmm...i just got the code to run, but the files are still in CAP
file.
The problem is, when i change the CAP file manually, i've to open up
the file and do SAVE AS to *.txt. If i were to just change the file
name w/o opening it, it'll remains as CAP file.

Is there any way to get around that?

Thanks,

[Alice]

On May 27, 1:27 pm, Alice <[e-mail]:

On May 27, 4:20 am, Bob Quintal <[e-mail]:

Alice <[e-mail] innews:11**********************@i38g2000prf.google groups.com:

Anyone knows how to convert .CAP files to .TXT files ?

because Access doesn't read .CAP files, so in order to import
it, i'd have to manually open all the .CAP files and "save as"
filename.txt before importing them onto Access.

is there a way to automate this process?

Thanks,

Public Sub CAP2TXT(stDirectory as string)
dim stCAPfile as string
dim stTXTfile as string

If right(stDirectory,1) <>"\" then
stDirectory = stDirectory & "\"
End If

stCAPfile = Dir(stDirectory + "*.CAP")

Do until stCAPfile = ""
stTXTfile = left(stCAPfile,len(stcapfile - 3) & "TXT"
filename stDirectory & stCAPfile, stDirectory & stTXTfile
stCAPfile = Dir()
LOOP
end sub

--
Bob Quintal

PA is y I've altered my email address.

--
Posted via a free Usenet account fromhttp://www.teranews.com

hmm...i just got the code to run, but the files are still in CAP
file.
The problem is, when i change the CAP file manually, i've to open up
the file and do SAVE AS to *.txt. If i were to just change the file
name w/o opening it, it'll remains as CAP file.

Is there any way to get around that?

Thanks,- Hide quoted text -

- Show quoted text -

Never mind. All done!!! it works. :O) Thanks so much!!!!