[VB6] Aggiornamento dei dati di un DataGrid modificati da Form esterno

[gianni5]

ho messo un data grid in un form...quando inserisco i dati in un secondo form...tornando in quello col data grid i dati al suo interno nn sono aggiornati...ma si aggiornano solo se stoppo visual e lo riavvia...
ho provato a mettere nel form load un nomeado.refresh ma il risultato è lo stesso...non mi aggiorna il data grid(se non stoppando l'applicazione)..
mi sapete dire qualcosa a proposito?

[gianni5]

ce nessuno ke mi puo aiutare??
please!!!
grazie a tutti cmq!!

[gianni5]

amiciiiii...ufff nessuno puo aiutarmi con questo proolblemino??

[oregon]

Mostra un po' di codice dei due form ... in particolare, la connessione come e' fatta? Ne usi una sola?

[gianni5]

ke codice devo mostrare???
nn lo so...
metto il tutto il codice del form in cui vado per inserire i dati qui di seguito.

Dim lastpos As Integer
Private Sub cmdauto_Click() "cambia form"
Me.Hide
Operazioniauto.Show
End Sub
Private Sub cmdcanc_Click()"cancella record"
Adoacq.Recordset.Delete
If Not Adoacq.Recordset.BOF Then Adoacq.Recordset.MovePrevious
If Adoacq.Recordset.BOF Then Adoacq.Recordset.MoveNext
End Sub
Private Sub cmdend_Click()
End
End Sub
Private Sub cmdhome_Click()"cambia form"
Me.Hide
HomePage.Show
End Sub
Private Sub cmdins_Click()"inserisce dati e cambia form"
Adoacq.Refresh
Adoacq.Recordset.AddNew
lastpos = Adoacq.Recordset.RecordCount
Me.Hide
With Operazioniauto
.cmdprimo.Visible = False
.cmdprec.Visible = False
.cmdsucc.Visible = False
.cmdult.Visible = False
.cmdcerca.Visible = False
.Show
End With
End Sub
Private Sub cmdop_Click(Index As Integer)"cambia form"
Me.Hide
Operazioniauto.Show
End Sub
Private Sub cmdmod_Click()"operazione di modifica"
Adoacq.Recordset.Update
End Sub
Private Sub cmdprec_Click()"record precedente"
If Not Adoacq.Recordset.AbsolutePosition = 1 Then Adoacq.Recordset.MovePrevious
End Sub
Private Sub cmdprimo_Click()"primo record"
Adoacq.Recordset.MoveFirst
End Sub
Private Sub cmdsucc_Click()"record successivo"
If Not Adoacq.Recordset.AbsolutePosition = lastpos Then Adoacq.Recordset.MoveNext
End Sub
Private Sub cmdult_Click()"va all'ultimo record"
Adoacq.Recordset.MoveLast
End Sub
Private Sub Form_Load()
If Not Adoacq.Recordset.EOF Then Adoacq.Recordset.MoveLast
lastpos = Adoacq.Recordset.RecordCount
Adoacq.Recordset.MoveFirst
End Sub

praticamente in questo form viene letto cio che ce nel database tramite l'oggetto ado...
quando poi torno nel form in cui ce la data grid(inserita tramite progetto->componenti)...
il problema e che non so come fare per far si che il data grid si aggiorni senza stoppare l'esecuzione del programma...
aiuto!!!
preciso che il datagrid e collegato all'ado che ha nome diverso rispetto a quello nel form in cui inserisco i dati!

[Bingop]

Secondo me ci sono modi più eleganti per fare il tutto. Ma ognuno di noi ha i suoi metodi.

Detto questo credo che tu debba prima "rinfrescare" adodb.refresh() i dati nell'oggetto ADO"
fatto questo devi "rinfrescare" anche i dati nel datagrid.refresh().

L'oggetto Ado da rinfrescare non è quello che hai inserito nella form per fare l'input dei dati ma quello che utilizzi per visualizzare i dati nella seconda form.

Prova così se no devi postare anche il codice della form che contiene i dati da visualizzare

:rollo:

[gianni5]

il refresh dell'ado e del data grid dove li metto ???
nel form load???
o metto il refresh dell'ado aprendo con doppio clik sull'ado e il refresh del data grid aprendo il codice con doppio clik sul data grid?

[gianni5]

bingop!!!
aspetto tue notizie!!!