Links?

If Len(rs(\"Email\")) > 0 Then Response.Write \"<a href=mailto:\" & rs(\"Email\") & \">\" & rs(\"Navn\") & \"</a> skriver:\"
Else
Response.Write \"\" & rs(\"Navn\") & \" skriver:\"
End If

hvis du kigger på www.netcoders.dk eller www.activeserverpages.dk så finder du sådanne funktioner!

superior hvor i dokumentet skal jeg placere det?

Team_matrix>>

Den skal ind der hvor du kalder navn/mail ....

Ellers smid din kode så skal jeg vise dig det der :o)

Mvh
Jack!!

Jeg går ud fra det er i dette stykke?

<%


Case Else
    strAddLine = \"<p><img src=../../billeder/add.gif width=16 height=16>&nbsp;<a href=guestbook.asp?mode=add><strong><font face=verdana size=2>Skriv et indlæg i vores gæstebog!</font></strong></a></p>\"
    Response.Write strAddLine
    strSQL = \"SELECT top 20 * FROM Guestbook ORDER BY Dato DESC;\"
    Set myConn = Server.CreateObject(\"ADODB.Connection\")
    myConn.Open tempConn
    Set rs = myConn.Execute(strSQL)
    If Not (rs.BOF Or rs.EOF) Then
        Response.Write \"<table width=100% border=0 cellpadding=1 cellspacing=1>\"
        Do While Not rs.EOF
            dtmDato = rs(\"Dato\")
            dtmDato = FormatDateTime(dtmDato,vbLongDate) & \"@\" & FormatDateTime(dtmDato,vbLongTime)
            Response.Write \"<tr bgcolor=#006666><td width=\"\"100%\"\"><font face=arial color=#FFFFFF size=2>\" & dtmDato & \"</td></tr>\"
            If Len(rs(\"Email\")) > 0 Then
                Response.Write \"<tr><td><font face=arial size=2><strong><a href=mailto:\" & rs(\"Email\") & \">\" & rs(\"Navn\") & \"</a> skriver:</strong></td></tr>\"
            Else
                Response.Write \"<tr><td><font face=arial size=2><strong>\" & rs(\"Navn\") & \" skriver:</strong></td></tr>\"
            End If
            Response.Write \"<tr><td><font face=arial size=2>\" & rs(\"Kommentar\") & \"<br>&nbsp;</td></tr>\"
            rs.MoveNext
        Loop
        Response.Write \"</table>\"
    Else
        Response.Write \"<p><font face=arial size=2>Der er endnu ikke nogle der har skrevet i gæstebogen</font></p>\"
    End If
    myConn.Close
    Set myConn = Nothing
    Response.Write strAddLine
End Select

Jeps den er i vinkel der, den skriver navnet som et link hvis der står noget i feltet \"Email\"

Mvh
Jack!!