Avatar billede michaeltryl Seniormester
03. juli 2007 - 17:37 Der er 7 kommentarer og
1 løsning

problem med forspørgsel i acces

Jeg har lavet et faktura system i access, men har fået et problem.
Jeg har en forsåørgsel (Faktura Udskriv-HEN) som henter alle fakturaer som ikke er udskrevet.
denne forspørgsel laver jeg en rapport efter, og her er problemet at rapport på side 2 altid er blank. er der en som har et bud på hvad fejlen kan være.
Min fil kan hentes her.
http://www.magiske-michael.dk/faktura.zip

Det skal siges jeg ikke ved så meget om access, så har siddet og kopieret noget fra et system jeg fandt på nettet, for at forsimple det.
Avatar billede kabbak Professor
03. juli 2007 - 18:53 #1
din rapport er for bred,
lav den smallere, ned til 26,5.
Avatar billede michaeltryl Seniormester
03. juli 2007 - 19:17 #2
mange tak det virkede. kom med et svar så får du point
Avatar billede michaeltryl Seniormester
03. juli 2007 - 19:24 #3
har lige et under spørgsmål hvis du vil svare på det også. Jeg vil godt hæve points.
Har du et bud på hvordan jeg kan gøre sådan at jeg laver en knap i min forspørgsel som kun udskriver den faktura jeg står i
Avatar billede michaeltryl Seniormester
03. juli 2007 - 19:25 #4
jeg skrev forspørgsel, men mente formular
Avatar billede kabbak Professor
03. juli 2007 - 19:43 #5
her er koden til knappen, den viser rapporten, du skal så printe den derfra

Private Sub Kommandoknap53_Click()
On Error GoTo Err_Kommandoknap53_Click

    Dim stDocName As String

    stDocName = "Faktura-HEN"
    DoCmd.OpenReport stDocName, acPreview, , "FakturaID =" & Me.FakturaID ' viser kun

' DoCmd.OpenReport stDocName, acNormal, , "FakturaID =" & Me.FakturaID ' udskriver direkte

Exit_Kommandoknap53_Click:
    Exit Sub

Err_Kommandoknap53_Click:
    MsgBox Err.Description
    Resume Exit_Kommandoknap52_Click
End Sub
Avatar billede kabbak Professor
03. juli 2007 - 19:46 #6
jeg fik ikke lige rettet det sidste 52, det er kopieret fra den anden knap.

Private Sub Kommandoknap53_Click()
On Error GoTo Err_Kommandoknap53_Click

    Dim stDocName As String

    stDocName = "Faktura-HEN"
    DoCmd.OpenReport stDocName, acPreview, , "FakturaID =" & Me.FakturaID ' viser kun

' DoCmd.OpenReport stDocName, acNormal, , "FakturaID =" & Me.FakturaID ' udskriver direkte

Exit_Kommandoknap53_Click:
    Exit Sub

Err_Kommandoknap53_Click:
    MsgBox Err.Description
    Resume Exit_Kommandoknap53_Click
End Sub
Avatar billede michaeltryl Seniormester
03. juli 2007 - 20:03 #7
mange tak for hjælpen du har fået points
Avatar billede kabbak Professor
03. juli 2007 - 20:04 #8
tak
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
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

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