jag behöver ett regexp pattern!

Tror att LarsG postat denna kod tidigare:

l = "Nu skall vi se om <a href=www.zzz.com>finfin länk </a> kan fungera"
set o = new regexp
o.pattern = "(<a href=.*?> )(.*?)</a>"
o.ignorecase=true
o.global = true
set matches = o.execute(l)
for each match in matches
response.write match.submatches(1) & "<br>"
next

r/ Asch, det var ju inte vad du ville ha såg ja... jaja.

det gör inget, bättre lycka nästa gång. :)

finns det någon regexp expert här tro?

ja vet inte rikigt.... kanske detta är en början...

<%
Set objRegExp = New regexp
strHTML = "mystring [url]www.passagen.se[/url] aa [url]www.minsida.info[/url] "
objRegExp.Global = true
objRegExp.IgnoreCase = true
objRegExp.Pattern = "www\.(.*?)\..*?[\s\n]"
strHTML = objRegExp.Replace(strHTML,"<strong>$1</strong> ")
Response.Write strHTML

%>

pirro, koden ville inte hoppa igång.

jag kör så här så länge, känns dock inte så roligt! men, men.

Searchfield = Request.QueryString("Searchfield")

Searchfield = Replace(Searchfield, "www.", "")
Searchfield = Replace(Searchfield, "http://", "")
Searchfield = Replace(Searchfield, ".se", "")
Searchfield = Replace(Searchfield, ".com", "")
Searchfield = Replace(Searchfield, ".net", "")
Searchfield = Replace(Searchfield, ".org", "")
Searchfield = Replace(Searchfield, ".nu", "")

Kanske

<%
strURL  = Request.QueryString("Searchfield")
strURL = Replace(strURL,"www.","")

Set RegExp = New regexp
RegExp.Global = true
RegExp.IgnoreCase = true
RegExp.Pattern = "http:\/\/(.*)\..*"
strTxt = RegExp.Replace(strURL,"<b>$1</b>")
Set RegExp = Nothing

Response.Write(strTxt)
%>

Detta fungerar dock bara om man skriver i ".se", ".com", o.s.v, annars skrivs "http://minsida" ut.

Det krävs också att man skriver "http://".

hmm.. koden fungerade för mig... strange....
jaja... får leva m de

Man e kung......på att leka m regexp
Denna kod fungerar iaf för mig

<%
Set objRegExp = New regexp
strText = "mystring [url]www.passagen.se[/url] [url]http://www.tomten.com[/url] [url]http://webforum.nu[/url] aa [url]www.minsida.info[/url] "
objRegExp.Global = true
objRegExp.IgnoreCase = true
objRegExp.Pattern = "(http:\/\/www\.|http:\/\/|www\.)(.*?)\..*?[\s\n]"
strText = objRegExp.Replace(strText,"$2 ")
Response.Write strText
%>

+ att de inte spelar någon roll vad som e efter (.info/.se/osv)
fast den har inget för https:// ska du ha de oxå?
Hoppas koden fungerar
Over and Out
/Pirro

du e nästan kung, he he.
har man bara ett värde typ https://www.webforum.nu funkar inte koden, fixar du det så är du kung! :)

den fungerar.... om du bara sätter ett mellanslag efter

fixxade det....... Fick äntligen $ att fungera.

<%
Set objRegExp = New regexp
strText = "mystring [url]www.passagen.se[/url] [url]http://www.tomten.com[/url] [url]http://webforum.nu[/url] aa [url]www.minsida.info[/url]"
objRegExp.Global = true
objRegExp.IgnoreCase = true
objRegExp.Pattern = "(http:\/\/www\.|http:\/\/|www\.)(.*?)\..*?(\s|\n|$)"
strText = objRegExp.Replace(strText,"$2 ")
Response.Write strText
%>

Over and Out
Pirro

jag hittade en kombination till som vore bra om det lösa:
webforum.nu (ska bli bara webforum)

om man har en adress som ser ut så här då?
http://admin.webforum.nu

Addeladde skrev:

om man har en adress som ser ut så här då?
http://admin.webforum.nu

Det är betydelselöst i mitt fall, jag vill plocka ut namnet och sedan använda det till en domänregistrering.