在使用telnet成功获取回显，但不知如何使用正规表达式获取内容

80107671 · 发表于 2012-9-13 20:43:31

我已经成功获取telnet命令后的内容了，但不知如何去获取内容并且判断。还请达人们帮忙解答呀！
问题：请问如何使用StringRegExp获取以下图片中的08 EXP 6.0 和 09 EXP 6.0和 10 EXP 6.0以及11 EXP 6.0的内容并且进行判断？
我是新手，对这个函数不会使用，请各位高手解救。
图片中的内容是已知结果，变量为$info,

半芯竹 · 发表于 2012-9-13 21:47:14

本人菜鸟，半桶水不够，不会正则，给你弄一个简单点的。你看能否可行。
首先将你这个$info保存为一个TXT，然后。。

Local $file = FileOpen("12.txt", 0)
If $file = -1 Then
    MsgBox(0, "错误", "不能打开文件.")
    Exit
EndIf
While 1
    Local $line = FileReadLine($file)
    If @error = -1 Then ExitLoop
        If StringInStr ( $line, "08 EXP 6.0") Then MsgBox(0, "读取的行:", $line)
        If StringInStr ( $line, "09 EXP 6.0") Then MsgBox(0, "读取的行:", $line)
        If StringInStr ( $line, "10 EXP 6.0") Then MsgBox(0, "读取的行:", $line)
        If StringInStr ( $line, "11 EXP 6.0") Then MsgBox(0, "读取的行:", $line)
Wend
FileClose($file)

80107671 · 发表于 2012-9-13 22:18:44

啊，，貌似这样很麻烦哦，是不是太晚了，高手不现身吗？

ndyzx · 发表于 2012-9-13 22:57:30

回复 1# 80107671
比如保存为FILE.EXE,用以下正则：

$txt = FileRead("a.txt")
ClipPut ( $txt )
Local $txt = ClipGet()
$str = StringRegExp($txt, '(\V+)EXP 6.0', 3)
For $i = 0 To UBound($sTr) - 1
MsgBox(0, '',$str[$i] &"EXP 6.0")                
Next

		自动登录	找回密码
密码			加入

[系统综合] 在使用telnet成功获取回显，但不知如何使用正规表达式获取内容

本帖子中包含更多资源

相关帖子