Adodc+TrueDBGrid, проблемы с обновлением - VB

Формулировка задачи:

Люди нид хелп! Почему-то корректно перестало работать обновление, т.е. в таблицу БД добавляются данные из текстбокса(событие по нажатию кн.сохранить), по нажатию на эту кнопку в конце обработки события вызывался метод refresh и грид обновлялся(показывались новые записи), а сейчас нет!!! В чем может быть проблема?

Решение задачи: «Adodc+TrueDBGrid, проблемы с обновлением»

textual
                            Листинг программы 
                        

                            sql = <font color="teal">"Insert into Staff_table(ID_Staff, Fname, LastName, Post, Work)"</font> _
& <font color="teal">" Values("</font> & CInt(Label2.Caption) & <font color="teal">",'"</font> & First_name & <font color="teal">"','"</font> & Last_name & <font color="teal">"',"</font> & CInt(cmbPostID.Text) & <font color="teal">","</font> & False & <font color="teal">")"</font>
conn.BeginTrans
conn.Execute sql
conn.CommitTrans
                        