请教正则表达式！
1.文本内容如下：磁盘 ###状态 大小 可用 DynGpt
-----------------------------------------
磁盘 0 联机 298 GB1024 KB
磁盘 1 联机 931 GB 0 B
求提取：磁盘 0 联机 298 GB1024 KB红色部分！
2.文本内容如下：
分区 ### 类型 大小 偏移量
-------------------------------------------
分区 1 主要 50 GB1024 KB
分区 2 主要 50 GB 50 GB
分区 0 扩展的 198 GB 100 GB
分区 3 逻辑 198 GB 100 GB
分区 4 OEM 30 GB 100 GB
求提取：分区 1 主要 50 GB1024 KB 红色部分！
对AU3不是怎么太熟，英语也不好，看见正则头大一倍，望高手帮助！谢谢！ 本帖最后由 xms77 于 2013-2-27 21:28 编辑
### 友情提示：本脚本由 Au3.REHelper 于 2013/02/27 21:25 自动生成，不保证其正确性，请自行测试 ###
#include <Array.au3>
Local $Str = _
'分区 1 主要 50 GB1024 KB' & @CRLF & _
'分区 2 主要 50 GB 50 GB' & @CRLF & _
'分区 0 扩展的 198 GB 100 GB' & @CRLF & _
'分区 3 逻辑 198 GB 100 GB' & @CRLF & _
'分区 4 OEM 30 GB 100 GB' & @CRLF
MsgBox(0, '原字符串', $Str)
Local $Test = StringRegExp($str, '分区 (\d+.+?GB)', 3)
If Not @Error Then MsgBox(0, '匹配数量: ' & UBound($Test), '其中元素为: ' & $Test)
_ArrayDisplay($Test, UBound($Test)) 本帖最后由 hanz_200 于 2013-2-27 21:45 编辑
感谢帮助，提取到的红色部分需要再次的正则，才能得到最总的结果!
比如：
$1=4
$1=OEM
$1=30 GB
还有就是大小不一定是GB,也有可能是MB! 这两段可以通用一个表达式#include <Array.au3>
Local $Str = ClipGet()
Local $Test = StringRegExp($str, '(?<=磁盘|分区)\h+(\d+)\h+(\S+)\h+(\d+\h+\S+)', 1)
_ArrayDisplay($Test, UBound($Test)) 为什么返回值只有一组啊？ 本帖最后由 afan 于 2013-2-28 00:34 编辑
为什么返回值只有一组啊？
hanz_200 发表于 2013-2-27 22:40 http://www.autoitx.com/images/common/back.gif
你是两个文件，当然要分开测试。只是代码通用罢了。正则的标志特意为"1"，就是避免两个文件连在一起测试，取多了以为错误了。
如果你想两个文件连在一起测试，当然修改一下即可。不过那样不是增加了许多无谓的操作吗？ 回复 6# afan
别多说了，看来是搞事的。或者就根本不知道自己的要求 回复afan
别多说了，看来是搞事的。或者就根本不知道自己的要求
netegg 发表于 2013-2-28 04:56 http://www.autoitx.com/images/common/back.gif
可能我说的有点模糊，对不起了，但可不是什么搞事的。 我们公司是联想专卖店，总是大批量出联想的商用机器，每次都上百台，一般机器自带的系统不是DOS,LINUX,就是WINDOWS 7。客户基本都要装XP，所以就要求我们改系统，以前是全盘GHOST，后来我嫌全盘太慢（联想有OEM隐藏分区，很大），就使用Diskpart脚本进行分区，然后单分区GHOST，每次型号都不一样，每次都需要改配置文件。（分区的时候不能用clean命令来清理全部分区，OEM隐藏分区涉及到一键恢复不能删除）
每次到新类型的机器，我得先在机器上运行diskpart，选择磁盘后 select disk 0，列出分区 list partition。下面是运行的结果：
Microsoft DiskPart 版本 6.1.7601
Copyright (C) 1999-2008 Microsoft Corporation.
在计算机上: LENOVO-PC
磁盘 0 现在是所选磁盘。
分区 ### 类型 大小 偏移量
-------------------------------------------
分区 1 主要 50 GB1024 KB
分区 2 主要 50 GB 50 GB
分区 0 扩展的 198 GB 100 GB
分区 3 逻辑 198 GB 100 GB
分区 4 OEM 30 GB 30 GB
看前面的分区号，编写脚本：
SELECT DISK 0
SELECT PARTITION 1
DEL PARTITION
SELECT PARTITION 2
DEL PARTITION
SELECT PARTITION 3
DEL PARTITION
SELECT PARTITION 0
DEL PARTITION
CREATE PARTITION PRIMARY SIZE=51208
FORMAT QUICK
ASSIGN
ACTIVE
CREATE PARTITION EXTENDED
CREATE PARTITION LOGICAL SIZE=133125
FORMAT QUICK
ASSIGN
CREATE PARTITION LOGICAL SIZE=133125
FORMAT QUICK
ASSIGN
CREATE PARTITION LOGICAL
FORMAT QUICK
ASSIGN
EXIT
然后，用diskpart /s 来带这个脚本运行。
后来我想能不能自动删除除了OEM分区以外的分区于是有了上面的难题！
（用diskpart的原因是它可以分区4K自动对其，需要windows 7以上的pe支持）
所以感谢A大和xms77，因为我对au3确实不怎么懂！ 分区装系统有这么麻烦吗，重新分区加装系统顶多也就是十分钟的事情。 新硬盘当然要4K对齐了，用diskpart可以直接对齐，一个脚本就分区好了，这还麻烦？
页:
[1]