Office: Zwischen Datenbanken hin- und herwechseln (nur Runtime installiert) Virenmeldung

Helfe beim Thema Zwischen Datenbanken hin- und herwechseln (nur Runtime installiert) Virenmeldung in Microsoft Access Hilfe um das Problem gemeinsam zu lösen; Ich habe eine Masterdatenbank (ACCDB), die sämtliche Tabellen enthält. Es gibt nun mehrere ACCDRs deren Tabellen auf die ACCDB verknüpft sind. Die... Dieses Thema im Forum "Microsoft Access Hilfe" wurde erstellt von Helge Schneider, 27. Juli 2012.

  1. Zwischen Datenbanken hin- und herwechseln (nur Runtime installiert) Virenmeldung


    Ich habe eine Masterdatenbank (ACCDB), die sämtliche Tabellen enthält. Es gibt nun mehrere ACCDRs deren Tabellen auf die ACCDB verknüpft sind. Die Anwender besitzen lediglich die Runtime-Software (Es ist kein Office installiert!)

    Wie ist es nun möglich zwischen den Datenbanken hin- und herzuwechseln? Ich komme mit Shell und Application.Quit zur ACCDR, jedoch nur mit Followhyperlink wieder zurück, was mir jedoch eine lästige Virenmeldung beschert:

    "Einige Daten können Viren enthalten oder ihren Computer in anderer Weise beschädigen...."

    Hat jemand eine Idee, wie hier die optimale Lösung wäre?

    Es soll zur Zeit nur eine (!) Datenbank offen sein. Die Startdatenbank (ACCDB) ist die Startmaske von der aus man in jede Runtime (ACCDR) gelangt. Anschließend möchte man wieder zurück (ACCDR --> ACCDB).

    Nebenbei möchte ich generell die Virenmeldung unterdrücken.
     
    Helge Schneider, 27. Juli 2012
    #1
  2. miriki Erfahrener User
    Mir ist noch nicht ganz klar, wie Du das mit dem hin und her realisiert hast. Wodurch wird der Wechsel denn ausgelöst? Drückt der Anwender auf einen Button? Ist es abhängig von einem berechneten Ergebnis?

    Aber mal allgemein, weil's die vielleicht etwas elegantere Lösung ist, eine andere Datei zu öffnen:
    Code:
    Option Compare DatabasePrivate Const SE_ERR_NOASSOC As Long = 31&
    Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
        ByVal hWnd As Long, _
        ByVal Operation As String, _
        ByVal Filename As String, _
        Optional ByVal Parameters As String, _
        Optional ByVal Directory As String, _
        Optional ByVal WindowsStyle As Long = vbMaximizedFocus _
        ) As Long
        
    Public Function LaunchDocument( _
        ByRef Filename As String, _
        Optional ByVal ParentForm As Form, _
        Optional ByVal ShowOpenWithDialog As Boolean = False, _
        Optional ByVal WindowStyle As VBA.VbAppWinStyle = vbMaximizedFocus _
        ) As Boolean
        Dim lSuccess As Long
        Dim hWndParent As Long
        If Not ParentForm Is Nothing Then
            hWndParent = ParentForm.hWnd
        End If
        lSuccess = ShellExecute(hWndParent, "Open", Filename, vbNullString, vbNullString, WindowStyle)
        Select Case lSuccess
            Case Is > 32
                LaunchDocument = True
            Case SE_ERR_NOASSOC
                If ShowOpenWithDialog Then
                    Shell "rundll32 shell32.dll,openas_rundll " & Filename
                    LaunchDocument = True
                End If
            Case Else
                LaunchDocument = False
        End Select
    End Function
    Damit solltest Du per "LaunchDocument \pfad\zu\anderer.mdb" eigentlich problemlos umschalten können.

    Du wirst aber weiterhin, je nach Sicherheitseinstellung auf dem jeweiligen Rechner, die "soll ich das wirklich öffnen? könnte ja gefährlich sein, Makros, Inflation, Weltuntergang usw." Meldung bekommen.

    Aber wie gesagt: Erzähl mal, wodurch Du von A nach B und zurück von B nach A kommst bzw. kommen willst.

    Gruß, Michael
     
    miriki, 2. August 2012
    #2
  3. Hallo Micha. Danke erstmal für die Antwort! Bin mit dem Code nur leider überfordert (ich weiß nicht, wo der Datenbankpfad zu hinterlegen ist).

    Mein Ziel: Es gibt 5 Datenbanken. Die Startdatenbank fungiert als Hauptmenü. Über Buttons gelangt der Anwender nun jeweils zur gewünschten "Unterdatenbank" (eine von 4). Möchte der Anwender von einer Unterdatenbank wieder zurück zur Startdatenbank, so drückt er auf den Zurückbutton. Es soll jedoch nur die jeweils gewünschte Datenbank offen sein.

    Ich habe es bisher so gelöst, dass ich von der Startdatenbank per Shell-Funktion und Docmd.Quit zur Unterdatenbank gelange:

    Dim WshShell As Object
    Set WshShell = CreateObject("Wscript.Shell")
    WshShell.Run "Z:\Datenbanken\Unterdatenbank.accdr"
    DoCmd.Quit

    Von der Unterdatenbank zurück zur Startdatenbank gelang ich per FollowHyperlink und Docmd.Quit (Nervig weil Virenmeldung):

    Application.FollowHyperlink "Z:\Datenbanken\Startdatenbank.accdb"
    DoCmd.Quit

    Accdr verwende ich nur deshalb, weil sonst die ganze Sitzung geschlossen wird. Für den Anwender kann es auch Accdb sein.
     
    Helge Schneider, 2. August 2012
    #3
  4. miriki Erfahrener User

    Zwischen Datenbanken hin- und herwechseln (nur Runtime installiert) Virenmeldung

    Ähm... Genau dort, wo er jetzt auch schon steht... *verwirrtbin* Du schreibst ja:

    Genau das würde sich dann in
    Code:
    LauchDocument "Z:\Datenbanken\Unterdatenbank.accdr"
    ändern. Hat eben den Vorteil, daß dieser Aufruf recht universell ist: Windows entscheidet selbständig auf dem jeweiligen Rechner, ob und wie das Dokument (also die Datenbank in diesem Fall) zu öffnen ist. Das Ding macht eigentlich genau das, was Du manuell im Explorer mit einem Doppelklick auf eine beliebige Datei machen würdest, inklusive der Nachfrage, wenn ein unbekannter Dateityp gestartet wird.

    Warum? Also, ich meine: Warum hier ein anderer Weg, als vorher? Auch der Weg zurück kann doch ohne Probleme (oder übersehe ich was?) mit entweder Deinem WshShell.Run oder eben dann auch mit dem LaunchDocument gemacht werden.

    Gruß, Michael
     
    miriki, 8. August 2012
    #4
Thema:

Zwischen Datenbanken hin- und herwechseln (nur Runtime installiert) Virenmeldung

Die Seite wird geladen...
  1. Zwischen Datenbanken hin- und herwechseln (nur Runtime installiert) Virenmeldung - Similar Threads - Datenbanken herwechseln Runtime

  2. Datenbank bleibt gesperrt - laccdb wird nicht gelöscht

    in Microsoft Access Hilfe
    Datenbank bleibt gesperrt - laccdb wird nicht gelöscht: Hallo zusammen, ich betreue eine Datenbank mit getrenntem Back- und Frontend, die in einem Firmennetzwerk auf dem Netzlaufwerk liegt. Ich entwickle sie lokal weiter, ohne vor Ort zu sein, wobei...
  3. LostFocus der Datenbank?

    in Microsoft Access Hilfe
    LostFocus der Datenbank?: Moin, gibt es das LostFocus-Event auch für die Datenbank, z.B. wenn man vom Formular zu Minesweeper wechselt? Oder entzieht Windows dem verlassenen Task sämtliche Aufmerksamkeit? Gruß Doming
  4. Problem Datenstruktur Mitglieds-Datenbank

    in Microsoft Access Hilfe
    Problem Datenstruktur Mitglieds-Datenbank: Hallo Leute, Ich habe eine Frage zu einer Vereins-Mitglieder-Datenbank, die ich erstelle. Die Vereinsmitglieder sind in einer Tabelle erfasst, also Nachname, Vorname, usw. Und es gibt einen...
  5. Auslesen Windowsbenutzer in einer Datenbank

    in Microsoft Access Hilfe
    Auslesen Windowsbenutzer in einer Datenbank: Hallo zusammen, wie kann ich auslesen, welcher Windows Benutzer gerade aktuell in einer Datenbank ist? Geht das? Danke Matthias
  6. Datenbank "Ausfahrtenerfassung" Rudern

    in Microsoft Access Hilfe
    Datenbank "Ausfahrtenerfassung" Rudern: Guten Abend zusammen Ich habe mich entschlossen unsere Papierversion der der Ausfahrtenerfassung unseres Ruderclubs zu aktualisieren. Ich habe also zwei neue Tabellen erstellt. T_FAHRTENBUCH und...
  7. Einfache Datenbank zum Suchen und Öffnen von Dokumentdateien

    in Microsoft Access Hilfe
    Einfache Datenbank zum Suchen und Öffnen von Dokumentdateien: Hallo Office-Gemeinde, ich bin komplett neu hier, Newbie im Bereich Access-Datenbanken, und möchte mich an einem kleinen Projekt versuchen - in der Hoffnung, dass das so überhaupt realisierbar...
  8. Datenbank Abfrage - einzelne Datensätze löschen

    in Microsoft Access Hilfe
    Datenbank Abfrage - einzelne Datensätze löschen: Hey ihr Lieben, ich habe eine Abfrage erstellt, die ich dann automatisiert in Excel habe. Nun ist es aber so, dass in dieser Abfrage 2-3 Datensätze enthalten sind, die sich mehr oder weniger...
  1. Diese Seite verwendet Cookies, um Inhalte zu personalisieren, diese deiner Erfahrung anzupassen und dich nach der Registrierung angemeldet zu halten.
    Auf dieser Website werden Cookies für die Zugriffsanalyse und Anzeigenmessung verwendet.
    Wenn du dich weiterhin auf dieser Seite aufhältst, akzeptierst du unseren Einsatz von Cookies.
    Information ausblenden