PowerShell+NetApi 批处理执行程序

基于CMD 编写批处理程序很反人类，此篇文章介绍利用Power Shell脚本(借鉴明经net版主雪山飞狐的脚本改造而成)处理之前的Bat+scr的过程（https://www.cnblogs.com/NanShengBlogs/p/10957489.html）

---

Windows PowerShell 是一种命令行外壳程序和脚本环境，使命令行用户和脚本编写者可以利用 .NET Framework的强大功能。与com对象无缝对接，可随时条用

1# 条用com对象

COM就像没落的贵族一样，虽然过气，但那个范儿还在。作为遗产，它们还在放光发热。PowerShell没有嫌弃它，而是选择与他们兼容。这也让现在依旧战斗在Native C++的程序员颇为欣慰。PowerShell对COM的访问方式是通过其ProgID来进行。示例如下：

$ie = New-Object -ComObject Excel.Application
$ie.Visible = $true

2# 条用dotnet framework对象

Add-Type -AssemblyName mscorlib

$str = New-Object System.Text.StringBuilder

$str.Append("Hello")

$str.ToString()

3# 改造之前的bat+scr 合并为Powershell脚本

# 控制台程序路径
$key = Get-Item HKLM:SoftwareAutodeskHardcopy
$arr = @()
foreach($value in $key.Property)
{
    $arr += Get-Item HKLM:Software$value
}

$arr = $arr | sort
for($i=0;$i -lt $arr.Count;$i++)
{
    $_values = Get-ItemProperty $arr[$i].PSPath
    $s = "{0}.{1}" -f ($i+1),$_values.ProductName
    [Console]::WriteLine($s)
}
$n = Read-Host "请选择AutoCad版本"


$_values = Get-ItemProperty $arr[[int]$n - 1].PSPath


$MyConsole = $_values.Location + "accoreconsole.exe"

# 设置进程启动信息
$psi= New-Object System.Diagnostics.ProcessStartInfo

$psi.FileName = "cmd.exe"

# 设置进程自动重定向输入
$psi.UseShellExecute = $false
$psi.CreateNoWindow=$true
$psi.RedirectStandardInput = $true
$process = New-Object System.Diagnostics.Process
$process.StartInfo = $psi

#获取当前ps1文件所在的文件夹

$ScriptPath=Split-Path -Parent $MyInvocation.MyCommand.Definition


$dllFileName=$ScriptPath+"ShopDrawing.dll"

$files=[System.IO.Directory]::GetFiles($ScriptPath,"*.dwg")

foreach ($item in $files)
{
    
    [System.IO.FileInfo] $fi=New-Object System.IO.FileInfo($item)
    if (!$fi.IsReadOnly){
     $process.Start()
     $process.StandardInput.WriteLine("""$MyConsole"" "+"/i"+" ""$item""")    
     $process.StandardInput.WriteLine("SECURELOAD")
     $process.StandardInput.WriteLine("0")
     $process.StandardInput.WriteLine("netload")
     $process.StandardInput.WriteLine("""$dllFileName""")
     $process.StandardInput.WriteLine("FILEDIA")
     $process.StandardInput.WriteLine("1")
     $process.StandardInput.WriteLine("mySSsetTest")
     $process.StandardInput.WriteLine("Qsave")
     $process.StandardInput.WriteLine("QUIT")
     $process.StandardInput.WriteLine("EXIT")
     #$process.Kill()
     #$process.Close()
     Write-Host ""“$item""批处理执行完成！" 
    }
    else
    {
        Write-Host ""“$item""被占用或者处于只读状态，批处理执行失败！" 
        continue
    }
    
}

---

 PowerShell脚本下载地址：见第一条评论