Как узнать ID добавленной записи?

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
LittleLoya
Сообщения: 1
Зарегистрирован: 11 мар 2013, 00:32

Всем привет!
Как можно получить ID только что добавленной записи?
Пишу функцию, которая, в качестве параметра, принимает массив из строк sql-запросов, которые добавляют (изменяют) записи. Хотелось бы, чтоб она возвращала массив из ID добавленных записей. Это реально?

Код: Выделить всё

Код:
    Public Function AddOrUpdateRecord(ByVal sql_strings() As String) As Integer()
        Dim result = New Integer() {-1}
        Dim i As Integer
        Try
            conn.ConnectionString = ConnectionString 'создаём подключение
            conn.Open() 'открываем базу данных
            StatusConnection = "Connection State::" & conn.State.ToString 'строка состояния
            For i = 0 To sql_strings.Count - 1
                myCommand.CommandText = sql_strings(i)
                myCommand.ExecuteNonQuery()
'Redim Preserve result(i)
'вот сюда наверное что-то нужно добавить, да?            
'result(i) = тут должен быть ID записи
Next i
        Catch odbc_ex As OdbcException
            MessageBox.Show(odbc_ex.Message, "ConnectionDataBase.OdbcException")
            MessageBox.Show(myCommand.CommandText)
            StatusConnection = odbc_ex.ToString
        Catch ex As Exception
            MessageBox.Show(ex.ToString, "ConnectionDataBase.Exception")
            StatusConnection = ex.ToString
        Finally
            reader.Close()
            conn.Close()
        End Try
        Return result
    End Function
Заранее спасибо!
Ответить