скрипт для удаления

[Rubichek]

подскажите скрипт для удаления div
пример кода:
<div style="position:absolute;top:22796px;left:48px;"><font face="OMIWOR+MyriadPro-Regular" color="#838182" style="font-size:13px">номичность, комфорт как для пациен-</font></div>
<div style="position:absolute;top:22812px;left:48px;"><font face="OMIWOR+MyriadPro-Regular" color="#838182" style="font-size:13px">та, так и для персонала (современный </font></div>
<div style="position:absolute;top:22572px;left:285px;"><font face="OMIWOR+MyriadPro-Regular" color="#838182" style="font-size:13px">дизайн, встроенный в гентри монитор </font></div>
<div style="position:absolute;top:22588px;left:285px;"><font face="OMIWOR+MyriadPro-Regular" color="#838182" style="font-size:13px">основных параметров сканирования </font></div>
<div style="position:absolute;top:22604px;left:285px;"><font face="OMIWOR+MyriadPro-Regular" color="#838182" style="font-size:13px">+ ЭКГ-сигнала опционально, лазерные </font></div>
<div style="position:absolute;top:22620px;left:285px;"><font face="OMIWOR+MyriadPro-Regular" color="#838182" style="font-size:13px">маркеры для позиционирования па-</font></div>

[SendMessage]

Предположу, что нужно удалять тэги DIV.
Option Explicit

Dim objFSO
Dim FileName
Dim OpenFile
Dim strText

Set objFSO = CreateObject("Scripting.FileSystemObject")

FileName = "z:\DIVremove.htm"

Set OpenFile = objFSO.OpenTextFile(FileName, 1)
strText = OpenFile.ReadAll
OpenFile.Close

Set OpenFile = objFSO.OpenTextFile(FileName, 2)
OpenFile.Write ReplaceText(strText, "<div.*?>(.*?)</div>", "$1")
OpenFile.Close

WScript.Echo "Скрипт отработал."

WScript.Quit

Function ReplaceText(strSourceText, strPattern, strNewText)
Dim objRegExp
Set objRegExp = New RegExp
objRegExp.Pattern = strPattern
objRegExp.IgnoreCase = True
objRegExp.Global = True
ReplaceText = objRegExp.Replace(strSourceText, strNewText)
End Function
В принципе, можно удалять любой текст - просто нужно проставить нужные условия регулярных выражений (выделенные цветом). Первое - искомый текст, второе - текст на выходе.

[Rubichek]

да нужно удалить div