Finding paths one or more levels above another one

[Nigel Lorriman]

Hello fellow users

Not being a programmer, I am struggling somewhat with what should be a simple process. I hope that someone will be able to advise

I am finding a folder path as follows...

DestFolder = Registry.GetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\ \App Paths\\Tutorials.exe", "Path", false);

This returns a folder "C:\Program Files (x86)\MTSL\SSS\tutorials"

This becomes my destination folder fine and I can create it no problem.

What I want to do is go up the folder tree and create a folder "C:\Program Files (x86)\MTSL\SSS\AutoPlay"

But I cannot find the correct syntax in command "Folder.Create"

As I said, it's a simple problem, but I've looked through the help documentation and no attempts at using ../ and ../../ with and without quotes does the trick.

Any assistance would be much appreciated. Thank you.

Nige

[Ulrich]

Try this approach:

-- retrieve the folder of the sibling
local sDestFolder = Registry.GetValue(HKEY_LOCAL_MACHINE, "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\App Paths\\Tutorials.exe", "Path", false);
local sPath = String.SplitPath(sDestFolder);
-- create the new folder
Folder.Create(sPath.Drive .. sPath.Folder .. "..\\AutoPlay");
error = Application.GetLastError();
-- check result
if (error ~= 0) then
    Dialog.Message("Error", _tblErrorMessages[error], MB_OK, MB_ICONEXCLAMATION);
else
    Dialog.Message("Info", "Folder created successfully");
end

Of course the application will need to run as administrator in order to create the new folder under Program Files. This will not be required if the tutorials.exe application is deployed in the user's profile...

Ulrich

[herrin]

.

What I want to do is go up the folder tree and create a folder "C:\Program Files (x86)\MTSL\SSS\AutoPlay"
But I cannot find the correct syntax in command "Folder.Create"

ulrich's code works fine

a clarification on folder.create
use double slash and run as admin
Folder.Create ("C:\\Program Files (x86)\\MTSL\\SSS\\AutoPlay")

[Nigel Lorriman]

Thank you both. I have implemented the code and run as administrator and it's creating the folder, albeit one level too high, but I'm sure I can work that out.

I would never have got to that point without help.

That now gives me more information to implement the file copies I am now wanting to do.

[Nigel Lorriman]

Would there be an obvious reason why the following Status Dialog would remain on screen when all the files have been copied?


Even though I get the Dialog.Message which occurs after the copying has supposedly finished




StatusDlg.Show(MB_ICONNONE, false);

File.Copy("tutorials\\*.*", sPath.Drive .. sPath.Folder .. "\\tutorials", true, true, true, true, nil);

StatusDlg.Hide(MB_ICONNONE, false);

Dialog.Message("Notice", "Finished copying tutorial files.", MB_OK, MB_ICONINFORMATION);


Especially, as there is no such file "Thumbs.db" in the source folder (hidden or otherwise).

Basic, I know, but I can't work it out.

Thank you.

[Nigel Lorriman]

Panic over. Fixed.

Thank you anyway.