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:\Software\Autodesk\Hardcopy

 $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("")

      $process.StandardInput.WriteLine("netload")

      $process.StandardInput.WriteLine("""$dllFileName""")

      $process.StandardInput.WriteLine("FILEDIA")

      $process.StandardInput.WriteLine("")

      $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脚本下载地址：见第一条评论

巴特西

PowerShell+NetApi 批处理执行程序

最新文章

热门文章