Remove text between tags

[Read]

I have .htm files and there is javascript.

<script type="text/javascript">
moment().format('MMMM Do YYYY, h:mm:ss a');
moment().format('dddd');
moment().format("MMM Do YY");
moment().format('YYYY [escaped] YYYY');
moment().format();
//--></script>

How to delete all javascipt code my .htm files? And footer!

#include <File.au3>

Local $aFileList = _FileListToArray(@ScriptDir, '*.htm', 1)
If Not @error Then
    For $i = 1 To $aFileList[0]
        _found(@ScriptDir & '\' & $aFileList[$i])
    Next
EndIf

Func _found($sFilePath)
    Local $hFileOpen = FileOpen($sFilePath, $FO_READ)
    Local $sFileRead = FileRead($hFileOpen)
    FileClose($hFileOpen)

    $hFileOpen = FileOpen($sFilePath, $FO_OVERWRITE)
   FileWrite($hFileOpen, StringRegExpReplace($sFileRead, '<footer>[^<>]+</footer>' ; ERROR
    Return FileClose($hFileOpen)
 EndFunc

[mrflibblehat]

Something like this

$vString = "<script type=""text/javascript"">moment().format('MMMM Do YYYY, h:mm:ss a');moment().format('dddd');moment().format(""MMM Do YY"");moment().format('YYYY [escaped] YYYY');moment().format();//--></script>"

$vStringReg = StringRegExpReplace($vString, "(<script[^>]+>).*?(</script>)", "\1\2")

MsgBox(1, "StringRegExpReplace", $vStringReg)

You can remove the back-references to completely remove everything

Edited July 10, 2013 by mrflibblehat

[Malkey]

....

How to delete all javascipt code my .htm files? And footer! 

....

Try this.

Local $sFileContents = "Start of HTML <script type=""text/javascript"">moment().format('MMMM Do YYYY, h:mm:ss a');" & @LF & _
        "moment().format('dddd');moment().format(""MMM Do YY"");moment().format('YYYY [escaped] YYYY');" & @LF & _
        "moment().format();//--></script> Near end of Html<footer> A Foot </footer> End of Html"
;ConsoleWrite($vString & @LF)

Local $aModifiedFileContents = StringRegExpReplace($sFileContents, "(?is)(<script[^>]+javascript.*?/script>|<footer.+?/footer>)", "")

MsgBox(1, "StringRegExpReplace", $aModifiedFileContents)

Edited July 11, 2013 by Malkey

[Read]

Must take javascript tags and delete all:

<script type="text/javascript">

code

</script>

And FOOTER

<footer>

code

</footer>

This line can't used my script ???:  

= StringRegExpReplace($sFileContents, "(?is)(<script[^>]+javascript.*?/script>|<footer.+?/footer>)", "")

Edited July 11, 2013 by Read

[Malkey]

....

How to delete all javascipt code my .htm files? And footer!

 

 

#include <File.au3>

Local $aFileList = _FileListToArray(@ScriptDir, '*.htm', 1)
If Not @error Then
    For $i = 1 To $aFileList[0]
        _found(@ScriptDir & '\' & $aFileList[$i])
    Next
EndIf

Func _found($sFilePath)
    Local $hFileOpen = FileOpen($sFilePath, $FO_READ)
    Local $sFileRead = FileRead($hFileOpen)
    FileClose($hFileOpen)

    $hFileOpen = FileOpen($sFilePath, $FO_OVERWRITE)
   FileWrite($hFileOpen, StringRegExpReplace($sFileRead, '<footer>[^<>]+</footer>' ; ERROR
    Return FileClose($hFileOpen)
 EndFunc

 

If this doesn't work in your example,

= FileWrite($hFileOpen, StringRegExpReplace($sFileRead,"(?is)(<script[^>]+javascript.*?/script>|<footer.+?/footer>)", ""))

we'll fix your example.

 

Your example slightly changed to:-

#include <File.au3>

Local $aFileList = _FileListToArray(@ScriptDir, '*.htm', 1)
If Not @error Then
    For $i = 1 To $aFileList[0]
        _found(@ScriptDir & '\' & $aFileList[$i])
    Next
EndIf

Func _found($sFilePath)
    Local $sFileRead = FileRead($sFilePath) ; FileRead by itself auto-opens & closes
    Local $hFileOpen = FileOpen($sFilePath, $FO_OVERWRITE)
    FileWrite($hFileOpen, StringRegExpReplace($sFileRead, '(<footer>[^<>]+</footer>)', "")) ; Replaces what the reg. exp. pattern matches with "", nothing.
    Return FileClose($hFileOpen)
EndFunc   ;==>_found

should work now.

Edit: Added an extra bracket to my Reg.Exp.

Edited July 11, 2013 by Malkey

[Read]

Work only

<footer>

code

</footer>

Not work and must work

<footer>
<div class="container">
<nav id="medic">
</footer>

Thanks

[Malkey]

In your regular expression pattern in the StringRegExpReplace() function you have "[^<>]" which means match any character that is not a "<" or a ">".
You can not match '<div class="container">' and '<nav id="medic">' to delete (replace with nothing) because of the four "<" and ">" "not-characters" present.

See [^ ... ] in the "Matching Characters" table under the StringRegExp function in the AutoIt help file for more of an explanation.

For a Regular Expression pattern you can use, dissect the Reg.Exp. pattern in post #3.  Guess, if you can't work it out.  Try something.  Change the "matching characters" in the RE pattern and notice any changes in the result.  That's what I'd do - test, debug, use the help file.

Good luck.

[Read]

I tried different (Regular Expression pattern) and always my results is 0.

Hard rock