本帖最后由 lixiaolong 于 2011-2-25 17:26 编辑
回复 1# dearmb
把afan版主的表达式改了一点.Local $Str = _
'-------------------------------------------------' & @CRLF & _
'FastCopy(ver2.06) 开始于 2011/02/25 11:03:11' & @CRLF & @CRLF & _
'<来源> D:\line\line10' & @CRLF & _
'<目标> \\192.168.134.51\d$\EntrySystems\Line10' & @CRLF & _
'<命令> !复制(总是复制/覆盖所有文件)' & @CRLF & @CRLF & _
'没有错误' & @CRLF & @CRLF & _
'总计读取 = 0.0 MB' & @CRLF & _
'总计写入 = 0.0 MB' & @CRLF & _
'总计文件 = 1 (0)' & @CRLF & _
'总计时间 = 0.08 秒' & @CRLF & _
'传输速率 = 0.02 MB/秒' & @CRLF & _
'文件速率 = 12.82 文件/秒' & @CRLF & @CRLF & _
'结果 : (错误文件: 0 / 错误目录: 0)' & @CRLF & @CRLF & _
'-------------------------------------------------' & @CRLF & _
'FastCopy(ver2.06) 开始于 2011/02/25 11:03:15' & @CRLF & @CRLF & _
'<来源> D:\line\line10' & @CRLF & _
'<目标> \\192.168.134.52\d$\EntrySystems\Line10' & @CRLF & _
'<命令> !复制(总是复制/覆盖所有文件)' & @CRLF & @CRLF & _
'初始化错误 (无法分配内存或创建/访问目标目录)' & @CRLF & _
'-------------------------------------------------' & @CRLF & _
'FastCopy(ver2.06) 开始于 2011/02/25 11:03:15' & @CRLF & @CRLF & _
'<来源> D:\line\line10' & @CRLF & _
'<目标> \\192.168.134.53\d$\EntrySystems\Line10' & @CRLF & _
'<命令> !复制(总是复制/覆盖所有文件)' & @CRLF & @CRLF & _
'没有错误' & @CRLF & @CRLF & _
'总计读取 = 0.0 MB' & @CRLF & _
'总计写入 = 0.0 MB' & @CRLF & _
'总计文件 = 1 (0)' & @CRLF & _
'总计时间 = 0.27 秒' & @CRLF & _
'传输速率 = 0.01 MB/秒' & @CRLF & _
'文件速率 = 3.77 文件/秒' & @CRLF & @CRLF & _
'结果 : (错误文件: 0 / 错误目录: 0)' & @CRLF
MsgBox(0, '原字符串', $Str)
Local $Test = StringRegExpReplace($str, '(?s).+?\nFastCopy.+?(<目标>\V+).+?\n(结果\V+(?:\r\n|$))', '$1 $2')
MsgBox(0, '替换结果', $Test)
|