Avatar billede obhat Nybegynder
05. august 2006 - 15:50 Der er 2 kommentarer og
1 løsning

link i formularer

Er det muligt hvis man skriver en internet adresse i en formular, at der automatisk bliver til et link. Selvom jeg skriver http:// eller ej, bliver det ikke noget link nu.
Avatar billede keysersoze Ekspert
05. august 2006 - 16:09 #1
www.netcoders.dk - hvis du søger efter "linkmaker" finder du nogle forskellige muligheder. Formentlig har også www.activedeveloper.dk nogle forslag på dette.
Avatar billede cyberkox Nybegynder
05. august 2006 - 23:54 #2
Her kommer der lige en som jeg bruger:

Function Link(strInput)
arrPattern = Array("([\w\._-]+@[\w\._-]+\.[A-Za-z]{2,4}\S*)", _
"(http|https|ftp)(:\/\/[\w\._-]+\.[\w\._-]+\S*)", _
"(^|[^\/])(www[^\.\s]?\.[\w\._-]+\.[A-Za-z]{2,4}\S*)")

arrReplaceString = Array(" <a href='mailto:$1'>$1</a> ", _
" <a href='$1$2' target='_blank'>$1$2</a> ", _
" <a href='http://$2' target='_blank'>$2</a> ")

Set Rx = New RegExp
Rx.Global = True
Rx.IgnoreCase = True

For intIndex = 0 To UBound(arrPattern)
    Rx.Pattern = arrPattern(intIndex)
    strInput = Rx.Replace(strInput, arrReplaceString(intIndex))
Next

Set Rx = Nothing

LinkString = strInput
End Function
-----------------

Så udskriver du bare ved at sætte link( ) om, fx: link(rs("formular1"))
Avatar billede keysersoze Ekspert
13. september 2006 - 11:37 #3
lukketid?
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester