{NeoBook Function}
Version=5,60
Language=NeoBook
Comment=Por josevdr95   (neo_html_parse)|--------------------------------------------|Busca datos en un html|Ejemplo:|Etiqueta de apertura:|<ul id="language">|Etiqueta de cierre:|</ul>|-------------------------------------------
Param=[%url]|FileName|Direccin web (URL)
Param=[%E_I]|FileName|Etiqueta de inicio (<ul id="desc_list"><li>)
Param=[%E_F]|FileName|Etiqueta final (</li></ul>)
Param=[%WB]|FileName|Nombre del objeto Navegador Web
{End}
.InternetPost "[%url]" "[%dso]" "[tmp_code]" "Async"
InternetGet "[%url]" "[tmp_code]" "Async"
StrLen "[tmp_code]" "[t_cadena]"
SearchStr "[%E_I]" "[tmp_code]" "[P_1]" ""
Math "[t_cadena]-[P_1]" "-1" "[C_copiar1]"
SubStr "[tmp_code]" "[P_1]" "[C_copiar1]" "[tmp_code2]"
StrLen "[tmp_code2]" "[t_cadena2]"
SearchStr "[%E_F]" "[tmp_code2]" "[P_2]" ""
StrDel "[tmp_code2]" "[P_2]" "[t_cadena2]" "[R_FINAL]"
ClearVariables "[tmp_code]"
ClearVariables "[%E_I]"
ClearVariables "[P_1]"
ClearVariables "[t_cadena]"
ClearVariables "[C_copiar1]"
ClearVariables "[tmp_code2]"
ClearVariables "[t_cadena2]"
ClearVariables "[%E_F]"
ClearVariables "[P_2]"
BrowserLoadFromStr "[%WB]" "[R_FINAL]"
