Convert .CAP files to .Txt Files

Convert .CAP files to .Txt Files

am 27.05.2007 03:01:34 von 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,

Re: Convert .CAP files to .Txt Files

am 27.05.2007 04:30:05 von u28780

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/stuartpreston/archive/2006/02/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/Forums.aspx/databases-ms-ac cess/200705/1

Re: Convert .CAP files to .Txt Files

am 27.05.2007 13:20:55 von Bob Quintal

Alice wrote in
news:1180227694.202894.263870@i38g2000prf.googlegroups.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

Re: Convert .CAP files to .Txt Files

am 27.05.2007 22:27:00 von Alice

On May 27, 4:20 am, Bob Quintal wrote:
> Alice wrote innews:1180227694.202894.263870@i38g2000prf.googlegroups.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,

Re: Convert .CAP files to .Txt Files

am 27.05.2007 22:27:40 von Alice

On May 27, 4:20 am, Bob Quintal wrote:
> Alice wrote innews:1180227694.202894.263870@i38g2000prf.googlegroups.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,

Re: Convert .CAP files to .Txt Files

am 27.05.2007 22:53:18 von Alice

On May 27, 1:27 pm, Alice wrote:
> On May 27, 4:20 am, Bob Quintal wrote:
>
>
>
>
>
> > Alice wrote innews:1180227694.202894.263870@i38g2000prf.googlegroups.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!!!!