PDA

View Full Version : [VB6] Conteggio record


OrcaAssassina
24-04-2006, 17:55
Come si fa la sintassi COUNT per contare i record di una tabella

Set rsRecordSet = New ADODB.Recordset
rsRecordSet.Open "SELECT * From [Esercizi]", CnConnessioni, adOpenStatic, adLockOptimistic

Come va modificata????


Poi il risultato va visualizzato in esercizi.text

Mi date la sintassi????


Ciao e grazieeeeeee

Nightmare
25-04-2006, 13:25
presupponendo che la connessione gia cel'hai e che sia gia aperta io faccio cosi

dim myrs as new adodb.recordset
dim NumRec as integer

set myrs = myconn.execute("SELECT count(*) from Tabella")

if not myrs.EOF then
NumRec=myrs(0)
end if


oppure

dim myrs as new adodb.recordset
dim NumRec as integer

set myrs = myconn.execute("SELECT * from Tabella")
myrs.movelast
NumRec=myrs.recordcount
myrs.movefirst




potrei aver scritto qualche stupidagine, è un po che non uso le ado di vb6 e non cel'ho installato per provare qualche che ti ho scritto, in particolare non son sicuro del myrs.recordcount ma son sicuro esista qualcosa che ti dice la posizione del cursore.

ciao

OrcaAssassina
25-04-2006, 15:10
Ok grazie