Protected Sub btnAddEnTry_Click(ByVal sender As Object, ByVal e As EventArgs)
srcGuestBook.InsertParameters("Name").DefaultValue = txtName.Text
srcGuestBook.InsertParameters("Comments").DefaultValue = txtComments.Text
srcGuestBook.Insert()
End Sub
Protected Sub srcGuestBook_Inserting(ByVal sender As Object, ByVal e As
SqlDataSourceCommandEventArgs)
e.Command.Parameters.Add(New SqlParameter("@Name", User.Identity.Name))
End Sub
Protected Sub srcGuestbook_Inserting(ByVal sender As Object, ByVal e As
ObjectDataSourceMethodEventArgs)
e.InputParameters.Add("IPAddress", Request.UserHostAddress)
End Sub
Thanks & Regards,
Arun Manglick
SMTS || Microsoft Technology Practice || Bridgestone - Tyre Link || Persistent Systems || 3023-6258
DISCLAIMER ========== This e-mail may contain privileged and confidential information which is the property of Persistent Systems Pvt. Ltd. It is intended only for the use of the individual or entity to which it is addressed. If you are not the intended recipient, you are not authorized to read, retain, copy, print, distribute or use this message. If you have received this communication in error, please notify the sender and delete all copies of this message. Persistent Systems Pvt. Ltd. does not accept any liability for virus infected mails.
No comments:
Post a Comment