Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Название темы: XML DOM wrapper (COM)
Показать сообщение отдельно

Аватара для madmasles

Ветеран


Сообщения: 812
Благодарности: 353

Профиль | Отправить PM | Цитировать


selims99,
Или так можно попробовать:
Код: Выделить весь код
#include <File.au3>
#include <Array.au3>

Dim $aTest, $aNewTest[1]
Local $sString, $sFile = @ScriptDir & "\untitled.xml"

_FileReadToArray($sFile, $aTest)
For $i = 1 To UBound($aTest) - 1
    $sString = StringRegExpReplace(StringReplace($aTest[$i], @TAB, ""), "<.*?>", "")
    If StringLen($sString) > 0 Then
        _ArrayAdd($aNewTest, StringRegExpReplace(StringReplace($aTest[$i], @TAB, ""), "<.*?>", ""))
        $aNewTest[0] += 1
    EndIf
Next
_ArrayDisplay($aNewTest)
Это сообщение посчитали полезным следующие участники:

Отправлено: 12:02, 16-05-2010 | #6

Название темы: XML DOM wrapper (COM)