InsertCommand im OnRowUpdated-Ereignis ist Nothing?

21/08/2007 - 16:32 von Armin Zingler | Report spam
Hallo NG,

wie kann es sein, dass das InsertCommand in der mit * gekennzeichneten Zeile
Nothing ist? e.Command hingegen ist nicht Nothing und enthàlt das/ein
InsertCommand.


Private Shared Sub OnRowUpdated( _
ByVal sender As Object, _
ByVal e As System.Data.OleDb.OleDbRowUpdatedEventArgs)

Dim NewID As Integer
Dim cmd As OleDbCommand
Dim con As OleDbConnection

If e.StatementType <> StatementType.Insert Then Return

* con = DirectCast(sender, OleDbDataAdapter).InsertCommand.Connection
cmd = New OleDbCommand("select @@identity", con)
NewID = CInt(cmd.ExecuteScalar)
DirectCast(e.Row, DS.ArbeitenRow).ID = NewID

End Sub


Armin
 

Lesen sie die antworten

#1 Peter Fleischer
21/08/2007 - 20:00 | Warnen spam
Armin Zingler wrote:

wie kann es sein, dass das InsertCommand in der mit *
gekennzeichneten Zeile Nothing ist? e.Command hingegen ist nicht
Nothing und enthàlt das/ein InsertCommand.


Private Shared Sub OnRowUpdated( _
ByVal sender As Object, _
ByVal e As System.Data.OleDb.OleDbRowUpdatedEventArgs)

Dim NewID As Integer
Dim cmd As OleDbCommand
Dim con As OleDbConnection

If e.StatementType <> StatementType.Insert Then Return

* con = DirectCast(sender, OleDbDataAdapter).InsertCommand.Connection
cmd = New OleDbCommand("select @@identity", con)
NewID = CInt(cmd.ExecuteScalar)
DirectCast(e.Row, DS.ArbeitenRow).ID = NewID

End Sub



Hi Armin,
wie hast du denn das Command-Objekt erstellt, welches du der
InserCommand-Eigenschaft des DataAdapters zugeweisen hast?

Viele Grüße

Peter

Ähnliche fragen