搜索特定字符串是否存在

xlcwxl

搜索特定字符串是否存在，如果存在执行下一步，不存在给出提示：

如搜索下一段字符串：
以下是内容：
===============================
name                : 服务器名称
Password          :
===============================
内容完毕

检查：“服务器名称” 这几个字符，如果不存在则提示，存在则执行下一步

lynfr8

StringInStr
--------------------------------------------------------------------------------

检查某个字符串是否含有给定的子串.

yzh016

................

gucong

4楼有点小问题，修改了一下

Func Find()
        Dim $str,str1
        $str1="服务器名称"
        $str=FileRead("*.log")
        if stringinstr($str,$str1) then
                Msgbox(0+64,"Notice","String exist in this file")
        Else
                Msgbox(0+64,"Notice","String not exist in this file")
        EndIf
Endfunc

menfan1

学习一下。。

chengjinn

没有事就回贴..支持一下就有钱拿.哈哈