vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 Brandneu! sevEingabe v3.0 - Das Eingabecontrol der Superlative!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Fortgeschrittene Programmierung
Re: VB6 + Access95-Bericht 
Autor: michi-bib
Datum: 18.11.02 17:58
Hallo erstmal, 

Dim appAccess As Access.Application
 
Private Sub mnuBerichtGesAnz_Click()
    Set appAccess = New Access.Application
    appAccess.OpenCurrentDatabase gstrDBFile
 
    'Hier werden im Designmode noch einige Überschriften belegt
    Call appAccess.DoCmd.OpenReport("berGes", acViewDesign)
    appAccess.Reports.Item("berGes").Controls.Item("lblUeberschrift").Caption = _
      createUeberschrift(True, False, False, 0)
    appAccess.Reports.Item("berGes").Controls.Item("lblProjekt").Caption = _
    createProjekt
    appAccess.Reports.Item("berGes").Controls.Item("lblAuftraggeber").Caption = _
    createAuftraggeber
    appAccess.Reports.Item("berGes").Controls.Item("lblAP1").Caption = createAP( _
    1)
    appAccess.Reports.Item("berGes").Controls.Item("lblAP2").Caption = createAP( _
    2)
    'hier in PreviewMode schalten und anzeigen
    Call appAccess.DoCmd.OpenReport("berGes", acViewPreview)
    appAccess.DoCmd.Maximize
    appAccess.Visible = True
 
    Set appAccess = Nothing
End Sub
gstrDMFile ist der Pfad zur mdb-Datei und berGes der Name des Berichts.

Ich arbeite allerdings mit Access 2000 und es muß unter Projekt-->Verweise die
Microsoft Access 9 Object Library mit eingebunden sein. Bei dir wird das dann
wohl Version 7 dieser Library sein. Ansonsten gehe ich mal davon aus, dass das
Ganze unter Access 95 ähnlich läuft wie unter Access 2000.

Gru? Michi aus Hannover

1 + 1 = 3 f?r hinreichend gro?e 1

alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
VB6 + Access95-Bericht88LooniToon18.11.02 17:31
Re: VB6 + Access95-Bericht317michi-bib18.11.02 17:58

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel