[VB6]strana query?ma in Access va!!

[alexinside83]

ciao a tutti...
questa è la mia query, generata in Access (e funzionante) ma che in VB mi da problemi, o meglio non mi dice proprio nulla, ovvero non pesca niente nel DV...

strSelect = "SELECT Punteggi.*, progetti.ValoreRichiesto, 
Associazioni.Denominazione
FROM (Associazioni INNER JOIN progetti ON 
Associazioni.IdAssociazioni = progetti.IdAssociazioni) INNER JOIN 
Punteggi ON Associazioni.IdAssociazioni = Punteggi.IdAssociazioni 
WHERE punteggi.idAssociazioni >= " & primo & " Order by idAssociazioni"

 Set rsServer = ConnAccess.Execute(strSelect)
    
       
           while Not rsServer.EOF 
           Label19(count).Caption = rsServer("Denominazione")
           Text2(count).Text = rsServer("punti1")
           Text3(count).Text = rsServer("punti2")
           Text4(count).Text = rsServer("punti3")
           Text5(count).Text = rsServer("punti4")
           Text6(count).Text = rsServer("punti5")
           Text7(count).Text = rsServer("punti6")
           Text8(count).Text = rsServer("punti7")
           Text9(count).Text = rsServer("punti8")
           Text10(count).Text = rsServer("punti9")
           Text11(count).Text = rsServer("punti10")
           rsServer.MoveNext
           Loop

ma non va...non mi stampa niente a video...eppure se la faccio girare in access mi trova dei record....

grazie a tutti :metallica

[ladyBlu]

Ormai non sei più nuovo del forum, sai bene che esiste il forum apposito per il VisualBasic.
Ti sposto io per questa volta, ma vedi di fare attenzione in futuro.

[alexinside83]

cavolo...hai ragione, scusa e che sono un po nei casini e sono distratto..
sorry...
ale

[amodio]

quel parametro primo ti restituisce un valore che ritieni siavalido?

poi
hai controllato la connessione?
si connette ad un db che hai dati o ad una replica che hai nel pc?

[alexinside83]

si si, anche perche prima di fare una query cosi lunga ne ho fatta una piccola...per controllare anche la connessione e va...

[alexinside83]

please...

[alexinside83]

sono infognato...please....
aiutatemi

[GudFella]

Text2(count).Text = rsServer("punti1")
Text3(count).Text = rsServer("punti2")

count quanto vale?
lo incrementi?

[alexinside83]

si, si.
ma penso che sia proprio un problema legato alla query o al recordset...
anche perche come detto prima con una query semplice del tipo select * from tabella where.... funziona correttamente...

[alexinside83]

please...