|
Public Shared Function BeforeEdit(Page As System.Web.UI.Page,
parNewValues As OleDbParameterCollection, where As String) As Boolean
'Check if specific record exists
Dim sSQLSelect As String = "select * from
[AnyTable] where [AnyColumn]=@parAnyColumn"
Dim cn As New OleDbConnection(func.GetConnectionStr())
Dim cmdSelect As OleDbCommand = New OleDbCommand(sSQLSelect, cn)
cmdSelect.CommandType = CommandType.Text
cmdSelect.Parameters.Add("@parAnyColumn",
OleDbType.VarChar).Value = "value1"
cn.Open()
Dim dr As OleDbDataReader = cmdSelect.ExecuteReader(CommandBehavior.CloseConnection)
If dr.Read() Then
'if record exists do something
Else
'if dont exist do something else
End If
Return True
' return true if you like to proceed with editing
this record
' return false in other case
End Function |
