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
    }
}

预期的输出是记事本和命令提示符的快捷方式出现在桌面上，并链接到所需的程序。相反，两个快捷方式都链接到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即可从您提供的字符串数组中进行选择。也可以这样写：

$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循环创建多个快捷方式无法按预期工作

3 个答案: