Re: mkdir
- From: "Randy Birch" <rgb_removethis@xxxxxxxx>
- Date: Tue, 5 Apr 2005 23:01:56 -0400
I recommend doing a debug.print of the filenames generated in the loop to
ensure each is a valid file name.
--
Randy Birch
MS MVP Visual Basic
http://vbnet.mvps.org/
----------------------------------------------------------------------------
Read. Decide. Sign the petition to Microsoft.
http://classicvb.org/petition/
----------------------------------------------------------------------------
"droose" <droose@xxxxxxxxxxxxxxxxxxxxxxxxx> wrote in message
news:43053D2E-F74B-4FC8-B475-270D13E3AB57@xxxxxxxxxxxxxxxx
: Thanks for the replies. Here is my code:
: pathName = "C:\Program Files\PartyPoker\HandHistory\" + screenName +
"\"
: 'make a directory to hold the files we want to process
: On Error Resume Next
: MkDir ("C:\Program Files\PartyPoker\HandHistory\pptemp")
: On Error GoTo 0
: SetAttr "C:\Program Files\PartyPoker\HandHistory\pptemp", vbNormal
: 'Get the files and copy then to ppemp
: For i = 0 To File2.ListCount - 1
: a = File2.List(i)
: If InStr(1, a, b) <> 0 Then
: pathName = pathName + fileDate + "\" + File2.List(i)
: FileCopy pathName, "C:\Program Files\PartyPoker\HandHistory\pptemp"
: End If
: Next i
: 'set File1 path to pptemp
: File1.Path = "C:\Program Files\PartyPoker\HandHistory\pptemp"
: 'process the files
: Poker.Show (1)
: 'delete the directory
: RmDir ("C:\Program Files\PartyPoker\HandHistory\pptemp")
:
: The filecopy line returns the following error:
: Run-time error '75':
: Path/File access error
:
: Maybe I don't understand what error '75' means.
:
.
- Prev by Date: Re: mkdir
- Next by Date: Re: mkdir
- Previous by thread: Re: mkdir
- Next by thread: Re: mkdir
- Index(es):
Relevant Pages
|