Hier das ungefähre Scriptbeispiel:
e-mail: <A HREF="mailto:<%= rs("MAVorname") %>.<%= rs("MANachname") %>@fh-joanneum.at"><%= rs("MAVorname") %>.<%= rs("MANachname") %>@fh-joanneum.at</A></FONT></TD><TD WIDTH="50%" HEIGHT="92" VALIGN="top">
Hallo,
probiers mal hiermit:
<%
Private Function ConvertText(TextBlock)
Dim NewTextBlock
NewTextBlock = TextBlock
NewTextBlock = Replace(NewTextBlock, "Ä", "Ae")
NewTextBlock = Replace(NewTextBlock, "ä", "ae")
...
ConvertText = NewTextBlock
End Function
...
%>
<A HREF="mailto:<%= ConvertText(rs("MAVorname")) %>.<%= ConvertText(rs("MANachname")) %>
Tschau, Stefan