Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
fremde Acc-Datenbank offen?
zurück: Felder löschen weiter: import von Excel nach Access Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
ritzmo
Gast


Verfasst am:
02. Nov 2007, 18:04
Rufname:

fremde Acc-Datenbank offen? - fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

Liebe Leute,
kann mir jemand sagen, wie ich feststellen kann, ob eine fremde Acc-Datenbank offen ist? Dank für Eure Hilfe.
Gruß Markus
Nouba
nicht ganz unwissend :)


Verfasst am:
02. Nov 2007, 18:16
Rufname:
Wohnort: Berlin


AW: fremde Acc-Datenbank offen? - AW: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

Hallo,

eine Datei (eine Access-Datenbank ist eine Datei) ist dann offen, wenn sie nicht für das Schreiben geöffnet werden kann.

Code:
  Dim f As Long

  On Error Resume Next
  f = FreeFile()
  Open KomplettePfadAngabe For Input Lock Write As #f
  Close #f
  If Err.Number = 70 Then
    'Ist die Datei geöffnet
  End If

_________________
mit freundlichen Grüssen Nouba

Wenn beim Lesen eines Beitrags der Eindruck entsteht, dass sich der Fragesteller wenig Mühe gegeben hat, so erhöht das nicht unbedingt die Motivation, eine Antwort zu verfassen.
ritzmo
Gast


Verfasst am:
13. Nov 2007, 18:51
Rufname:

AW: fremde Acc-Datenbank offen? - AW: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

ritzmo am 02. Nov 2007 um 17:50 hat folgendes geschrieben:
Hallo Nouba,
vielen Dank, ich werde es ausprobieren.
Gruß Markus

Nouba,
ich muss hier noch einmal nachfragen:
Dein Code funktioniert und gibt das richtige Ergebnis zurück, wenn die Datei geöffnet ist. Dies auch, wenn ein anderer Client die Datei geöffnet hat. Ich möchte die Anfrage jedoch auf den eigenen Rechner beschränken. Das heißt ein Ergebnis bekommen, ob die entsprechende Datei auf dem lokalen Rechner offen ist. Gibt es da eine Möglichkeit?
Gruß Markus
Nouba
nicht ganz unwissend :)


Verfasst am:
13. Nov 2007, 19:19
Rufname:
Wohnort: Berlin

AW: fremde Acc-Datenbank offen? - AW: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

Hallo,

dafür kommt wohl eher so etwas wie Preventing multiple instances of a database auf The Access Web in Frage.

_________________
mit freundlichen Grüssen Nouba

Wenn beim Lesen eines Beitrags der Eindruck entsteht, dass sich der Fragesteller wenig Mühe gegeben hat, so erhöht das nicht unbedingt die Motivation, eine Antwort zu verfassen.
steffen0815
VBA-Programmierer


Verfasst am:
13. Nov 2007, 19:26
Rufname:


AW: fremde Acc-Datenbank offen? - AW: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

Hallo Markus,
ich weiß nicht wozu du das wissen musst, geht es darum die Datei zu öffnen (falls nicht offen) dann hilft "GetObject".

_________________
Gruß Steffen
ritzmo
Gast


Verfasst am:
14. Nov 2007, 18:04
Rufname:

AW: fremde Acc-Datenbank offen? - AW: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

Hallo Nouba, hallo Steffen,
habe mir "Preventing multiple instances of a database" angesehen - verstehe leider so gut wie nichts von API aber es ist offensichtlich das was ich brauche.
Das Problem besteht nur darin, dass der Code ermittelt, ob von der aufrufenden Datei eine weitere Instanz auf dem eigenen Rechner offen ist. Ich möchte dies jedoch für eine fremde Datei überprüfen und müsste dazu natürlich irgendwie den Dateinamen angeben. Kann ich das damit bewerkstelligen?

Gruß Markus
{Code entfernt nach Hinweis von Nouba by Willi Wipp}
Nouba
nicht ganz unwissend :)


Verfasst am:
14. Nov 2007, 18:46
Rufname:
Wohnort: Berlin

AW: fremde Acc-Datenbank offen? - AW: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

Hallo,

[kopfschuettel]warum in Gottes Namen kopierst Du denn die in meinem Beitrag verlinkte Routine komplett hier hin?[/kopfschuettel] Der Autor von The Access Web untersagt das Veröffentlichen (nicht jedoch das Benutzen) von jeglichem Kode auf seiner Seite ausdrücklich, und Du bringst damit den hiesigen Forenbetreiber möglicherweise in die Bredouille.

Zum Kode selbst: Warum probierst Du es nicht aus? Und warum erkennst Du nicht (z. Bsp. mit den Augen), wenn auf Deinem Rechner zweimal das selbe Frontend geöffnet ist. Und selbst wenn, was ist Schlimmes daran?

_________________
mit freundlichen Grüssen Nouba

Wenn beim Lesen eines Beitrags der Eindruck entsteht, dass sich der Fragesteller wenig Mühe gegeben hat, so erhöht das nicht unbedingt die Motivation, eine Antwort zu verfassen.


Zuletzt bearbeitet von Nouba am 15. Nov 2007, 13:22, insgesamt einmal bearbeitet
ritzmo
Gast


Verfasst am:
15. Nov 2007, 10:06
Rufname:

AW: fremde Acc-Datenbank offen? - AW: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

Sorry, ich hatte nicht die Absicht irgendwelche Urheberrechte zu verletzen oder Leute in Schwierigkeiten zu bringen.
Ansonsten finde ich, dass die Fragestellung nicht so abwegig ist:
Es soll überprüfen werden, ob eine Instanz einer Front-End-DB auf dem eigenen Rechner offen ist; wenn ja, dann in den Vordergrund bringen, wenn nein, dann öffnen - eigentlich ganz einfach.
Gruß M.
steffen0815
VBA-Programmierer


Verfasst am:
15. Nov 2007, 10:40
Rufname:

AW: fremde Acc-Datenbank offen? - AW: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

Hallo,
Zitat:
wenn ja, dann in den Vordergrund bringen, wenn nein, dann öffnen - eigentlich ganz einfach.
Steffen hat folgendes geschrieben:
ich weiß nicht wozu du das wissen musst, geht es darum die Datei zu öffnen (falls nicht offen) dann hilft "GetObject".
Wer lesen kann ist klar im Vorteil Confused .
Da hast du die Antwort schon seit Tagen vorliegen!!!!!!!!

_________________
Gruß Steffen
Willi Wipp
Moderator


Verfasst am:
15. Nov 2007, 12:50
Rufname:
Wohnort: Raum Wiesbaden

Re: fremde Acc-Datenbank offen? - Re: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

@Nouba,

auch wenn Graham Mandeno in seiner ©-Note im Codes die Verbreitung ausdruecklich zulaesst,
habe ich den Code mal entfernt, da ja keine Aenderungen daran vorgenommen wurden Wink

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
ritzmo
Gast


Verfasst am:
15. Nov 2007, 13:09
Rufname:

AW: fremde Acc-Datenbank offen? - AW: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

Steffen,
wer lesen kann ist klar im Vorteil - insofern hättest Du auch feststellen können, dass ich auch schon so weit war. Mir nutzt es nichts zu wissen, ob die Datei grundsätzlich geöffnet ist (denn nur das stellt GetObjetct fest). Ich muss wissen, ob eine Instanz auf meinem Rechner bereits geöffnet ist - ich weiß es nicht deutlicher zu sagen.
Gruß M.
steffen0815
VBA-Programmierer


Verfasst am:
15. Nov 2007, 13:55
Rufname:

AW: fremde Acc-Datenbank offen? - AW: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

Hallo,
Zitat:
nsofern hättest Du auch feststellen können, dass ich auch schon so weit war
Wie hätte ich das merken sollen?

Zitat:
Es soll überprüfen werden, ob eine Instanz einer Front-End-DB auf dem eigenen Rechner offen ist; wenn ja, dann in den Vordergrund bringen, wenn nein, dann öffnen - eigentlich ganz einfach.
Meiner Meinung nach macht dies genau der nachfolgende Code:
Code:
Option Compare Database
Option Explicit
 ' Globel vereinbaren, sonst wird FremdDB nach Prozedurende wieder geschlossen
Public fremdDB As Access.Application

Public Sub DBAktivieren()
    Set fremdDB = GetObject("c:\...\DeineFremdDB.mdb")
    fremdDB.Visible = True
    ' in den Vordergrund holen über den Titel
    ' (Extras->Start->Anwendungstitel)
    AppActivate "TitelFremdDB"
End Sub

_________________
Gruß Steffen
ritzmo
Gast


Verfasst am:
23. Nov 2007, 09:55
Rufname:

AW: fremde Acc-Datenbank offen? - AW: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

Hallo Steffen,
es ist natürlich wie Du sagst. Allerdings verschiebt AccXP durch diese Aktion das Formularfenster innerhalb der Anwendung so, dass der linke Teil nicht mehr sichtbar ist. Ich weiß jetzt auch nicht mehr weiter.
Jedenfalls Danke für Deine Hilft.
Gruß Markus
steffen0815
VBA-Programmierer


Verfasst am:
23. Nov 2007, 10:16
Rufname:


AW: fremde Acc-Datenbank offen? - AW: fremde Acc-Datenbank offen?

Nach oben
       Version: Office XP (2002)

Hallo Markus,
ich kann dein Problem nicht nachvollziehen Rolling Eyes .
Ich selbst nutze dafür eigentlich immer die API-Variante.
Kannst mal testen, ob die bei dir sauber läuft: Access per vba minimieren
Bei dir dann:
Code:
Sub APIAccessNachVorn()
    Dim xhWnd&

    xhWnd = FindWindow(vbNullString," DeinFensterTitel")
    ActivateWindow xhWnd
End Sub

_________________
Gruß Steffen
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Formulare: Formular öffnet nur wenn VBA Editor offen ist 4 BlindSeer 88 11. Feb 2014, 08:25
BlindSeer Formular öffnet nur wenn VBA Editor offen ist
Keine neuen Beiträge Access Programmierung / VBA: Prüfen ob Word offen ist und das Beenden von Word 11 donti 2700 27. Aug 2012, 11:46
HdW Prüfen ob Word offen ist und das Beenden von Word
Keine neuen Beiträge Access Programmierung / VBA: Auf fremde accdb mit Kennwort zugreifen und Feldgröße ändern 6 haiflosse 390 07. Aug 2012, 10:57
JMalberg Auf fremde accdb mit Kennwort zugreifen und Feldgröße ändern
Keine neuen Beiträge Access Programmierung / VBA: Verwendung von INSERT INTO während die Tabelle offen ist 6 BeschBesch 168 15. Sep 2011, 20:17
BeschBesch Verwendung von INSERT INTO während die Tabelle offen ist
Keine neuen Beiträge Access Programmierung / VBA: VBA: If-Abfrage fremde Tabelle/mehrere Datensätze 8 ATROKA 684 28. Jul 2011, 15:57
ATROKA VBA: If-Abfrage fremde Tabelle/mehrere Datensätze
Keine neuen Beiträge Access Programmierung / VBA: Fremde DB öffnen -> Fokus-Verlust 1 Marius U. 877 11. Sep 2010, 20:53
MissPh! Fremde DB öffnen -> Fokus-Verlust
Keine neuen Beiträge Access Programmierung / VBA: Prüfen ob eine bestimmte Excel-Datei offen 1 Gast 1380 17. März 2010, 17:38
Gast Prüfen ob eine bestimmte Excel-Datei offen
Keine neuen Beiträge Access Formulare: Berechteten Wert in fremde Tabelle übergeben 2 hikx76 594 26. Feb 2009, 18:23
hikx76 Berechteten Wert in fremde Tabelle übergeben
Keine neuen Beiträge Access Berichte: Problem Abfrage Formular (offen oder geschlossen) beim... 6 Zahlenheinz 992 05. Nov 2008, 19:04
Zahlenheinz Problem Abfrage Formular (offen oder geschlossen) beim...
Keine neuen Beiträge Access Formulare: 2 Formulare gleichzeitig offen 2 Frankster 402 25. Aug 2008, 12:53
Frankster 2 Formulare gleichzeitig offen
Keine neuen Beiträge Access Hilfe: Datenübergabe an fremde Website, Theoretische Frage 28 Elton#62 2195 10. März 2008, 17:45
SPe_84 Datenübergabe an fremde Website, Theoretische Frage
Keine neuen Beiträge Access Programmierung / VBA: Excel bleibt im Taskmanager offen. Start aus Access 3 blicki 1513 03. Aug 2007, 07:21
blicki Excel bleibt im Taskmanager offen. Start aus Access
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: HTML Editoren Forum