[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
  1. @echo off
  2. set info=互助互利,支付宝扫码头像,感谢赞助
  3. rem 有问题,可加QQ956535081及时沟通
  4. title %info%
  5. cd /d "%~dp0"
  6. set "file=build.txt"
  7. powershell -NoProfile -ExecutionPolicy bypass ^
  8.     $Utf8NoBom=New-Object System.Text.UTF8Encoding $False;^
  9.     $text=[IO.File]::ReadAllLines('%file%',$Utf8NoBom);^
  10.     $a=[regex]::match($text[13],'^^(\s*?\S+\s+)(\S.+)');^
  11.     $b=[regex]::match($text[16],'^^(\s*?\S+\s+)(\S.+)');^
  12.     $c=[regex]::match($text[17],'^^(\s*?\S+\s+)(\S.+)');^
  13.     write-host ('当前applicationId:'+$a.groups[2].value);^
  14.     $f=$false;^
  15.     while($f -eq $false){^
  16.         $aa=read-host '请输入新applicationId';^
  17.         if($aa -match '^^\"[\.a-z\d]+\"$'){^
  18.             $f=$true;^
  19.         };^
  20.     };^
  21.     write-host $aa;^
  22.     $text[13]=$a.groups[1].value+$aa;^
  23.     write-host ('当前versionCode:'+$b.groups[2].value);^
  24.     $f=$false;^
  25.     while($f -eq $false){^
  26.         $bb=read-host '请输入新versionCode';^
  27.         if($bb -match '^^\d+$'){^
  28.             $f=$true;^
  29.         };^
  30.     };^
  31.     write-host $bb;^
  32.     $text[16]=$b.groups[1].value+$bb;^
  33.     write-host ('当前versionName:'+$c.groups[2].value);^
  34.     $f=$false;^
  35.     while($f -eq $false){^
  36.     $cc=read-host '请输入新versionName';^
  37.         if($cc -match '^^\"[\.\d]+\"$'){^
  38.             $f=$true;^
  39.         };^
  40.     };^
  41.     write-host $cc;^
  42.     $text[17]=$c.groups[1].value+$cc;^
  43.     [IO.File]::WriteAllLines('%file%', $text, $Utf8NoBom);
  44. echo;%info%
  45. pause
复制代码
提供bat代写,为你省时省力省事,支付宝扫码头像支付
微信: unique2random

TOP

返回列表