Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
aus Acces heraus Internetexplorer im Vordergrund öffnen
zurück: Unterformular per Kombifeld wechseln weiter: Datumsformat beibehalten Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
captainHook
Einsteiger


Verfasst am:
12. Feb 2009, 11:29
Rufname:

aus Acces heraus Internetexplorer im Vordergrund öffnen - aus Acces heraus Internetexplorer im Vordergrund öffnen

Nach oben
       Version: Office 2007

Hallo ich habe folgendes Problem,

ich habe in einer Datenbank einige Links drin, doch wenn ich auf die klicke, öffnet sich die Seite nur im Hintergrund.

Kann man durch VBA realisieren, dass sich das Fenster dann im Vordergrund befindet oder ist das eine Einstellungssache im Internetexplorer?

grüße Hook
Turboscherbe
Office-VBA-Programmierer


Verfasst am:
12. Feb 2009, 14:41
Rufname:


AW: aus Acces heraus Internetexplorer im Vordergrund öffnen - AW: aus Acces heraus Internetexplorer im Vordergrund öffnen

Nach oben
       Version: Office 2007

Hi,
ich habe das Problem gelöst, indem ich nicht die Access-internen Links verwende, sondern den Link "von Hand" öffne. Dazu habe ich folgenden Code verwendet:

Windows-Api einbinden
Code:
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
' Einbinden der shell32.dll - Funktion
'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
Private Declare Function ShellExecute Lib "shell32.dll" _
    Alias "ShellExecuteA" (ByVal hwnd As Long, _
                           ByVal lpOperation As String, _
                           ByVal lpFile As String, _
                           ByVal lpParameters As String, _
                           ByVal lpDirectory As String, _
                           ByVal nShowCmd As Long) As Long
Funktion für den Auftruf:
Code:
Public Function OpenShellExecute(strExpression As Variant) As Boolean
    If IsNull(strExpression) Then Exit Function
    ShellExecute Application.hWndAccessApp, "Open", strExpression, _
                 vbNullString, vbNullString, 1
End Function
Der Link kann dann einfach mit OpenShellExecute Me.strMeinLink im Standard-Browser geöffnet werden.

Ich hoffe ich konnte weiterhelfen...
Viele Grüße
captainHook
Einsteiger


Verfasst am:
13. Feb 2009, 08:47
Rufname:

AW: aus Acces heraus Internetexplorer im Vordergrund öffnen - AW: aus Acces heraus Internetexplorer im Vordergrund öffnen

Nach oben
       Version: Office 2007

Hallo, kannst du den Lösungsweg vielelciht ein wenig genauer beschreiben, da ich noch nicht so lange dabei bin;)

Also ertsmla habe ich folgenden Code, um Die Hyperlinks zu öffnen.
Code:
Private Sub WebPage_Click()
On Error GoTo Er
    Dim strErr As String
   
    If Not IsNull(Me!WebPage) Then
        If Left(Me!WebPage, 7) = "http://" Then
            Application.FollowHyperlink Me!WebPage
          Else
            Application.FollowHyperlink "http://" & Me!WebPage
        End If
    End If
Ex:
    On Error Resume Next
    Exit Sub
Er:
    Select Case Err.Number
      Case 490
        GoTo Ex
      Case Else
        strErr = "Sie haben keine gültige Internetadresse eingegeben!"
        MsgBox strErr, vbCritical + vbOKOnly, " Ein Fehler ist aufgetreten"
        Resume Ex
    End Select
    Resume
End Sub
Wie und wo kann ich jetzt deinen Code einbinden? Danke für deine Hilfe!

Grüße Hook
Turboscherbe
Office-VBA-Programmierer


Verfasst am:
13. Feb 2009, 10:55
Rufname:

AW: aus Acces heraus Internetexplorer im Vordergrund öffnen - AW: aus Acces heraus Internetexplorer im Vordergrund öffnen

Nach oben
       Version: Office 2007

Hi,
ist ganz einfach: In Deinem Klick-Ereignis "Private Sub WebPage_Click() " rufst Du einfach nur noch den Befehl "OpenShellExecute Me.WebPage" auf. Vorher könntest Du noch (wie Du es schon ansatzweise realisiert hast) prüfen, ob es sich bei Me.WebPage um einen gültigen Link handelt.

Die beiden anderen Code-Ausschnitte aus meinem letzten Post fügst Du entweder in ein Modul ein oder in das Klassenobjekt, in dem auch das Klick-Ereignis behandelt wird.

Viele Grüße
captainHook
Einsteiger


Verfasst am:
13. Feb 2009, 12:18
Rufname:


AW: aus Acces heraus Internetexplorer im Vordergrund öffnen - AW: aus Acces heraus Internetexplorer im Vordergrund öffnen

Nach oben
       Version: Office 2007

super klappt:)

Danke und Grüße
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 Tabellen & Abfragen: Per Button-Klick Outlook Adressbuch öffnen 4 Sessel1234 2100 08. Feb 2010, 12:19
Sessel1234 Per Button-Klick Outlook Adressbuch öffnen
Keine neuen Beiträge Access Tabellen & Abfragen: Datenbankverbidung scheitert aus .dot heraus 1 David__ 187 17. Jan 2010, 01:13
MissPh! Datenbankverbidung scheitert aus .dot heraus
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage in einwer zweiten Datenbank öffnen??? 7 Martina83 302 14. Sep 2009, 08:45
Martina83 Abfrage in einwer zweiten Datenbank öffnen???
Keine neuen Beiträge Access Tabellen & Abfragen: Acces DB von Excel Daten aktualisieren 1 Gast 287 29. Jun 2009, 13:45
Sinister Acces DB  von Excel Daten aktualisieren
Keine neuen Beiträge Access Tabellen & Abfragen: Abfrage und PivotChart gleichzeitig öffnen? 0 Wurzelzwerg 400 04. Dez 2008, 16:18
Wurzelzwerg Abfrage und PivotChart gleichzeitig öffnen?
Keine neuen Beiträge Access Tabellen & Abfragen: Anzahl Tabelllen in Acces 10 TomiTom 374 13. Sep 2008, 13:36
Gast Anzahl Tabelllen in Acces
Keine neuen Beiträge Access Tabellen & Abfragen: Webbrowser über Ereignisprozedur öffnen 2 fizlipuzli 1491 21. Mai 2008, 13:37
fizlipuzli Webbrowser über Ereignisprozedur öffnen
Keine neuen Beiträge Access Tabellen & Abfragen: Excel Tabelle aus Access öffnen 4 Gero16 1905 10. Feb 2008, 12:38
Gast Excel Tabelle aus Access öffnen
Keine neuen Beiträge Access Tabellen & Abfragen: Acces Auswahlabfrage 2 rabie 495 13. Feb 2007, 09:39
rabie Acces Auswahlabfrage
Keine neuen Beiträge Access Tabellen & Abfragen: "Dynamische Abfragen" Tabelle vor öffnen der Abfra 1 smux 1279 11. Jan 2007, 12:35
JörgG "Dynamische Abfragen" Tabelle vor öffnen der Abfra
Keine neuen Beiträge Access Tabellen & Abfragen: Acces vs. Excel 1 FrüherVogel 487 15. Nov 2006, 11:13
rita2008 Acces vs. Excel
Keine neuen Beiträge Access Tabellen & Abfragen: FETCH FIRST x ROWS ONLY in Acces 2 holger83 2123 27. Okt 2006, 11:30
holger83 FETCH FIRST x ROWS ONLY in Acces
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel-Formeln