; #FUNCTION# =================================================================================================
; Name...........: _CreateArray()
; Description ...: Создает массив из ответной строки по кодовому слову
; Syntax.........: _CreateArray($sString, $sCodeWord)
; Parameters ....: $sString - Ответная стока - та которую выдал ВКонтакте
; $sCodeWord - слово для поиска - которое заключено в галки
; Return values .: Успех - Массив с даными
; Неудача - 1
; Author ........: Medic84
; Remarks .......: Отсутствуют
; ============================================================================================================
Func _CreateArray($sString, $sCodeWord)
Dim $aRetArray
$aRetArray = StringRegExp($sString, "<" & $sCodeWord & ">(.*?)</" & $sCodeWord & ">", 3)
Return $aRetArray
EndFunc ;==>_CreateArray