Visualizzazione dei risultati da 1 a 4 su 4
  1. #1

    Estrapolare dati tra due tabelle

    Ragazzi, ho un problema con la selezione dati da 2 tabelle - vola e prodotti

    il codice sotto funziona perfettamente se tolgo la riga:

    if datav<>"" then sql = sql & " AND vola.[scadenza]> '" & datav & "' "

    questa riga è quella che in teoria dovrebbe permettermi di selezionare i dati anche dal punto di vista della scadenza...cioè quelli scaduti di non estrapolarli

    grzie a tutti pe aiuto e suggermenti


    questo il codice:

    <%
    dim datav
    datav= Date()
    %>


    sql = "SELECT vola.[gruppo], vola.[id_scategoria], vola.[id_categoria], vola.[vol], vola.[nr], vola.[scadenza], vola.[descrizione],"&_
    " prodotti.[provincia] "&_
    "FROM vola left join prodotti "&_
    "on vola.id_scategoria=prodotti.id_scat and vola.id_categoria=prodotti.id_cat and vola.vol=prodotti.vol "&_
    "where prodotti.[provincia] <>'' "
    if gruppo<>"" then sql = sql & " AND vola.[gruppo]='" & gruppo & "' "
    if provincia<>"" then sql = sql & " AND provincia= '" & provincia & "' "
    if datav<>"" then sql = sql & " AND vola.[scadenza]> '" & datav & "' "
    sql = sql & "group by vola.[gruppo], vola.[id_scategoria], vola.[id_categoria],vola.[vol], vola.[nr], vola.[scadenza], vola.[descrizione], prodotti.[provincia]"&_
    " ORDER BY vola.[scadenza] ASC;"

  2. #2
    Moderatore di ASP e MS Server L'avatar di Roby_72
    Registrato dal
    Aug 2001
    Messaggi
    19,561
    Fatti stampare la query... così controlli cosa cerca di eseguire.

    roby

  3. #3
    Grazie Roby per la risposta, l'errore che mi da è questo

    Microsoft OLE DB Provider for ODBC Drivers error '80040e07'
    [Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.
    provincia.asp, line 300

    e la linea 300 è questo (subito sotto quello di sopra)

    Set RS = Conn.Execute(SQL)

  4. #4
    Con la data ho risolto cosi, credo che sia giusta, anche perchè quella che stampa nell' errore è uguale a quella del database Access

    <%
    dim data
    data=FormatDateTime(Now(),vbGeneralDate)
    Response.Write(data)
    %>

    Questo è il codice

    sql = "SELECT vola.[gruppo], vola.[id_scategoria], vola.[id_categoria], vola.[vol], vola.[nr], vola.[scadenza], vola.[descrizione],"&_
    " prodotti.[provincia] "&_
    "FROM vola left join prodotti "&_
    "on vola.id_scategoria=prodotti.id_scat and vola.id_categoria=prodotti.id_cat and vola.vol=prodotti.vol "&_
    "where prodotti.[provincia] <> AND vola.[scadenza] > '" & data & "'"
    if gruppo<>"" then sql = sql & " AND vola.[gruppo]='" & gruppo & "' "
    if provincia<>"" then sql = sql & " AND provincia= '" & provincia & "' "
    sql = sql & "group by vola.[gruppo], vola.[id_scategoria], vola.[id_categoria],vola.[vol], vola.[nr], vola.[scadenza], vola.[descrizione], prodotti.[provincia]"&_
    " ORDER BY vola.[scadenza] ASC;"

    Set RS = Conn.Execute(SQL)



    purtroppo mi da questo errore:

    Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
    [Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'prodotti.[provincia] <> AND vola.[scadenza] > '27/11/2012 11.36.46' AND vola.[gruppo]='vola' AND provincia= 'Agrigento''.

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2021 vBulletin Solutions, Inc. All rights reserved.