|
|
|
Regular Expressions
|
|||
|---|---|---|---|
|
#18+
Привет, не могу найти хорошей поддержки регулярных выражений под винды. Пытаюсь окучить PCRE.dll (ftp://ftp.csx.cam.ac.uk/pub/software/programming/pcre/Contrib/pcreming.zip). Пока плохо получается, помогите с советом как портировать функции с прототипами: Код: plaintext 1. 2. 3. 4. 5. 6. 7. тут preg - указатель на структуру, pmatch[] - массив структур с найденными строками - с ним основная загвоздка - не знаю как его использовать. пробовал все так: Код: plaintext 1. 2. 3. 4. 5. 6. 7. 8. 9. 10. 11. 12. не заю как поиметь результаты. зы: документация есть в тут ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 20.12.2006, 20:42 |
|
||
|
Regular Expressions
|
|||
|---|---|---|---|
|
#18+
Предлагаю работающий вариант, выдранный из одного проекта: lcFileName = '\Work\Projects\Offline\XML\rss.xml' Local loRE loRE = Createobject("vbscript.regexp") With loRE .Global = .T. .multiline = .T. sss = Filetostr(lcFileName) Select bbcode Scan For Not Empty(Exec) and type !='p' If Lower(Type)<>'s' .Pattern = Mline(Exec, 1) sss = .Replace( sss , Chrtran(Tag1, '%', '$')) .Pattern = Mline(Exec, 2) sss = .Replace( sss , Tag2) Else .Pattern = Mline(Exec, 1) sss = .Replace( sss , Chrtran(Tag1, '%', '$')+Param+Tag2) +Param+Tag2) Endif Endscan Endwith Strtofile(sss, '\Work\Projects\Offline\XML\111.htm') ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 20.12.2006, 20:53 |
|
||
|
|

start [/forum/topic.php?fid=41&fpage=218&tid=1590113]: |
0ms |
get settings: |
6ms |
get forum list: |
15ms |
check forum access: |
2ms |
check topic access: |
2ms |
track hit: |
22ms |
get topic data: |
10ms |
get forum data: |
4ms |
get page messages: |
33ms |
get tp. blocked users: |
1ms |
| others: | 255ms |
| total: | 350ms |

| 0 / 0 |
