copying files and getting source and destionation from a TXT

[stibbar]

Hello all,

I have been searching the forums, and I have not been able to find anything on copying a file and using the information in a text file for the source and destination. I am betting there is something out there and I suck at searching.

so here is what i am trying to accomplish in a nutshell;

• create a GUI that asks you what directory you want to search. - Works
• port specific file type list to a text file. - works
• use that text file to read the each line then copy the file to the same directory and add .OLD to it. - fail as a n00b scripter

I have used autoit before and created some scripts to make life easy, but nothing really like this and I would like your input as I am stumped. I have tried fileread & filereadline, I know I am doing something stupid or forgetting something dumb. so anyone able to bring light to this i would appriciate it, and so would my head from banging it on the desk.

Here is the code, it is simple to say the least, I also removed all the variables i had been using like @temp and things to rule out fat fingered code.

#Include <File.Au3>
#Include <String.Au3>
#include <Array.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

local $copyandreplace = "C:\Temp\AUTOIT.OLD.txt"
FileOpen($copyandreplace)
while 1
$copy = FileRead($copyandreplace)
;~  $copy2 = FileReadLine($copyandreplace) ;lef this so you know i tried this as well.
If @error = -1 Then ExitLoop
  FileCopy($copy, $copy &".old")
WEnd
FileClose($copyandreplace)

Thanks In advance folks.

Stibb

[JohnOne]

I do not quite understand what you are wanting to do.

The best I can muster is that you want to rename the file.

if that is true then look at the FileMove function and read its remarks.

[stibbar]

JohnOne

Essentially what I am trying to do is use the text file as a way to list, in this case Microsoft App-V OSD files, with the full path. Then use that text file with a string of some type to pull the full path from the text and copy the file. In the text there is something like this

D:APPV.OSD.testapplicationname0ApplicationOSD0.osd

D:APPV.OSD.testapplicationname1ApplicationOSD1.osd

D:APPV.OSD.testapplicationname2ApplicationOSD2.osd

what I am am trying to figure out is how to pull each line so it reads it, then copies it with the .old added to the end

so ending up with something along the lines of

filecopy ("D:APPV.OSD.testapplicationname0ApplicationOSD0.osd, "D:APPV.OSD.testapplicationname0ApplicationOSD0.osd.old")

I have over 2000 of these files i want to do it with varibles that read each line until it reaches the end of the file.

I hope that makes more sense.

/R

Stibb

[stibbar]

69255

I tried that code, but I received

H:Script.repositoryOSDSCRATCH OSD.au3 (37) : ==> Subscript used with non-Array variable.:

For $i = 1 To $aCopy[0]

For $i = 1 To $aCopy^ ERROR

I am not familar with the [ ] so i will go poke around and trying and read up on those.

/R

Stibb

[JLogan3o13]

Hi, Stibbar. How about something like this?

#include <File.au3>

$file = "C:TestTest.txt"
$file_count_lines = _FileCountLines($file)

  for $i = 0 to $file_count_lines
  $output = FileReadLine($file, $i)
   FileCopy($output, $output & ".old", 1)
  Next

You'll need to change your directory, of course. But this works for me for 100+ text files.

Edited February 23, 2012 by JLogan3o13

[stibbar]

JLogan3o13

Thanks, that actually worked once i moved he file to something i had full access to, not even going to try and figure out why reading from temp was jacked up lol

69255

once i moved the text file and added it also worked.

local $file = "d:text.txt"

Thank you both very much for the direction you all rock!

On to the next issue and hopefully I can write that one to work the first time around hehe

/R

Stibbar

[BrewManNH]

Are the files always named *.osd, and do you want to move or copy all the files in the folder with that extension to the new destination with a new extension? Because if they're all .osd file extensions and you want to copy all of them you could do it this way:

FileCopy("C:temp*.osd", "C:tempNew*.osd.old", 9)

[stibbar]

BrewManNH,

thanks much for the input boss

/R

Stibb