XYplorer Beta Club

admin wrote: ↑07 May 2025 18:32 Will be possible with multi-threading.

Horst wrote: ↑07 May 2025 10:18 No, that's a Windows restriction..
Unfortunately, XY doesn't just ask using a UAC prompt for this operation
which would be a big improvement.

kiwichick wrote: ↑08 May 2025 03:47

admin wrote: ↑07 May 2025 18:32 Will be possible with multi-threading.

Thanks, Don, that's good to know. Is that something that will be available with XYplorerTB?

kiwichick wrote: ↑07 May 2025 05:22 Is there any way to create a symlink without having XY run as administrator?

noembryo wrote: ↑08 May 2025 11:55 Without knowing any context on this question

kiwichick wrote: ↑09 May 2025 10:53

noembryo wrote: ↑08 May 2025 11:55 Without knowing any context on this question

I don't know what 'context' you want but XY scripting can create a symlink. However, XY has to be in run as administrator in order to do it. I just wanted to know if there was any way to do it without XY as admin.

noembryo wrote: ↑09 May 2025 18:04 This is exactly the context I needed.
Do you want to create a symlink, or you want to create a symlink by scripting?
My answer was for the former (it's the way I create symlinks in XYplorer without having administrator rights), but unfortunately you wanted an answer for the latter..

highend wrote: ↑09 May 2025 11:01 Write out a .bat script (and run it afterwards) that self-elevates and executes the mklink command?

Code: Select all

    $batFile    = "%TEMP%\~xyplorer_mklink.bat";
    $batContent = <<<>>>
@ECHO OFF
REG QUERY "HKU\S-1-5-19" >NUL 2>NUL && GOTO :ENDUAC
SET "vbsFile=%TEMP%\~getAdmin.vbs"
IF "%1" NEQ "" (FOR /F "tokens=*" %%I IN ('ECHO %*') DO SET "param=%%~I")

ECHO Set UAC = CreateObject^("Shell.Application"^)> "%vbsFile%"
ECHO UAC.ShellExecute "cmd", "/c """"%~s0"" ""%param%""""", "", "runas", ^1>> "%vbsFile%"
CSCRIPT "%vbsFile%" //Nologo
IF EXIST "%vbsFile%" DEL /Q "%vbsFile%" >NUL 2>NUL
EXIT /B
:ENDUAC
    >>>;

    $batContent .= <crlf 2> . "your mklink stuff here...";

    writefile($batFile, $batContent, , "utf8");
    run $batFile, "%TEMP%", 0, 1;

highend wrote: ↑09 May 2025 11:01 Write out a .bat script (and run it afterwards) that self-elevates and executes the mklink command?
...

// Generate symlinks for each File/Folder currently selected.
// Elevates cmd to admin

$outputPrefix = 'link-';

// ================================ CODE ================================

    $batFile    = "<xydata>\Temp\symlinkGenerator.bat";

    $batContents = <<<STRING
@ECHO OFF
REG QUERY "HKU\S-1-5-19" >NUL 2>NUL && GOTO :ENDUAC
SET "vbsFile=<xydata>\Temp\~getAdmin.vbs"
IF "%1" NEQ "" (FOR /F "tokens=*" %%I IN ('ECHO %*') DO SET "param=%%~I")

ECHO Set UAC = CreateObject^("Shell.Application"^)> "%vbsFile%"
ECHO UAC.ShellExecute "cmd", "/c """"%~s0"" ""%param%""""", "", "runas", ^1>> "%vbsFile%"
CSCRIPT "%vbsFile%" //Nologo
IF EXIST "%vbsFile%" DEL /Q "%vbsFile%" >NUL 2>NUL
EXIT /B
:ENDUAC
STRING;

    foreach($item, <selitems :::>, ':::') {
        // Format 'mklink' depending on $item type (file|folder)
        $itemDirectory = getpathcomponent($item, 'path');
        $itemFilename = getpathcomponent($item, 'name');

        if (exists($item) == '1') {
            // $item is file
            $command = lax(mklink "$itemDirectory\$outputPrefix$itemFilename" "$item");
            $batContents .= <crlf> . $command;
        } elseif (exists($item) == '2') {
            // $item is folder
            $command = lax(mklink /D "$itemDirectory\$outputPrefix$itemFilename" "$item");
            $batContents .= <crlf> . $command;
        }
    }

    writefile($batFile, $batContents, , "utf8");
    run($batFile, , 0, 0);

WirlyWirly wrote: ↑20 May 2025 23:50 I took highend's script and adjusted it slightly so that it will generate a symlink for every currently selected item. There's enough logic to differentiate between file/folder and format mklink appropriately.

Code: Select all

// Generate symlinks for each File/Folder currently selected.
// Elevates cmd to admin

$outputPrefix = 'link-';

// ================================ CODE ================================

    $batFile    = "<xydata>\Temp\symlinkGenerator.bat";

    $batContents = <<<STRING
@ECHO OFF
REG QUERY "HKU\S-1-5-19" >NUL 2>NUL && GOTO :ENDUAC
SET "vbsFile=<xydata>\Temp\~getAdmin.vbs"
IF "%1" NEQ "" (FOR /F "tokens=*" %%I IN ('ECHO %*') DO SET "param=%%~I")

ECHO Set UAC = CreateObject^("Shell.Application"^)> "%vbsFile%"
ECHO UAC.ShellExecute "cmd", "/c """"%~s0"" ""%param%""""", "", "runas", ^1>> "%vbsFile%"
CSCRIPT "%vbsFile%" //Nologo
IF EXIST "%vbsFile%" DEL /Q "%vbsFile%" >NUL 2>NUL
EXIT /B
:ENDUAC
STRING;

    foreach($item, <selitems :::>, ':::') {
        // Format 'mklink' depending on $item type (file|folder)
        $itemDirectory = getpathcomponent($item, 'path');
        $itemFilename = getpathcomponent($item, 'name');

        if (exists($item) == '1') {
            // $item is file
            $command = lax(mklink "$itemDirectory\$outputPrefix$itemFilename" "$item");
            $batContents .= <crlf> . $command;
        } elseif (exists($item) == '2') {
            // $item is folder
            $command = lax(mklink /D "$itemDirectory\$outputPrefix$itemFilename" "$item");
            $batContents .= <crlf> . $command;
        }
    }

    writefile($batFile, $batContents, , "utf8");
    run($batFile, , 0, 0);