<Script Runat="Server"> Sub Button_Click( s As Object, e As EventArgs ) entries.innerHtml = "<hr>" & username.Value & "<p>" & comments.Value & entries.innerHTML End Sub </Script> <html> <head><title>Guestbook.aspx</title></head> <body> <form Runat="Server"> <b>Username:</b> <br><input > <p> <b>Comments:</b> <br><textarea ></textarea> <p> <input type="submit" value="Add Comment" OnServerClick="Button_Click" Runat="Server"> <span /> </form> </body> </html>
相关文章：