Foreach 循环创建多个快捷方式未按预期工作

Question

我正在尝试制作一个脚本，为桌面上的可执行文件创建多个快捷方式。因为负责创建快捷方式的代码将被多次使用，并且在其他脚本中我决定将其放入一个函数中。

逻辑非常简单：

定义函数
在单独的数组中定义快捷方式的目标文件（我在示例中使用 notepad.exe 和 cmd.exe）
定义快捷方式的预期路径

我正在尝试使用嵌套的 foreach 循环遍历目标文件和快捷方式路径数组，但它没有正确生成快捷方式。也许有更好的方法来遍历我没有看到的程序（很有可能，因为我病了而且脑雾很严重）。

脚本至少可以处理一个快捷方式。

我试过运行函数外的函数代码。当我从数组中删除命令提示符时，便会正确创建记事本的快捷方式。

function CreateShortcuts {
    [CmdletBinding()]
    Param(
        [Parameter(Mandatory = $true, Position = 0)]
        [System.String]$ShortcutPath,

        [Parameter(Mandatory = $true, Position = 1)]
        [System.String]$TargetFile,

        [Parameter(Mandatory = $false, Position = 2)]
        [System.String]$ShortcutArgs
    )

    $objShell = New-Object -ComObject WScript.Shell
    $objShortcut = $objShell.CreateShortcut($ShortcutPath)
    $objShortcut.TargetPath = $TargetFile
    $objShortcut.Save()
}

$TargetFiles = "$env:SystemRoot\System32\notepad.exe", "$env:SystemRoot\System32\cmd.exe"
$ShortcutPaths = "$env:Public\Desktop\Notepad.lnk", "$env:Public\Desktop\Command Prompt.lnk"

foreach ($ShortcutPath in $ShortcutPaths) {
    foreach ($TargetFile in $TargetFiles) {
        CreateShortcuts -ShortcutPath $ShortcutPath -TargetFile $TargetFile
    }
}

预期输出是记事本和命令提示符的快捷方式出现在桌面上，link 是预期程序。相反，发生的是 link 到 cmd.exe.

的两个快捷方式

Answer 1

你的循环是错误的。您正在做的是循环遍历 $ShortcutPaths 中的每个项目，并且对于循环遍历 $TargetFiles 中每个项目的每个项目，因此 $ShortcutPaths 中的每个项目最终都会创建一个指向$TargetFiles 中的最后一项。您要做的是将每个数组中的每个项目与另一个数组中的相同索引项目相关联。因此 $ShortcutPaths 中的第 1 项与 $TargetFiles 中的第 1 项，依此类推。为此，您可以使用 For 循环：

$TargetFiles = "$env:SystemRoot\System32\notepad.exe", "$env:SystemRoot\System32\cmd.exe"
$ShortcutPaths = "$env:Public\Desktop\Notepad.lnk", "$env:Public\Desktop\Command Prompt.lnk"
For($i=0;$i -lt $ShortcutPaths.count;$i++){
    CreateShortcuts -ShortcutPath $ShortcutPaths[$i] -TargetFile $TargetFiles[$i]
}

Answer 2

我同意 TheMadTechnician 的观点，只需从您提供的字符串数组中将另一个变量 $i 添加到 select。也可以这样写：

$i=0    
    Foreach ($TargetFile in $TargetFiles) {

        CreateShortcuts -ShortcutPath $ShortcutPaths[$i] -TargetFile $TargetFile
        $i=$i+1

    }

我更喜欢在函数部分中使用这个 for 循环，您只需将字符串数组传递给函数即可。像这样。

function CreateShortcuts {

    [CmdletBinding()]
    Param(

        [Parameter(Mandatory = $true, Position = 0)]
        [system.String[]]$TargetFile,

        [Parameter(Mandatory = $true, Position = 1)]
        [system.String[]]$ShortcutPath,

        [Parameter(Mandatory = $false, Position = 2)]
        [System.String]$ShortcutArgs
    )
        $i=0
        Foreach ($object in $TargetFile) {
            $objShell = New-Object -ComObject WScript.Shell
            $objShortcut = $objShell.CreateShortcut($ShortcutPath[$i])
            $objShortcut.TargetPath = $object
            $objShortcut.Save()
            $i=$i+1
            }

}


$TargetFile = "$env:SystemRoot\System32\notepad.exe", "$env:SystemRoot\System32\cmd.exe"
$ShortcutPath ="$env:Public\Desktop\Notepad.lnk" ,"$env:Public\Desktop\Command Prompt.lnk"

CreateShortcuts  -TargetFile $TargetFile -ShortcutPath $ShortcutPath

Answer 3

感谢大家的投入。这很有帮助，让我摆脱了困境。第二天我的脑雾消失了，我脑袋里的齿轮终于又开始转动了。我最终为此任务使用了哈希表，以确保目标、快捷路径和快捷参数值都基于同名键匹配。我意识到，如果上述每个值的索引顺序彼此乱序，或者某些快捷方式需要参数而其他快捷方式则不需要，则使用数组可能会出现问题。

下面是更新后的代码。剩下要做的就是添加帮助信息了。

    function CreateShortcuts {

    [CmdletBinding()]
    Param(

        [Parameter(Mandatory = $true,
                   Position = 0)]
        [System.Collections.Hashtable]$TargetFiles,

        [Parameter(Mandatory = $true,
                   Position = 1)]
        [System.Collections.Hashtable]$ShortcutPaths,

        [Parameter(Mandatory = $false,
                   Position = 2)]
        [System.Collections.Hashtable]$ShortcutArgs
    )


    $objShell = New-Object -ComObject WScript.Shell

    Foreach ($item in $TargetFiles.Keys) {

        $objShortcut = $objShell.CreateShortcut($ShortcutPaths.Item($item))
        $objShortcut.TargetPath = $TargetFiles.Item($item)
        if ($ShortcutArgs)  {
            $objShortcut.Arguments = $ShortcutArgs.Item($item)
        }
        $objShortcut.Save()
    }
}


$TargetFiles = @{
                    "Notepad" = "$env:SystemRoot\System32\notepad.exe"
                    "CmdPrompt" = "$env:SystemRoot\System32\cmd.exe"
                }

$ShortcutPaths = @{
                      "Notepad" = "$env:Public\Desktop\Notepad.lnk"
                      "CmdPrompt" = "$env:Public\Desktop\Command Prompt.lnk"
                  }

$ShortcutArgs = @{
                     "CmdPrompt" = "/foo -bar"
                     "Notepad" = "/test"
                 }

CreateShortcuts -ShortcutPaths $ShortcutPaths -TargetFiles $TargetFiles -ShortcutArgs $ShortcutArgs

Foreach 循环创建多个快捷方式未按预期工作

Foreach Loop to Create Multiple Shortcuts Not Working as Expected

powershell

foreach

shortcut