
Crew .NET |
|
Wijnand, ik had dit topic niet gezien Ik heb er even naar gekeken en heb wel een oplossing:
De volgende code gebeurt wanneer je op de knop klikt om een gegeven in te voegen. Bij mij wordt er een voor - en achternaam ingegeven en die wordt in de database geplaatst, daarna wordt het ID teruggeven...
Dim query, vn, an, id_db As String
Dim verbinding As SqlConnection
Dim commando As SqlCommand
Protected Sub invoegen(ByVal Src As Object, ByVal e As System.EventArgs)
verbinding = New SqlConnection("Data Source=.\SQLEXPRESS; AttachDbFileName=H:\C#\Scope Identity\App_Data\Database.mdf; Integrated Security=True; User Instance=True")
vn = Server.HtmlEncode(vnaam_invoer.Text)
an = Server.HtmlEncode(anaam_invoer.Text)
query = "INSERT INTO leden(voornaam, achternaam) VALUES ('" & vn & "', '" & an & "') SELECT @@IDENTITY"
commando = New SqlCommand(query, verbinding)
Try
verbinding.Open()
id_db = commando.ExecuteScalar()
Catch ex As Exception
Response.Write(ex.Message)
Finally
verbinding.Close()
Response.Write(id_db)
End Try
End Sub
Dim query, vn, an, id_db As String Dim verbinding As SqlConnection Dim commando As SqlCommand Protected Sub invoegen (ByVal Src As Object , ByVal e As System.EventArgs ) verbinding = New SqlConnection("Data Source=.\SQLEXPRESS; AttachDbFileName=H:\C#\Scope Identity\App_Data\Database.mdf; Integrated Security=True; User Instance=True") vn = Server.HtmlEncode(vnaam_invoer.Text) an = Server.HtmlEncode(anaam_invoer.Text) query = "INSERT INTO leden(voornaam, achternaam) VALUES ('" & vn & "', '" & an & "') SELECT @@IDENTITY" commando = New SqlCommand(query, verbinding) Try verbinding.Open() id_db = commando.ExecuteScalar() Catch ex As Exception Response.Write(ex.Message) Finally verbinding.Close() Response.Write(id_db)
Het gaat hem dus om 2 zaken die hiervoor nodig zijn:
- Na je 'insert' stuk in je query zet je 'SELECT @@IDENTITY'
- Je gebruikt niet 'ExecuteNonQuery' maar 'ExecuteScalar'
Hopelijk is het de goede oplossing, bij mij werkt het in ieder geval!  |