问如何将图像文件夹转换为CBZ (如漫画或电子书中的mangas )

EN

Clear-Host

# INPUT - Script folder path
$i = Split-Path -Parent -Path $MyInvocation.MyCommand.Definition
# 7Zip path
$7zipPath = "$env:ProgramFiles\7-Zip\7z.exe"
# A list of the path of the zipped files
$listOfZippedFiles = New-Object Collections.Generic.List[String]
$listOfZippedNames = New-Object Collections.Generic.List[String]

# Ask the user if we delete the folders after their conversion
$isSdel = Read-Host -Prompt "Do you want to delete the folders after conversion [Y/N]: "

# Get the files inside the INPUT path and forEach children
Get-ChildItem "$i" | ForEach-Object {
    # Get the full path of the file
    $pathFolder = $_.FullName
    
    # If the path here is a folder
    if (Test-Path -Path "$pathFolder" -PathType Container) {
        # Set the alias
        Set-Alias 7z $7zipPath

        # If the user asked for deletion of folders
        if ("Y" -eq $isSdel.ToUpper()) {
            # Zip the content of the folder
            7z a "$pathFolder.zip" "$pathFolder\*" -sdel | FIND "ing archive"
        }
        else {
            # Zip the content of the folder
            7z a "$pathFolder.zip" "$pathFolder\*" | FIND "ing archive"
        }

        # Add the file name into the list
        $listOfZippedFiles.Add("$pathFolder.zip")
        $listOfZippedNames.Add("$_.zip")
    }

    # If the user asked for deletion of folders
    if ("Y" -eq $isSdel) {
        # Remove the now blank folders
        if( $_.psiscontainer -eq $true){
            if((gci $_.FullName) -eq $null){
                $_.FullName | Remove-Item -Force
            }
        }
    }
}

# For each zipped file
foreach ($file in $listOfZippedFiles) {
    # Change the extension to CBZ
    $dest = [System.IO.Path]::ChangeExtension("$file",".cbz")
    Move-Item -Path "$file" -Destination $dest -Force
}

# Write for the user
Write-Host "`r`n`r`nConverted:"

# Displaying the converted files by their names
foreach ($file in $listOfZippedNames) {
    $newName = [System.IO.Path]::ChangeExtension("$file",".cbz")
    Write-Host "-- $newName"
}

# Blank line
Write-Host ""
# Pause to let us see the result
Pause

Clear-Host

# ROOT - Script folder path
$root = Split-Path -Parent -Path $MyInvocation.MyCommand.Definition
# 7Zip path
$7zipPath = "$env:ProgramFiles\7-Zip\7z.exe"

# Test if 7zip is installed
if (-not (Test-Path -Path $7zipPath -PathType Leaf)) {
    throw "7 zip file '$7zipPath' not found"
}

# Ask the user if we delete the folders after their conversion
$isSdel = Read-Host -Prompt "Do you want to delete the folders after conversion [Y/N]: "

# Write for the user
Write-Host "`r`nConverted:"

# Get the files inside the INPUT path and forEach children
Get-ChildItem "$root" | ForEach-Object {
    # Get the full path of the file
    $pathFolder = $_.FullName
    
    # If the path here is a folder
    if (Test-Path -Path "$pathFolder" -PathType Container) {
        # If the user asked for deletion of folders
        if ("Y" -eq $isSdel.ToUpper()) {
            # Zip the content of the folder while deleting the files zipped
            & $7zipPath a "$pathFolder.zip" "$pathFolder\*" -sdel > $null

            # Remove the now blank folder
            if( $_.psiscontainer -eq $true){
                if((gci $_.FullName) -eq $null){
                    $_.FullName | Remove-Item -Force
                }
            }
        }
        else {
            # Zip the content of the folder
            & $7zipPath a "$pathFolder.zip" "$pathFolder\*" > $null
        }

        # Change the extension to CBZ
        $newName = [System.IO.Path]::ChangeExtension("$pathFolder.zip",".cbz")
        Move-Item -Path "$pathFolder.zip" -Destination $newName -Force

        # Tells the user this one is finished converting
        Write-Host "--" -ForegroundColor DarkGray -NoNewline
        Write-Host " $_.cbz"
    }
}

# Tells the user it's finished
Write-Host "`r`nFinished`r`n" -ForegroundColor Green

# Pause to let us see the result
Pause