+ Rispondi al messaggio
Pagina 1 di 2 12 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 12

Errore query di ricerca (Operatore Mancante)

  1. #1
    Cis
    Cis non  in linea Scribacchino
    Volevo chiedere agli esperti del forum in che modo posso fare
    ad effettuare una ricerca che comprenda il campo specialita (text1) ed il giorno, mese, anno, di un controllo MonthView1.
    Con il codice che vi riporto mi d Errore di Sintassi Operatore Mancante

    Private Sub Text1_Change()
        
    Adodc1.RecordSource = "Select * From pren1 Where Specialita LIKE '" & Text1 & "%' giorno=" & Day(DateClicked) & " and mese=" & Month(DateClicked) & " order by nome """
    Adodc1.Refresh
    
    End Sub
    
    Private Sub MonthView1_DateClick(ByVal DateClicked As Date)
       
    Adodc1.CommandType = adCmdText
    Adodc1.RecordSource = "select* from Pren1 where giorno=" & Day(DateClicked) & " and mese=" & Month(DateClicked) & ""
       Adodc1.Refresh
       Set DataGrid1.DataSource = Adodc1
    End Sub
    
    
    Private Sub MonthView1_GetDayBold(ByVal StartDate As Date, ByVal Count As Integer, State() As Boolean)
    Dim dno As Integer
       con.ConnectionString = "provider=microsoft.jet.oledb.4.0; data source=" & App.Path &    "\Prenotazioni.mdb" & ""
      con.Open
      rs.Open "select * from pren1", con, adOpenDynamic, adLockPessimistic
      Do Until rs.EOF
       anno = Year(StartDate)
       mese = Month(StartDate)
    If mese = 12 And rs(2) = 1 Then
        anno = anno + 1
       dno = DateDiff("d", StartDate, rs(2) & "/" & rs(1) & "/" & anno)
    Else
       dno = DateDiff("d", StartDate, rs(2) & "/" & rs(1) & "/" & anno)
    End If
        If dno < Count And dno > 0 Then
    State(dno) = True
       End If
    rs.MoveNext
       Loop
    rs.Close
    con.Close
    End Sub
    

    In effetti se voglio ricercare solo il campo specialita non mi d errore, per se voglio filtrare anche il giorno,mese,anno nel controllo MonthView mi d errore di sintassi.

    Mi sapreste dire cortesemente dove commetto l'errore nella query di ricerca e come posso
    risolvere?

    Grazie anticipatamente.

  2. #2
    raptorhugo non  in linea Scolaretto
    Adodc1.RecordSource = "Select * From pren1 Where Specialita LIKE '" & Text1.text & "*' and giorno=" & Day(DateClicked) & " and mese=" & Month(DateClicked) & " order by nome """


    se metti ' significa che si tratta di testo...
    Ultima modifica di raptorhugo; 18-08-2008 16:27 

  3. #3
    Cis
    Cis non  in linea Scribacchino
    Ciao RAPTORHUGO, grazie della risposta, in effetti la query di ricerca sbagliata quella evidenziata in rosso.
    Io vorrei fare in modo che una volta selezionato la data nel controllo MonthView, scrivendo nella text1 la specialita mi selezioni solo quella specialit per quel dato giorno.

    Grazie.

  4. #4
    L'avatar di TheTruster
    TheTruster non  in linea Moderatore Globale Ultimo blog: Mouse Wheel in Visual Basic 6 - ActiveX
    L'errore indicativo. Se dice "Operatore mancante" evidente che manca un operatore logico tra le condizioni della query:

    Private Sub Text1_Change()
        
    Adodc1.RecordSource = "Select * From pren1 Where Specialita LIKE '" & Text1 & "%' AND giorno=" & Day(DateClicked) & " and mese=" & Month(DateClicked) & " order by nome"
    Adodc1.Refresh
    
    End Sub
    
    Gli errori non sono rilasciati per dar fastidio, ma per essere interpretati...

    TheTruster
    ℹ️ Leggi di pi su TheTruster ...

  5. #5
    raptorhugo non  in linea Scolaretto
    prova a vedere il post corretto se ti va bene

    l'operatore and manca e lo ho evidenziato in rosso

  6. #6
    Cis
    Cis non  in linea Scribacchino
    THETRUSTER grazie anche a te dell'aiuto, ho provato come diceva RAPTORHUGO e mi dava ancora errore di sintassi.
    Con la correzione fornitami gentilmente da THETRUSTER mi da errore di Nessun valore specificato per alcuni parametri necessari

    Sperando che si possa risolvere vi ringrazio.

  7. #7
    raptorhugo non  in linea Scolaretto
    puoi provare a troncare la query e vedere quale di quei parametri ti da errore

  8. #8
    L'avatar di TheTruster
    TheTruster non  in linea Moderatore Globale Ultimo blog: Mouse Wheel in Visual Basic 6 - ActiveX
    Hai, quasi sicuramente, scritto male il nome di un campo o hai specificato il nome di un campo che non esiste nella tabella.

    TheTruster
    ℹ️ Leggi di pi su TheTruster ...

  9. #9
    Cis
    Cis non  in linea Scribacchino
    THETRUSTER ho corretto come tu dicevi il nome del campo, per adesso anche se non mi d errore non mi seleziona i record seguendo i criteri di ricerca indicati nella query e quindi non mi d nessun record nel datagrid.

  10. #10
    L'avatar di TheTruster
    TheTruster non  in linea Moderatore Globale Ultimo blog: Mouse Wheel in Visual Basic 6 - ActiveX
    Le date, con Access, vanno passate con il formato #mm/dd/yyyy#

    TheTruster
    ℹ️ Leggi di pi su TheTruster ...

+ Rispondi al messaggio
Pagina 1 di 2 12 ultimoultimo

Potrebbero interessarti anche ...

  1. Risposte: 2
    Ultimo Post: 03-10-2017, 23:19
  2. Risposte: 2
    Ultimo Post: 05-07-2016, 12:34
  3. Risposte: 8
    Ultimo Post: 16-03-2014, 17:50
  4. [access] selezione multipla: errore operatore mancante
    Da Svartisya nel forum Microsoft Access
    Risposte: 9
    Ultimo Post: 03-03-2009, 19:30
  5. Errore di sintassi (operatore mancante)
    Da sonny nel forum ASP 3, ASP .Net
    Risposte: 4
    Ultimo Post: 02-01-2006, 17:39