|
<%@ Page Language=VB Debug=true %>
<script runat=server>
Sub Anchor_Click(Source As Object, E as EventArgs)
Anchor1.InnerHtml = "<B>Thanks for clicking " _
& "the link!</B>"
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Creating an HTMLAnchor Control</TITLE>
</HEAD>
<BODY>
<form runat="server">
<a id="Anchor1" onserverclick="Anchor_Click" runat=server>
Click Me
</a>
</Form>
</BODY>
</HTML>
|