1. VisualBasic / Говнокод #2694

    −130.4

    1. 1
    2. 2
    3. 3
    4. 4
    Private Sub Form_AfterInsert() ' событие после вставки новой записи в таблицу table
      runSQL ("UPDATE table set TYPE= 9 where ID = (select max(p.ID) from table p )")
      Me.Form.Requery
    End Sub

    Событие на форме в Access
    А достаточно было просто повесить на форму поле с источником данных TYPE и дефолтовым значением 9.

    Запостил: vie, 01 Марта 2010

    Комментарии (2) RSS

    • Да еще и черевато тем что max не всегда именно тот ID что вставился :)
      Ответить
      • ага, если кто-то параллельно открыл форму))
        Ответить

    Добавить комментарий