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()
Advertisements
Kommentare (0)
Trackbacks (0)
Hinterlasse einen Kommentar
Trackback