Avatar billede h_s Forsker
03. maj 2003 - 15:09 Der er 11 kommentarer og
1 løsning

Diferentieret rapport

Hejsa

Jeg har en rapport indeholdende data sorteret efter dato. Som tiden går vil jeg have data for mange år, og vil gerne have mulighed for at udskrive/se data år for år.
Det kunne løses via en forespørgsel, men databasen kommer til at ligge flere steder med forskelligt indhold. Og for ikke at skulle rundt og lave forespørgslen alle steder vil det værer rart, at det var lavet på forhånd.
Jeg forestiller mig følgende:
Klik på en knap. der vil åbne rapporten, men inden da er der kommet en popup op, der beder om at indtaste et årstal!
Kan det lade sig gøre?
Avatar billede henrik13 Nybegynder
03. maj 2003 - 15:19 #1
Lav en forespørgsel som tabel til rapporten. i felted år Skriv der:
Like [År]
Vh Henrik
Avatar billede henrik13 Nybegynder
03. maj 2003 - 15:21 #2
Du kan også sende databasen til mig, Så skal jeg lave det for dig:
oz1bua@wanadoo.dk
Vh Henrik
Avatar billede h_s Forsker
03. maj 2003 - 15:28 #3
henrik13> du får den nu... :-)
Avatar billede henrik13 Nybegynder
03. maj 2003 - 15:39 #4
Du skal også lave en knap i din formular til at starte rapporten.
Vh Henrik
Avatar billede h_s Forsker
03. maj 2003 - 15:46 #5
Jeg forstår ikke hvad du mener. Jeg har regnet med, at det skal laves som de kanpper der virker, bare at man får mulighed for at vælge årstal. Eller hvad mener du??
Avatar billede henrik13 Nybegynder
03. maj 2003 - 16:02 #6
Er sendt.
Avatar billede henrik13 Nybegynder
03. maj 2003 - 16:15 #7
Hvis der trykkes stjerne vises alle.
Vh Henrik
Avatar billede h_s Forsker
03. maj 2003 - 16:32 #8
Det ser udmiddelbart fint ud, men jeg har lidt svært ved at se hvad du har lavet. Kan du forklare mig koden:
-------------------------------------------------------------------------------
Private Sub Kommandoknap1_Click()
On Error GoTo Err_Kommandoknap1_Click

    Dim stDocName As String
    stDocName = "Oversigt over løbeturer"
    DoCmd.OpenReport stDocName, acPreview
Exit_Kommandoknap1_Click:
    Exit Sub
Err_Kommandoknap1_Click:
    MsgBox Err.Description
    Resume Exit_Kommandoknap1_Click
End Sub
-------------------------------------------------------------------------------
og
-------------------------------------------------------------------------------
Private Sub Kommandoknap2_Click()
On Error GoTo Err_Kommandoknap2_Click

    Dim stDocName As String
    stDocName = "Oversigt over løbeturer"
    DoCmd.OpenReport stDocName, acNormal
Exit_Kommandoknap2_Click:
    Exit Sub
Err_Kommandoknap2_Click:
    MsgBox Err.Description
    Resume Exit_Kommandoknap2_Click
End Sub
-------------------------------------------------------------------------------
... for du har lavet 3 forskellige versioner:
Totaloversigt - Virker fint
Månedsoversigt - Virker kun på den ene knap
Ugeoversigt - Virker på knappen "Ugeoversigt", men skulle åbne ny formular med 2 muligheder!!
Er det muligt at gøre sådan, at men er fri for at indtaste "*" foran årstal? Jeg kan godt leve med at man så ikke kan hente en Totaloversigt denne vej. Så laver jeg bare en knap til totaloversigten.
Vh "den anden" Henrik:-)
Avatar billede henrik13 Nybegynder
03. maj 2003 - 16:51 #9
Månedsoversigt - Virker kun på den ene knap
Den anden virker heller ikke på det jeg fik tilsendt.
Jeg har lige gemt den originale jeg fik fra dig.
Vh Henrik
Avatar billede henrik13 Nybegynder
03. maj 2003 - 16:56 #10
h s    Månedsoversigt - Virker kun på den ene knap.
Knappener jo aldrig lavet færdig, for der er ikke nogen hændelse for:  ved klik
Vh Henrik
Avatar billede h_s Forsker
03. maj 2003 - 17:29 #11
Her nu fået det til at virke :-) - I næste version tror jeg jeg vil have en mere forklarende tekst til popuppen :-)
Avatar billede henrik13 Nybegynder
03. maj 2003 - 17:33 #12
Se der noget af det jeg har lavet, du vil havde ydeligere uddybet så bare spør.
Tak for poient.
Vh Henrik
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester