Finde emails i textstreng

str = Ronnie,12345678,,9

tabel = split(str,",")

email = tabel(2)

str = dintekststreng

cesil der er flere emails i strengen ;)

Men Dan du mangler at forklare om disse emails, skal udskrives, eller gemmes i en ny variabel, eller noget

<%
email = ""
str = "Per,,per@persmail.dk,18"
arr = split(str,",")

For i=0 to uBound(arr)
if (inStr(arr(i), "@")>0) And (inStr(arr(i), ".")>0) Then
  email = email & "," & arr(i)
End If
Next

Response.write email
%>

ganske utestet!

"ganske utestet!"

Men det fungerer! :)

Takker!,

Hvis vi kan f¨et svar fra grunken?

svar ;)

Lukker du?

Mæ' garanti :)