Startseite > MySQL, VB.NET > MySQL – Serial beim INSERT über VB.NET ermitteln

MySQL – Serial beim INSERT über VB.NET ermitteln

wie ermittelt man den Wert eines Serial-Feldes für den gerade eingefügten Datensatz:

    CREATE TABLE mytable (
        id int(11) NOT NULL AUTO_INCREMENT,
        f1 varchar(100) COLLATE utf8_unicode_ci
    )

der entsprechende VB.NET-Code:

Dim strCon As String = "Driver={MySQL ODBC 5.1 Driver};Server=<server>;Port=<port>;Database=<db>;User=<user>; Password=<pwd>;"
Dim sql As String = "INSERT INTO mytable VALUES (null, 'Hello World')"

Dim con As New ADODB.Connection
Dim rs As New ADODB.Recordset

con.Open(strCon)
con.Execute(sql)
rs = con.Execute("SELECT LAST_INSERT_ID() FROM mytable")
Dim id As Integer = rs.Fields(0).Value

MsgBox(id)

con.Close()
About these ads
Kategorien:MySQL, VB.NET
  1. Es gibt noch keine Kommentare.
  1. No trackbacks yet.

Kommentar verfassen

Trage deine Daten unten ein oder klicke ein Icon um dich einzuloggen:

WordPress.com-Logo

Du kommentierst mit Deinem WordPress.com-Konto. Abmelden / Ändern )

Twitter-Bild

Du kommentierst mit Deinem Twitter-Konto. Abmelden / Ändern )

Facebook-Foto

Du kommentierst mit Deinem Facebook-Konto. Abmelden / Ändern )

Google+ photo

Du kommentierst mit Deinem Google+-Konto. Abmelden / Ändern )

Verbinde mit %s

Follow

Erhalte jeden neuen Beitrag in deinen Posteingang.

%d Bloggern gefällt das: