Chi sà usare gli eventi recordset ?

CIUFFO · 03-01-2003, 18:06

Come si fà ad usare i metodi: WillChangeRecordset e RecordsetChangeComplete (RecordsetEvent)

tas · 04-01-2003, 12:56

Il seguente codice lo puoi usare solo in un form o in una classe, nel blocco delle dichiarazioni generali:

Codice:

Private WithEvents rs As ADODB.Recordset

La parola chiave WithEvents ti permette di accedere agli eventi dell'oggetto dichiarato, troverai quindi gli eventi:

Codice:

Private Sub rs_WillChangeRecordset(ByVal adReason As ADODB.EventReasonEnum, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
...
Private Sub rs_RecordsetChangeComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset)
...

e tanti altri eventi!

CIUFFO · 05-01-2003, 23:55

Come dichiaro "rs"?
Puoi illustrarmi meglio il tuo codice?

tas · 06-01-2003, 08:05

Guarda l'allegato

CIUFFO · 06-01-2003, 13:25

Quale allegato?Questa è un'immagine della prima riga di codice che mi hai già scritto!

tas · 06-01-2003, 18:26

Quote:

Originally posted by "CIUFFO"

Come dichiaro "rs"?
Puoi illustrarmi meglio il tuo codice?

Non so cosa ti possa dire oltre a quello che ti ho già scritto, se vuoi usare gli eventi del recordset devi dichiarare una variabile di tipo Recordset utilizzando la parola chiave WithEvents. Appena scrivi questa dichiarazione, nella prima casella a sinistra dell'editor di codice appare un nuovo oggetto, rs, che ha associati una serie di eventi (vedi immagine).

Se invece il tuo problema è utilizzare quegli eventi che hai citato, allora è un altro discorso... fammi sapere!

CIUFFO · 06-01-2003, 21:47

Mi sà che non và bene per il mio db.
Il mio db non è un progetto OLEDB, ma un semplice db locale.
Volevo solo trovare il modo di poter usare un evento recordset per operare su una tabella da VB senza necessariamente utilizzare gli eventi di una maschera.
Grazie

tas · 07-01-2003, 09:03

Se usi gli eventi WillChangeRecordset e compagnia bella vuol dire che accedi al database con la tecnologia ADO (ActiveX Data Objects).
Se preferisci si poteva scrivere:

Codice:

Private WithEvents rs As Recordset

Il prefisso ADODB (e non OLEDB...) che avevo utilizzato negli esempi precedenti è facoltativo, serve solo per riferirsi con più precisione a quella particolare libreria.
Se vuoi ti mando un progettino di esempio, ciao

CIUFFO · 07-01-2003, 18:29

Ho provato ad inserire la tua riga nelle dichiarazioni di un form, mi dice: L'oggetto non può essere l'origine di eventi di automazione.
Mandami un esempio per favore.
grazie.

tas · 08-01-2003, 17:43

Eccoti un esempio in VB6, ciao

03-01-2003, 18:06	#1
CIUFFO Member Iscritto dal: Feb 2001 Città: Reggio Emilia Messaggi: 230	Chi sà usare gli eventi recordset ? Come si fà ad usare i metodi: WillChangeRecordset e RecordsetChangeComplete (RecordsetEvent)

04-01-2003, 12:56	#2
tas Senior Member Iscritto dal: Feb 2001 Città: Nordest Messaggi: 217	Il seguente codice lo puoi usare solo in un form o in una classe, nel blocco delle dichiarazioni generali: Codice: Private WithEvents rs As ADODB.Recordset La parola chiave WithEvents ti permette di accedere agli eventi dell'oggetto dichiarato, troverai quindi gli eventi: Codice: Private Sub rs_WillChangeRecordset(ByVal adReason As ADODB.EventReasonEnum, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset) ... Private Sub rs_RecordsetChangeComplete(ByVal adReason As ADODB.EventReasonEnum, ByVal pError As ADODB.Error, adStatus As ADODB.EventStatusEnum, ByVal pRecordset As ADODB.Recordset) ... e tanti altri eventi! __________________ Chi non cerca trova.

06-01-2003, 08:05	#4
tas Senior Member Iscritto dal: Feb 2001 Città: Nordest Messaggi: 217	Guarda l'allegato __________________ Chi non cerca trova.

07-01-2003, 09:03	#8
tas Senior Member Iscritto dal: Feb 2001 Città: Nordest Messaggi: 217	Se usi gli eventi WillChangeRecordset e compagnia bella vuol dire che accedi al database con la tecnologia ADO (ActiveX Data Objects). Se preferisci si poteva scrivere: Codice: Private WithEvents rs As Recordset Il prefisso ADODB (e non OLEDB...) che avevo utilizzato negli esempi precedenti è facoltativo, serve solo per riferirsi con più precisione a quella particolare libreria. Se vuoi ti mando un progettino di esempio, ciao __________________ Chi non cerca trova.

08-01-2003, 17:43	#10
tas Senior Member Iscritto dal: Feb 2001 Città: Nordest Messaggi: 217	Eccoti un esempio in VB6, ciao __________________ Chi non cerca trova.

05-01-2003, 23:55	#3
CIUFFO Member Iscritto dal: Feb 2001 Città: Reggio Emilia Messaggi: 230	Come dichiaro "rs"? Puoi illustrarmi meglio il tuo codice?

06-01-2003, 13:25	#5
CIUFFO Member Iscritto dal: Feb 2001 Città: Reggio Emilia Messaggi: 230	Quale allegato?Questa è un'immagine della prima riga di codice che mi hai già scritto!

06-01-2003, 21:47	#7
CIUFFO Member Iscritto dal: Feb 2001 Città: Reggio Emilia Messaggi: 230	Mi sà che non và bene per il mio db. Il mio db non è un progetto OLEDB, ma un semplice db locale. Volevo solo trovare il modo di poter usare un evento recordset per operare su una tabella da VB senza necessariamente utilizzare gli eventi di una maschera. Grazie

07-01-2003, 18:29	#9
CIUFFO Member Iscritto dal: Feb 2001 Città: Reggio Emilia Messaggi: 230	Ho provato ad inserire la tua riga nelle dichiarazioni di un form, mi dice: L'oggetto non può essere l'origine di eventi di automazione. Mandami un esempio per favore. grazie.

Strumenti
Mostra una versione stampabile Invia questa pagina per email