Откуда такой писсимизм? Я познакомился в рунете с многими людьми, разрабатывающими на Access.adp Кроме того появились отличные книги по A2K и MSSQL. Так что Вы совсем не одиноки в своих изысканиях. Если что-то интересует - спрашивайте, чем смогу тем помогу. Есть еще очень интересный форум по всем версиям Access: http://c85.cemi.rssi.ru/Access/Queries/AnsPointListAll.asp

P.S.
Кузбасс пишется с двумя 'c'

Действительно, эта тема уже не раз обсуждалась. Решается двумя путями - или формировать ошибку на сервере и отдавать ее клиенту по raiserror, либо обрабатывать ошибку на клиенте и выдавать пользователю ее читабельный вариант. Я предпочитаю первый вариант. Но весь прикол в том, что при возникновении ошибки коллекция errors 'родного' аксессовского соединения всегда пуста (у этого соединения вообще много странностей). Эта ошибка немедленно передается Аксессовскому обьекту err, откуда ее можно подхватить. Если самому в коде прописать соединение, то можно работать и с коллекцией errors этого соединения. Вот только все запросы, представления и процедуры, которые являются источником записей формы или отчета, по умолчанию используют именно 'родное' соединение. С формами все просто - можно программно открыть нужный рекордсет и 'скормить' его форме, а с отчетом такой фокус уже не пройдет. Так что посмотри, может обьект err - это то что нужно.

В примере пытаемся вставить запись в таблицу, поле которой не допускает отсутсвия значения:

Private Sub Кнопка0_Click()
On Error GoTo sub_err
Dim cmd As ADODB.Command
Set cmd = New ADODB.Command
cmd.ActiveConnection = CurrentProject.Connection
cmd.CommandText = "insert into test select null"
cmd.CommandType = adCmdText
cmd.Prepared = False
cmd.Execute , , adExecuteNoRecords
sub_exit:
Set cmd = Nothing
Exit Sub
sub_err:
Beep
MsgBox Err.number & ", " & Err.Source & ", " & Err.Description
Err.Clear
Resume sub_exit
End Sub

Естно мы имеем дело с ошибкой ADO, а не с ошибкой сервера. Для работы с ошибками сервера, приведу другой пример из MDAC SDK 2.6, но с 'родным' подключением, как я уже говорил, он не прокатит:

'BeginDescriptionVB
Public Sub DescriptionX()

Dim cnn1 As ADODB.Connection
Dim errLoop As ADODB.Error
Dim strError As String

On Error GoTo ErrorHandler

' Intentionally trigger an error.
Set cnn1 = New ADODB.Connection
cnn1.Open "nothing"

Exit Sub

ErrorHandler:

' Enumerate Errors collection and display
' properties of each Error object.
For Each errLoop In cnn1.Errors
strError = "Error #" & errLoop.Number & vbCr & _
" " & errLoop.Description & vbCr & _
" (Source: " & errLoop.Source & ")" & vbCr & _
" (SQL State: " & errLoop.SQLState & ")" & vbCr & _
" (NativeError: " & errLoop.NativeError & ")" & vbCr
If errLoop.HelpFile = "" Then
strError = strError & _
" No Help file available" & _
vbCr & vbCr
Else
strError = strError & _
" (HelpFile: " & errLoop.HelpFile & ")" & vbCr & _
" (HelpContext: " & errLoop.HelpContext & ")" & _
vbCr & vbCr
End If


Debug.Print strError
Next

Resume Next

End Sub
'EndDescriptionVB

Ну вот они, чудеса!

On Error GoTo sub_err
Dim cnErr As ADODB.Error
CurrentProject.Connection.Execute "Select * from НетТакойТаблицы"
sub_exit:
Exit Sub
sub_err:
For Each cnErr In CurrentProject.Connection.Errors
MsgBox cnErr.Description
Next
Resume sub_exit

Коллекция пуста...
Пробую так:

On Error GoTo sub_err
Dim cn As ADODB.Connection, cnErr As ADODB.Error
Set cn = CurrentProject.Connection
cn.Execute "Select * from НетТакойТаблицы"
sub_exit:
Set cn = Nothing
Exit Sub
sub_err:
For Each cnErr In cn.Errors
MsgBox cnErr.Description
Next
Resume sub_exit

Работает!
Так что, оказывается, можно работать и с 'родным' коннектом.

A событие Form_Error у меня вообще не возникает.

А чего тут поправлять - все верно. Целостность данных не должен пасти клиент - это аксиома. Следовательно в триггерах без соответствующих проверок не обойтись. Но предварительнве проверки на клиенте тоже нужны - хотя бы для минимизации бессммысленных обращений к серверу. Только в случае SQL2K можно от связей не отказываться - триггеры Instead отрабатывают до DRI.

Вот совсем свежая ветка в MSSQL:
http://www.sql.ru/cgi-bin/UltraBoard/UltraBoard.pl?Action=ShowPost&Board=mssql&Post=2196