Здравствуйте, Bigger, Вы писали:
B>Здравствуйте, Арташес, Вы писали:
А>>Здравствуйте, gaidar, Вы писали:
G>>>Приведите код.
G>>>
данное сообщение получено с www.gotdotnet.ru
G>>>ссылка на оригинальное сообщение
B>
B>Dim tran as OleDbTransaction
B>tran = Conn.BeginTransaction()
А>>For Each dr As DataRow In dbTable.Rows
А>> strInsert = "INSERT INTO procedures ...... " 'естественно это не полная строка
А>> Dim AdapMain As New OleDbDataAdapter(strInsert, Conn)
B> AdapMain.SelectCommand.Transaction = tranА> AdapMain.SelectCommand.ExecuteNonQuery()
А>>Next
B>' Анализируем были ли ошибки и
B>tran.Commit() ' ошибок не было
B>tran.Rollback() 'Ошибки случились
А>>System.Threading.Thread.Sleep(3000)
'wait 3 seconds
А>>
Dim sDetail
As New sessionDetail(sessionID)
' sessionDetail это форма которая отоброжает эти самые записи
А>>sDetail.Show()
B>skip
B>Смотрим на выделенное 
Спасибо за ответ!!!
Правда из за отсутствия времени я не успел его поткстировать но, принцип ясен (кажется
)!
С уважением
Арташес
