05. september 2004 - 01:54Der er
10 kommentarer og 1 løsning
Datoformat v. oprettelse af forespørgsel i VBA
Hej alle
Jeg prøver at oprette en forespørgsel i VBA, men får fejlen: "Der er en syntaksfejl fordi der mangler en operator.i forespørgselsudtrykket "Format([tblArrangement].[fldTidDato],'yyyy') as ArrYear"."
Hele koden ser således ud:
Set qdf = CurrentDb.CreateQueryDef("qryInstSearch_temp")
strQrySQL = "SELECT tblInstitution.fldInstitutionID, tblNiveauer.fldKlassetype, tblOpdateret.fldOpdateret, " & _ "Count(tblInstArr.fldInstArrID) as AntalArr, Format([tblArrangement].[fldTidDato], 'yyyy') as ArrYear, tblInstitution.fldType " & _ "FROM ((tblInstitution LEFT JOIN (tblArrangement RIGHT JOIN tblInstArr ON " & _ "tblArrangement.fldArrangementID = tblInstArr.fldArrid) ON tblInstitution.fldInstitutionID = " & _ "tblInstArr.fldInstid) LEFT JOIN tblNiveauer ON tblInstitution.fldInstitutionID = " & _ "tblNiveauer.fldInstitutionid) LEFT JOIN tblOpdateret ON tblInstitution.fldInstitutionID = " & _ "tblOpdateret.fldInstID " & _ "GROUP BY tblInstitution.fldInstitutionID, tblNiveauer.fldKlassetype, tblOpdateret.fldOpdateret, " & _ "Format([tblArrangement].[fldTidDato], 'yyyy') as ArrYear, tblInstitution.fldType"
I dette særtema om aspekter af AI ser vi på skiftet fra sprogmodeller til AI-agenter, og hvordan virksomheder kan navigere i spændet mellem teknologisk hastighed og behovet for menneskelig kontrol.
Længe siden....du skal huske at passe din sengetider ;o)
prøv denne:
Set qdf = CurrentDb.CreateQueryDef("qryInstSearch_temp")
Jeg går ud fra at sidste sætning er en fejl, da det er strQrySQL i stedet for strQuery. Derud over skal du ikke have "as ArrYear" med i Group By-delen.
Prøv denne:
strQrySQL = "SELECT tblInstitution.fldInstitutionID, tblNiveauer.fldKlassetype, tblOpdateret.fldOpdateret, " & _ "Count(tblInstArr.fldInstArrID) as AntalArr, Format([tblArrangement].[fldTidDato], 'yyyy') as ArrYear, tblInstitution.fldType " & _ "FROM ((tblInstitution LEFT JOIN (tblArrangement RIGHT JOIN tblInstArr ON " & _ "tblArrangement.fldArrangementID = tblInstArr.fldArrid) ON tblInstitution.fldInstitutionID = " & _ "tblInstArr.fldInstid) LEFT JOIN tblNiveauer ON tblInstitution.fldInstitutionID = " & _ "tblNiveauer.fldInstitutionid) LEFT JOIN tblOpdateret ON tblInstitution.fldInstitutionID = " & _ "tblOpdateret.fldInstID " & _ "GROUP BY tblInstitution.fldInstitutionID, tblNiveauer.fldKlassetype, tblOpdateret.fldOpdateret, " & _ "Format([tblArrangement].[fldTidDato], 'yyyy'), tblInstitution.fldType"
Længe siden....du skal huske at passe din sengetider ;o)
Jeg går ud fra at sidste sætning er en fejl, da det er strQrySQL i stedet for strQuery. Derud over skal du ikke have "as ArrYear" med i Group By-delen.
Prøv denne:
strQrySQL = "SELECT tblInstitution.fldInstitutionID, tblNiveauer.fldKlassetype, tblOpdateret.fldOpdateret, " & _ "Count(tblInstArr.fldInstArrID) as AntalArr, Format([tblArrangement].[fldTidDato], 'yyyy') as ArrYear, tblInstitution.fldType " & _ "FROM ((tblInstitution LEFT JOIN (tblArrangement RIGHT JOIN tblInstArr ON " & _ "tblArrangement.fldArrangementID = tblInstArr.fldArrid) ON tblInstitution.fldInstitutionID = " & _ "tblInstArr.fldInstid) LEFT JOIN tblNiveauer ON tblInstitution.fldInstitutionID = " & _ "tblNiveauer.fldInstitutionid) LEFT JOIN tblOpdateret ON tblInstitution.fldInstitutionID = " & _ "tblOpdateret.fldInstID " & _ "GROUP BY tblInstitution.fldInstitutionID, tblNiveauer.fldKlassetype, tblOpdateret.fldOpdateret, " & _ "Format([tblArrangement].[fldTidDato], 'yyyy'), tblInstitution.fldType"
Ja, har prøvet WHERE, men det gav fejl. Når der bruges Group By skal klausulteksten (tilsyneladende) være HAVING. Jeg lavede strengen ved at sætte qry'en op i Access' egen qry-designer og kopierede den derefter over i VBA. Hér angav Access HAVING og ikke WHERE.
Ja, det kan du have ret i. Problemet er blot, at feltet i qry'en er defineret som dato. Hvis jeg derfor blot skriver Me.txtYear kan den ikke evaluere qry'en fordi den opfatter inputtet som et tal. Løsningen burde følgelig være at formatere en dato.
Right on the money!! Tusind, tusind tak for hjælpen! - Jeg skulle blot også inkludere udtrykket i Group By så var den der! Jeg oprettet et nyt spørgsmål så der også er point for denne temmelig lange udredning.
Hilsen Nikolaj
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
