como refresco un datagrid en vb

[gym1702]

que tal camaradas, quisiera me ayudaran a solucionar esto:
quiero refrescar un data grid para que al momento de ingredar datos en un textbox y guardarlos me aparezcqn en el grid
el codigo que uso es el siguiente:

Set ConnPublic = New ADODB.Connection
Set rsPublic = New ADODB.Recordset

iSql = "select * from trabajos"

ConnPublic.ConnectionString = Cadena
ConnPublic.Open Cadena

rsPublic.CursorLocation = adUseClient
rsPublic.CursorType = adOpenDynamic
rsPublic.LockType = adLockOptimistic
rsPublic.Open iSql, ConnPublic

With rsPublic
.AddNew
!IDtra = txtidtra
!trabajo = txttra
!precio = txtpretra
.Update
.Close
End With


Call IniciarConexion
rs.Open "select * from trabajos", cnn, adOpenStatic, adLockBatchOptimistic
'Call CARGARGRID(DataGrid1)
Adodc1.Refresh
Call Desconectar

[Avellaneda]

No entiendo muy bien ese código; Abres una conexión y un recordset, a éste último le añades los datos y lo cierras. Llamas al procedimiento 'iniciarConexion' (¿Qué hace este proc?) y a continuación vuelves a abrir el recordset (¿Para qué?) y refrescas un control Data llamado 'Adodc1'.

Si el control data está enlazado a la misma tabla que el recordset (trabajos), te sobra este último, puedes añadir directamente los datos al control data y al refrescar aparecerán en el datagrid.

[gym1702]

que tal, bueno lo que hace el porcedidiento "IniciarConexion" en abrir la base de datos mediante este codigo:
With cnn
.CursorLocation = adUseClient
.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\maris.mdb;Persist Security Info=False"
End With
esto lo hago para volver a tener acceso al la base de datos, y luego vuelvo a abrir el recordset para visualizar los datos en el datagrid medianta el procedimineto "CARGARGRID",
pero no funciona, el Adodc1.Refresh lo meti como "extra" para ver si podia pero ni asi visualiza las actualizaciones en el datagrid ¿qUE HAGO?