Script does not work correct when launch from Cr-rom

[malong]

Hello,

First of all sorry for my English.

im newbie in autoit, this is my first script.

So, i have a problem when try to running autoit script from CD-rom (Script placed on CD)

My script works in next order:

1) copy config files from cd to hard disk,

2) finding driveletter my cd rom

3) change config files (adding path with founded drive letter)

4) and run my programs etc

Problem is my config files don't change when i run script from cd. But when i run it from hard disk all works fine.

Bellow part of my script

Please help me, how i can resolve this problem.

Thanks

DirCopy(@ScriptDir&"\data\settings\", "C:\data\settings\",1)
DirCopy(@ScriptDir&"\data\language", "C:\data\language",1)
FileCopy(@ScriptDir&"\data\.VirtualBox\VirtualBox.xml", "C:\data\.VirtualBox\", 9)
FileCopy(@ScriptDir&"\data\.VirtualBox\Machines\test\test.vbox", "C:\data\.VirtualBox\Machines\test\", 9)
Global $myPath = "C:\data\.VirtualBox\Machines\test\test.vbox"
Global $cdDrive = DriveGetDrive("CDROM")
for $i=1 to $cdDrive[0]
If FileExists($cdDrive[$i]&"\LiesMich.txt") then
  $driveLetter=$cdDrive[$i]
  endif
  Next
Global $oldtext = "test.vdi"
Global $newtext = $driveLetter&"data\.VirtualBox\Machines\test\test.vdi"
Global $oldCDPath = "D:/Distrib/ISO/ess-linux-0.1-rc8.iso"
Global $newCDPath = $driveLetter&"data\.VirtualBox\Machines\test\ess-linux-0.1-rc8.iso"
$myFile=FileOpen($MyPath, 0)
$myText=FileRead($myFile)
FileClose($myFile)
$myText=StringReplace($myText, $oldtext, $newtext)
$myText=StringReplace($myText, $oldCDPath, $newCDPath)
$myFile=FileOpen($MyPath, 2)
$myText=FileWrite($myFile,$myText)
FileClose($myFile)

[AZJIO]

MsgBox(0, '?', $myText)

Do check the variables to understand. Use the virtual CD-ROM drive.

[Tripredacus]

Why do this part?

Global $cdDrive = DriveGetDrive("CDROM")

If your script is on the CD, and is in the root, then @ScriptDir will give you the CD drive's letter.

[malong]

i used @scriptDir in first editions, but script didn't work, then i tryed use driveGetDrive functions, but result was the same.

I also tryed to run script from root directory and in subdirectories on CD.

[Tripredacus]

Global $myPath = "C:data.VirtualBoxMachinestesttest.vbox"
; snip
$myFile=FileOpen($MyPath, 0)

$myPath <> $MyPath

Does it matter that one is lowercase and the other is capital?

[BrewManNH]

There's no case sensitivity for variable names in AutoIt. $mypath = $mYpAtH as far as AutoIt is concerned.

[BrewManNH]

These lines are incorrect:

Global $newtext = $driveLetter & "data\.VirtualBox\Machines\test\test.vdi"
Global $newCDPath = $driveLetter & "data\.VirtualBox\Machines\test\ess-linux-0.1-rc8.iso"

You need the backslash before the word data.

Global $newtext = $driveLetter & "\data\.VirtualBox\Machines\test\test.vdi"
Global $newCDPath = $driveLetter & "\data\.VirtualBox\Machines\test\ess-linux-0.1-rc8.iso"

From the Help file for DriveGetDrive

Success: Returns an array of strings (drive letter followed by colon) of drives found. The zeroth array element contains the number of drives.

Because it only returns the drive letter and a colon (D:), you need to add the backslash to the path statements.

[malong]

You need the backslash before the word data.

Added backslash as you advised me, but result was same with/without backslash script wokred properly if i run it from hard disk drive or usb flash drive (CD path added to $myPath), but if i run it from cd, files just copied and didn't changed

[BrewManNH]

Check the file copied to make sure it isn't being copied with the Read Only setting set, which sometimes happens when copying from a CD to a HDD

[malong]

Check the file copied to make sure it isn't being copied with the Read Only setting set, which sometimes happens when copying from a CD to a HDD

It works! Thanks, after removing attribute "read only" with FileSetAttrib function, script works correct.

Thank you.

Edited July 5, 2012 by malong