Constantes de expresión regular en lenguaje simple
.Subrutina regular_match por lotes, entero, esta subrutina se genera utilizando el Asistente de programación Jinyi. Devuelve el número de coincidencias en caso de éxito o 0 en caso de error. Parámetros source_text, text, el texto que debe coincidir
Variables locales local_regular, clase regular_expression, esta es la clase regular en el módulo golden finger, que se puede descargar desde www.3600gz.cn/thread. -1177-1- 1.html descargar
. Variable local Bureau_match, número entero
. Variable local Bureau_count, número entero
. if true(local_regular.create("lt;h3gt;lt;a href=#quote htm_data/7/1404/1093262.html#quote target=#quote_blank#quote id=#quote #quotegt;programa (Visitor Poke)lt; /agt;lt;/h3gt;
lt;I style=color: redgt;newlt;/Igt;
[ lt;span style='font-size: 7pt; -familia: verdana;'gt;lt;a href='read.php?tid=1093262amp;page=1amp;fpage=1' target='_blank'gt;1lt;/agt;lt;a href='read . php?tid=1093262amp;page=2amp;fpage=1' target='_blank'gt;2lt;/agt;lt;a href='read.php?tid=1093262amp;page=3amp;fpage=1' target = '_blank'gt;3lt;/agt;lt;a href='read.php?tid= 1093262amp;page=4amp;fpage=1' target='_blank'gt;4lt;/agt;lt;/spangt;
lt;/tdgt;
lt;td class=#comillas tal y-style#comillas gt;lt;a href=#quoteprofile.php?action=showamp ; uid=292228#quote class=#quotebl#quotegt;amilt;/agt;
lt;div class=#quotef10#quotegt;2014-04- 27lt;/divgt;lt;lt;/trgt ;
", texto fuente, false, false, true, true) = false)
Cuadro de mensaje ("¡Error en la creación regular, verifique si hay errores en la declaración de expresión regular!", # Icono de error, )
devuelve (0)
. Finalizar si es verdadero
Bureau_match_count = Bureau_regular. Obtenga el número de coincidencias ()
.
Si es verdadero (bureau_match_count = 0)
aparece el cuadro de mensaje ("La coincidencia falló, verifique si hay errores en la expresión regular, número: 0", #icono de error,)
Devolver (0 )
. Si es verdadero, finalice
. Primer bucle de conteo (bureau_match_count, Bureau_count)
Salida de texto de depuración ("coincidencia de texto" con texto (bureau_count) " Subcoincidencia de texto 1 en " Bureau_rules. Tomar texto de subcoincidencia (bureau_count, 1))
.Fin del bucle .Count ()
Retorno (bureau_match_count).