[VB+ACCESS] Problema Select...

[ladyBlu]

Originariamente inviato da vonkranz
..dal momento che non ho voglia di leggere tutto il post...mi limito a dire...

prova a popolare il recset... con

mioRSPrev.movelast
mioRSPrev.movefirst


.....
debug.print
mioRSPrev.recordcount

..e vedi se i record ci sono tutti


....se avete gia' risolto........amen....

MA SEI UN GENIO!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
COSI' FUNZIONA... LI TROVA TUTTI QUANTI!!!!!!!!!!


GRAZIE VON...




DARK... COME SEMPRE SEI IL PRIMO A SOCCORRERMI... GRAZIE MILLE ANCHE A TE...

[dieric]

Devi fare un refresh prima di poter utilizzare tutto il database!!!

Dopo aver impostato la proprità recordsource devi scrivere:

mioRSPrev.refresh

dovrebbe bastare altrimenti prova a fare anche
mioRSPrev.movelast e poi
mioRSPrev.movefirst

[ladyBlu]

grazie dieric ho risolto.





ragazzi, ora ho un altro problema.
quando eseguo la insert mi genera errore:

"Errore di run-time '3061':
Parametri insufficienti. Previsto 5."

ma che è? :master:

[darkblOOd]

ma le ha fatto la move first....che c'entra?

fa la select che DEVE restituire tutti i campi e poi prima del cilo fa una moveFirst....

a me non è mai successo quello che dite....così mi è sempre funzionato tutto....

posso capire che Recount è 1 perchè lo controlla prima della moveFirst, ma il ciclo DEVE funzionare....

[vonkranz]

Originariamente inviato da darkblOOd
ma le ha fatto la move first....che c'entra?

fa la select che DEVE restituire tutti i campi e poi prima del cilo fa una moveFirst....

a me non è mai successo quello che dite....così mi è sempre funzionato tutto....

....e' il motore Jet che fa casino quando ci sono un certo num. di rec. (il contatore si impalla)

Basta farlo andare al fondo del RecSet e poi tornare all'inizio...cosi' si legge tutti i rec. compreso il loro numero...

[ladyBlu]

Originariamente inviato da darkblOOd
ma le ha fatto la move first....che c'entra?

fa la select che DEVE restituire tutti i campi e poi prima del cilo fa una moveFirst....

a me non è mai successo quello che dite....così mi è sempre funzionato tutto....

posso capire che Recount è 1 perchè lo controlla prima della moveFirst, ma il ciclo DEVE funzionare....

infatti il problema stava proprio nel fatto che facevo il recordcount prima di fare .MoveLast e .MoveFirst.

aspe, dark... ora abbiamo risolto la prima parte...


quando entro nel ciclo di DO, eseguo una insert per ogni record che trovo... in teoria la mia insert dovrebbe funzionare, e invece mi da errore proprio sull'esecuzione dell'insert.

[darkblOOd]

Originariamente inviato da vonkranz

....e' il motore Jet che fa casino quando ci sono un certo num. di rec. (il contatore si impalla)

Basta farlo andare al fondo del RecSet e poi tornare all'inizio...cosi' si legge tutti i rec. compreso il loro numero...

okkapito...forse perchè non ho mai usato il jet e Access seriamente non mi è mai capitato?

[darkblOOd]

Originariamente inviato da ladyBlu
quando entro nel ciclo di DO, eseguo una insert per ogni record che trovo... in teoria la mia insert dovrebbe funzionare, e invece mi da errore proprio sull'esecuzione dell'insert.

quando ti da errore?

metti un break point all'inizio del ciclo e vai afanti con F8 e vedi se lo fa alla prima insert oppure no...

[vonkranz]

Originariamente inviato da ladyBlu
grazie dieric ho risolto.





ragazzi, ora ho un altro problema.
quando eseguo la insert mi genera errore:

"Errore di run-time '3061':
Parametri insufficienti. Previsto 5."

ma che è? :master:

...che OO.......

...probabilmente hai specificato 5 campi da inserire e hai specificato 4 valori...o viceversa...

[ladyBlu]

Originariamente inviato da darkblOOd


quando ti da errore?

metti un break point all'inizio del ciclo e vai afanti con F8 e vedi se lo fa alla prima insert oppure no...

si, mi genera errore subito sulla prima insert... mi da questo errore:

"Errore di run-time '3061':
Parametri insufficienti. Previsto 5."

e l'istruzione è:

miaSQLInsert = "INSERT INTO TBPreventivi
(IDReparto,Anno,Completato,Disponibilità,Descrizione) " & _
"values " & _
"(mioRSPrev!IDReparto, " & _
"(cint(mioRSPrev!Anno)+1), " & _
"mioRSPrev!Completato," & _
"dateadd('yyyy',1,mioRSPrev!Disponibilità), " & _
"mioRSPrev!Descrizione)"

dove:
Anno = anno che trovo sul db + 1 (se trovo 2002, devo scrivere 2003)
Disponibilità = è una data in cifre. e devo incrementarla di 1 anno.