Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Aktivieren eines geöffneten Fensters
Autor: Kubus72
Datum: 28.08.07 09:42
und wie kann ich das hWnd in meinem Code umsetzen? Gruß Kubus72 Private Sub Command11_Click() On Error GoTo Err_Command11_Click Dim Pfad As String Dim Gefunden As String Pfad = "L:\CLI\Datenbanken\Stunden 2006.mdb" Gefunden = Dir(Left(Pfad, Len(Pfad) - 4) & ".ldb") If Len(Gefunden) = False Then DateiÖffnen "open", Pfad, SW_MAXIMIZE Else MsgBox ("Diese Datenbank ist bereits geöffnet! "), vbInformation, "Datenbank-Navigator" ‘hier müsste irgendwie das bereits geöffnete Fenster von der Datenbank “ L:\CLI\Datenbanken\Stunden 2006.mdb“ aktieviert/angezeigt werden. Nur ich weiss nicht wirklich, wie? End If Exit_Command11_Click: Exit Sub Err_Command11_Click: MsgBox Err.Description Resume Exit_Command11_Click End Sub

Aktivieren eines geöffneten Fensters	1.768	Kubus72	27.08.07 16:26
Re: Aktivieren eines geöffneten Fensters	1.115	Martoeng	28.08.07 00:03
Re: Aktivieren eines geöffneten Fensters	1.187	Kubus72	28.08.07 09:42
Re: Aktivieren eines geöffneten Fensters	1.079	mikeb69	28.08.07 11:54
Re: Aktivieren eines geöffneten Fensters	1.166	Kubus72	28.08.07 17:27
Re: Aktivieren eines geöffneten Fensters	1.120	mikeb69	28.08.07 19:59

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übersicht

Suchen