[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 terse 于 2019-9-10 10:02 编辑

看错了 呵呵

TOP

本帖最后由 terse 于 2019-9-11 19:41 编辑

来一个 powershell 的
  1. function Script:Fileinfo{
  2. param([String]$pha,[String]$phb,[String]$f1,[String]$f2)
  3. Begin {
  4.        $array = '修改时间','文件名称','ip','jh','100M','请求','无法','unreach','一般','failure','wl','result'
  5.        $arr =$array[4..9]
  6.        $text = ''
  7. }
  8. process{
  9.      $s1 = $_.LastWriteTime.ToString('yyyy年MM月dd日HH:mm:ss')
  10.      $s2 = ($_.BaseName).Substring(0,4)
  11.      $s3 = (select-string $f1 -pattern "$s2" -AllMatches -Encoding default).Line
  12.      if (!$s3) {$s3 = "-"}
  13.      $s4 = (select-string $f2 -pattern "$s2" -AllMatches -Encoding default).Line
  14.      if (!$s4) {$s4 = "-"}
  15.      $ar = New-Object System.Collections.ArrayList
  16.      for (;$ar.Add(0) -lt 5;){}
  17.      $s = (select-string $_ -pattern $arr -AllMatches  -Encoding default | group Pattern)
  18.      [int] $len = $s.name.Count
  19.      if ($len -gt 0) {
  20.          for ($i = 0;$i -lt $len; $i++) {
  21.              if ($arr  -contains $s[$i].name) {
  22.                   $ar[$arr.indexof($s[$i].name)] += $s[$i].Count
  23.               }
  24.          }
  25.      }
  26.      $sum = ($ar[1..5] | Measure-Object -Sum).Sum
  27.      $ar = ,$s4.split(' ')[0].PadRight(5) + $ar
  28.      $ar = ,$s3.split(' ')[0].PadRight(10) + $ar
  29.      $ar = ,$s2.PadLeft(3) + $ar
  30.      $ar = ,$s1.PadRight(10) + $ar
  31.      $ar += "$sum"
  32.      $text += ($ar -join("`t")) + "`n"
  33. }
  34.     end {
  35.      $f = $phb+'wltj'+ $(-join((48..57 + 65..90 + 97..122) | get-random -count 6 | %{[char]$_}))+'.txt'
  36.      $text | Out-File -Encoding default $f
  37.      Get-ChildItem -Path $pha B*.txt -Force| Sort-Object  -Property LastWriteTime |Where-Object {!$_.PSIsContainer} |remove-item
  38.      }   
  39. }
  40. $pha="d:\se\"
  41. $phb="d:\se\se\"
  42. $f1 = "$phb"+"ipref.txt"
  43. $f2 = "$phb"+"jhref.txt"
  44. Get-ChildItem -Path $pha B*.txt -Force| Sort-Object  -Property LastWriteTime |Where-Object {!$_.PSIsContainer} | Fileinfo "$pha" "$phb" "$f1" "$f2"
复制代码

TOP

回复  terse
运行结果多处不可哦。
zrf0123 发表于 2019-9-12 22:17

多处不可是什么情况
实际数据和给出的格式有出入吗

TOP

返回列表