Script Examples vbscript autoit php batch

Search for Textstring in file

(2)
Artikel bewerten
(6)

kommt Suchtext in einer Datei vor




Const ForReading = 1
strdatei = Wscript.Arguments(0)
suche = Wscript.Arguments(1)
Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objTest = objFSO.GetFile(strdatei)
If objTest.Size > 0 Then
    Set objFile = objFSO.OpenTextFile(strdatei, ForReading)
    strText = objFile.ReadAll
    objFile.Close

    found = InStr(1, strText,suche)
    if found > 0 then
      WScript.Echo "gefunden"
    End If
End If
<<< read file in vbscript vbscript - Textstellen einer Textdatei ersetzten >>>


neue Themen

Stichwortsuche auf dieser Seite:
05.02.2012 10:20 zZ 6 Leser online
Powered by cms.libe.net 2004-2012