Hi,
I need use an url at this format on tIpClientPop class:
tIpClientPop():New( pop://t...@mydomain.com:1...@pop.mydomain.com:110 )
where:
protocol: pop
userId: t...@mydomain.com
password: 123
server: pop.mydomain.com
port: 110
but the result is connection error because regex translate to:
protocol: pop
userId: test
password:
server: mydomain.com
port: 123.0000000000000000
So, inspecting TUrl() class I found:
CLASSDATA cREServ INIT HB_RegexComp("(?:([^:@]*):?([^@:]*)@|)([^:]+):?(.*)")
then I replaced by:
CLASSDATA cREServ INIT HB_RegexComp("(?:([^:]*):?([^@:]*)@|)([^:]+):?(.*)")
and it's working as expected now.
Can anyone confirm this ?
TIA
Eduardo
------------------------------------------------------------------------------
Virtualization & Cloud Management Using Capacity Planning
Cloud computing makes use of virtualization - but cloud computing
also focuses on allowing computing to be delivered as a service.
http://www.accelacomm.com/jaw/sfnl/114/51521223/
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers
