[vb for access2000]: filtro recorset

[lupoezechiele]

ciauz
chi mi da una spinta??

 
Private Sub Comando3_Click()
Set dbs = CurrentDb
    Set rst1 = dbs.OpenRecordset("calendariodisponibilita")

io apro il recordset con istruzione semplice semplice perchè non ci capisco un tubo! calendariodisponibilita è una query

mi piacerebbe aprire il recordset filtrato in base al valore presente in un campo di testo su Miamaschera.

ho provato direttamente da query ma appena metto il filtro mi da " errore aspettato valore 1" ???

come posso usare rst1.filter o qualcosa di simile ma motlo semplice sul codice vb??

[Pinco Pallino 2]

L'ideale sarebbe ke usassi ADO per connetterti e poi fai una SELECT:

tuoRecordset.Source="SELECT * FROM tuaTabella WHERE tuoCampo='" & tuoCampodiTesto.text & "'"
tuoRecordset.ActiveConnection= tuaConnessione
tuoRecordset.open

Il metodo che hai usato tu non lo conosco.....credo che però se mettessi:

Set rst1 = dbs.OpenRecordset("SELECT * FROM calendarioDisponibilita WHERE tuoCampo='" & tuoCampodiTesto.text & "'")

Magari funziona.

ps:tuoCampoDiTesto è una textbox

Se ci dai + info è meglio...
come ti connetti al DB?
Com'è fatta la struttura?(tabelle, campi, ecc)
CIAO!

[lupoezechiele]

ribadisco che non ci capisco un tubo
cerco di cavarmela con codice più semplice possibile!

la connessione non l'ho impostata , non credo mi serva

con queste 2 semplici righe
Set dbs = CurrentDb
Set rst1 = dbs.OpenRecordset("calendariodisponibilita")

riesco ad andae a leggere i record della mia query "calendariodisponibilità" composta da 2 campi: daily e SommadiQuantita

il campo di testo che dovrbbe contenere filtro è una textbox dove va inserita la data.

il secondo metodo che mi hai seggerito mi da lo stesso errore che ottengo impostando il filtro direttamente sulla query.

Mentre per la connessione Ado ho paura di arenarmi in parametri troppo complicati

[Pinco Pallino 2]

AAAAAH! Ma tu hai fatto una maskera in ACCESS non è un interfaccia creata con Visual basic...
Non so usare le maskere purtroppo...cmq il codice sql che ti ho dato è giusto...

[lupoezechiele]

SI LO HO PROVATO ED E' GIUSTO...
... INFATTI MI DA LO STESSO ERRORE DEL FILTRO SULLA QUERY CHE E' PER FORZA GIUSTO!!!!

PERO' IL PROBLEMA RIMANE FILTRANDO IN QUESTO MODO ACCESS NON LAVORA

[Jupy64]

Ciao, posta la query che usi..

[lupoezechiele]

Ciao Jupy
non mi picchiare
ma cosa intendi per posta la query?

la query "calendariodisponibilita" è formata da 2 campi
uno "daily" formato data e l'altro SommadiQuantita , formato numerico
daily è raggruppato mentre SommadiQuantita riporta la somma di tutti i daily

semza filtro la query funziona perfettamente ma appena vado ad inserire il filtro :
Forms![visualizza]![arrivo]

se testo la query funziona
ma se richiamo il codice

Private Sub Comando3_Click()
Set dbs = CurrentDb
    Set rst1 = dbs.OpenRecordset("calendariodisponibilita")

rst1.MoveFirst
Me!giorno1 = rst1.Sommadiquantita
Me!data1 = rst1.daily

n = 2
Do Until n = 8
rst1.MoveNext
giornon = "giorno" & n
datan = "data" & n
Me.Controls(giornon) = rst1.Sommadiquantita
Me.Controls(datan) = rst1.daily
n = n + 1
Loop

End Sub

.. si pianta su dbs.OpenRecorset dicendo "parametri insufficenti previsto 1"

[Jupy64]

intendevo dire di scrivere qui la query che usi (il testo della query "calendariodisponibilita")
per collegarti, in modo da vedere se magari c'è qualcosa che non va..

[lupoezechiele]

tutto il codice esistente è quello postato,

la query è una query fatta con access

non è creata da codice

e tutti gli elementi li ho esposti VVoVe:



posso utilizzare un altro modo per creare la query tramite codice?

magari sql??

[Jupy64]

allora, se tu apri il tuo database con access, poi vai alla voce "query" dove è "calendariodisponibilita" se ci clicchi sopra con il tasto destro del mouse ti compare un menù..seleziona la voce "visualizza struttura" ti si apre una maschera dove ti va vedere, in formato grafico, i vari collegamenti per la query, ora nella barra di menù di access, in alto la prima a sinistra c'è un bottone che puoi aprire per selezionare varie scelte..tra le quali dovresti avere la voce "visualizzazione sql" cliccandoci sopra ti si apre una finestra nel quale c'è il codice della query..copia quello e mettilo qui..
spero di non averti incasinato troppo..