|
Public Shared Function BeforeEdit(Page As System.Web.UI.Page,
parNewValues As OleDbParameterCollection, where As String) As Boolean
' Send email with new data
' do not forget to setup email parameters like
From, SMTP server etc
' on "Security->User login settings" dialog
Dim message As String = ""
For Each par As OleDbParameter In parNewValues
message += par.ParameterName + " = "
+ Convert.ToString(par.Value) + Environment.NewLine
Next
func.SendMail("test@test.com", "Sample
subject", message)
Return True
' return true if you like to proceed with editing
this record
' return false in other case
End Function |