Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Aufruf des IE und übergabe von Daten
Gehe zu Seite 1, 2  Weiter
zurück: Navigation innerhalb gefilterte Daten weiter: Problem Beziehungen/SQL Befehl 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
Mitch26
Im Profil kannst Du frei den Rang ändern


Verfasst am:
18. März 2008, 18:32
Rufname:

Aufruf des IE und übergabe von Daten - Aufruf des IE und übergabe von Daten

Nach oben
       Version: Office 2003

Schönen Tag wünsche ich,

gibt es über VBA die Möglichkeit den Internetexplorer aufzurufen und ihm dabei bestimmte Daten zu Übergeben?

Also mein Ziel soll es sein aus einem Formular den IE aufzurufen und dort bei GoogleMaps die Straße und den Ort einzutragen.

Gibt es da schon Lösungen?

Danke
Mo1982
Im Profil kannst Du frei den Rang ändern


Verfasst am:
19. März 2008, 10:46
Rufname:


AW: Aufruf des IE und übergabe von Daten - AW: Aufruf des IE und übergabe von Daten

Nach oben
       Version: Office 2003

Hallo,

bei Google-Maps wird die Adresse als Parameter q= übergeben. Das sieht dann so aus:
Code:
Public Sub GoogleMaps(ByVal sAddress As String)
    Dim sURL As String
   
    sURL = "http://maps.google.de/maps?q=" & _
            Replace(sAddress, " ", "+")   
    Application.FollowHyperlink sURL
End Sub
Achtung: Das öffnet Deinen Standardbrowser (kann also z.B. der FireFox sein). Wenn es der IE sein muss, dann kannst Du das hier versuchen:
Code:
Public Sub GoogleMaps_2(ByVal sAddress As String)
    Dim sURL As String
    Dim oInternetExplorer As Object
   
    sURL = "http://maps.google.de/maps?q=" & _
            Replace(sAddress, " ", "+")
    On Error Resume Next   
    Set oInternetExplorer = GetObject(, "InternetExplorer.Application")
    If oInternetExplorer Is Nothing Then
        Set oInternetExplorer = CreateObject("InternetExplorer.Application")
    End If
    On Error Goto 0
    With oInternetExplorer
        .Visible = True
        .Navigate sURL
    End With
    Set oInternetExplorer = Nothing
End Sub
Zum Testen:
Code:
Sub TestGoogleMaps()
    ' Variante 1
    Call GoogleMaps("Berliner Allee Düsseldorf")
    ' Variante 2
    Call GoogleMaps_2("Berliner Allee Düsseldorf")
End Sub

_________________
Grüße,
Mo


Zuletzt bearbeitet von Mo1982 am 21. Mai 2008, 13:29, insgesamt 3-mal bearbeitet
Mitch26
Im Profil kannst Du frei den Rang ändern


Verfasst am:
19. März 2008, 11:22
Rufname:

AW: Aufruf des IE und übergabe von Daten - AW: Aufruf des IE und übergabe von Daten

Nach oben
       Version: Office 2003

Hallo MO1982,

das funktioniert wirklich super.

Ich würde jetzt zur Straße noch den Ort übertragen aber mit
Code:
Private Sub Befehl72_Click()
    Call ShowGoogleMaps(Forms!frm_hauptformular![Straße] & [Ort])
End Sub
überträgt er mir den Ort leider nicht.

Wie kann ich das ändern?

Danke
Mo1982
Im Profil kannst Du frei den Rang ändern


Verfasst am:
19. März 2008, 13:03
Rufname:

AW: Aufruf des IE und übergabe von Daten - AW: Aufruf des IE und übergabe von Daten

Nach oben
       Version: Office 2003

Hallo,

Ort enthält eine fehlerhafte Referenz. Versuche es mal so:
Code:
Private Sub Befehl72_Click()
    Call ShowGoogleMaps(Forms!frm_hauptformular![Straße] & " " & _
                        Forms!frm_hauptformular!Ort)
End Sub

_________________
Grüße,
Mo
Mitch26
Im Profil kannst Du frei den Rang ändern


Verfasst am:
19. März 2008, 13:09
Rufname:


AW: Aufruf des IE und übergabe von Daten - AW: Aufruf des IE und übergabe von Daten

Nach oben
       Version: Office 2003

Hi Mo1982,

das war es. So überträgt er alle Daten.

Herzlichen Dank
Gast



Verfasst am:
25. Apr 2008, 12:27
Rufname:

AW: Aufruf des IE und übergabe von Daten - AW: Aufruf des IE und übergabe von Daten

Nach oben
       Version: Office 2003

Hi,

das würde ich auch gerne einbauen, da ich aber noch Anfänger bin, habe ich ein paar Probleme.

Der erste Code funktioniert
Code:
Public Sub GoogleMaps(ByVal sAddress As String)
    Dim sURL As String
   
    sURL = "http://maps.google.de/maps?q=" & _
            Replace(sAddress, " ", "+")
    Application.FollowHyperlink sURL
End Sub

Sub TestGoogleMaps()
    Call GoogleMaps("Berliner Allee Düsseldorf")
End Sub
, aber das mit dem 2 Code
Code:
Private Sub Befehl72_Click()
    Call ShowGoogleMaps(Forms!frm_hauptformular![Straße] & " " & _
                        Forms!frm_hauptformular!Ort)
End Sub
peile ich nicht so ganz. Wo muss dieser Code hinzugefügt werden? Und was muss ich machen das ich diesen Code aus einem Formular ausrufen kann.
Willi Wipp
Moderator


Verfasst am:
25. Apr 2008, 12:48
Rufname:
Wohnort: Raum Wiesbaden

Re: Aufruf des IE und übergabe von Daten - Re: Aufruf des IE und übergabe von Daten

Nach oben
       Version: Office 2003

Hi Gast,

da werden vermutlich 2 Namen fuer die Funktion verwendet.
Lass mal das Show weg, wenn Du die Funktion ohne definiert hast.
Das Beispiel zeigt nur wie man an die Funktion einen String uebergeben kann,
der aus Formular-Steuerelementinhalten zusammengesetzt wird.

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

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


Zuletzt bearbeitet von Willi Wipp am 21. Mai 2008, 13:02, insgesamt einmal bearbeitet
siegpes
Im Profil kannst Du frei den Rang ändern


Verfasst am:
21. Mai 2008, 08:44
Rufname:

AW: Aufruf des IE und übergabe von Daten - AW: Aufruf des IE und übergabe von Daten

Nach oben
       Version: Office 2003

Hallo!

Wo kann ich sagen, dass er den internettexplorer maximiert öffnen soll und wenn ich in access einen neuen ds öffnen mit anderem inhalt soll er mir das geöffnete fenster verwenden
kein neues fenster und auch keine neue registerkarte

lg siegpes
Willi Wipp
Moderator


Verfasst am:
21. Mai 2008, 13:03
Rufname:
Wohnort: Raum Wiesbaden

Re: Aufruf des IE und übergabe von Daten (II) - Re: Aufruf des IE und übergabe von Daten (II)

Nach oben
       Version: Office 2003

Hi siegpes,

Du koenntest es mit GetObject vor dem CreateObject versuchen
und nur dann CreateObject machen wenn GetObject erfolglos war.

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
Mo1982
Im Profil kannst Du frei den Rang ändern


Verfasst am:
21. Mai 2008, 13:28
Rufname:

AW: Aufruf des IE und übergabe von Daten - AW: Aufruf des IE und übergabe von Daten

Nach oben
       Version: Office 2003

@siegpes:
Ich habe den Vorschlag von Willi Wipp oben im Code eingebaut.

Man kann zum Maximieren das Fenster über die Shell öffnen. Über das oben angegebene Konstrukt lässt es sich z.B. behelfsweise so lösen:
Code:
    With oInternetExplorer
        .Top = 0
        .Left = 0
        .TheaterMode = True
        lngHeight = .Height
        lngWidth = .Width
        .TheaterMode = False
        .Height = lngHeight
        .Width = lngWidth
        .Visible = True
        .Navigate sURL
    End With

_________________
Grüße,
Mo
levvoo
Gast


Verfasst am:
05. Nov 2008, 12:47
Rufname:

AW: Aufruf des IE und übergabe von Daten - AW: Aufruf des IE und übergabe von Daten

Nach oben
       Version: Office 2003

Hallo,

ich habe diesen Thread gelesen und konnte einfach nicht drum herum Razz

In meiner Datenbank werden Kundendaten geführt, die zum Teil auch nicht vollständig sind.
Mein Betrieb besitzt eine große Adressdatenbank mit Webfrontend.

Der Übergabeparameter ist
Code:
ssuche.d4w?cn=
Gesucht wird in dem Feld schnellsuche nach dem Kundennamen in meiner Datenbank (Feld in der Datenbank ist KName).

Wie muss ich den Quelltext dafür anpassen, dass beim klick auf den Button "SCD" der Wert in der Datenbank an den IE übergeben wird und sich der entsprechende Eintrag öffnet?

MfG
levvoo
Willi Wipp
Moderator


Verfasst am:
05. Nov 2008, 13:38
Rufname:
Wohnort: Raum Wiesbaden

Re: Aufruf des IE und übergabe von Daten (II) - Re: Aufruf des IE und übergabe von Daten (II)

Nach oben
       Version: Office 2003

Hi levvoo,

keine Ahnung... Confused
Wie sieht es denn aus wenn Du es ueber die URl direkt im Browser eingibst?
Woher sollen die Parameter kommen? Sind die im Formular vorhanden?
Wie heissen die entsprechenden Steuerelemente/Felder?
...

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

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


Verfasst am:
05. Nov 2008, 14:04
Rufname:

AW: Aufruf des IE und übergabe von Daten - AW: Aufruf des IE und übergabe von Daten

Nach oben
       Version: Office 2003

Hallo Willi Wipp,

Die Werte sind über das Formular sichtbar. Das einzige was immer ausgefüllt ist, ist der Kundenname.
Da auch Informationen wie Telefonnummer und e-Mail Adresse von Bedeutung sind, möchte ich das aus der Firmendatenbank auslesen können.

Das Feld in meiner Datenbank nennt sich "KName".
Das Suchfeld in der Firmendatenbank heisst "schnellsuche".

Und die Suchanfragen werden mit dem Parameter "...ssuche.d4w?cn=" übergeben.

Grüße aus Berlin
levvoo
Willi Wipp
Moderator


Verfasst am:
05. Nov 2008, 14:19
Rufname:
Wohnort: Raum Wiesbaden

Re: Aufruf des IE und übergabe von Daten (III) - Re: Aufruf des IE und übergabe von Daten (III)

Nach oben
       Version: Office 2003

Hi levvoo,
Willi Wipp - 05. Nov 2008, 12:38 hat folgendes geschrieben:
Wie sieht es denn aus wenn Du es ueber die URL direkt im Browser eingibst?...

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

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


Verfasst am:
05. Nov 2008, 14:36
Rufname:


AW: Aufruf des IE und übergabe von Daten - AW: Aufruf des IE und übergabe von Daten

Nach oben
       Version: Office 2003

Hallo Willi,

die Suche funktioniert wenn ich es einfach im Browser eingebe.

Allerdings soll der Aufwand minimiert werden, deshalb die sofortige Ausgabe des gewünschten Datensatzes.

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

Gehe zu Seite 1, 2  Weiter
Diese Seite Freunden empfehlen

Seite 1 von 2
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 
Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten. Access Tabellen & Abfragen: Formular Daten in einer Tabelle speichern? 1 Gast 1017 24. März 2005, 16:24
Willi Wipp Formular Daten in einer Tabelle speichern?
Keine neuen Beiträge Access Tabellen & Abfragen: Wichtige frage zur eingabe von daten (ohne nervige Meldunge) 2 Mod 573 18. März 2005, 11:05
Gast Wichtige frage zur eingabe von daten (ohne nervige Meldunge)
Keine neuen Beiträge Access Tabellen & Abfragen: Daten auf Tabellen aufteilen 2 mightymagic 869 08. März 2005, 16:56
Gast Daten auf Tabellen aufteilen
Keine neuen Beiträge Access Tabellen & Abfragen: Daten abfragen nach Buchstabenreihenfolge 2 wrengers 699 07. März 2005, 22:59
Gast Daten abfragen nach Buchstabenreihenfolge
Keine neuen Beiträge Access Tabellen & Abfragen: Summieren von gruppierten Daten 3 Thomas Theurer 1202 27. Jan 2005, 17:36
mapet Summieren von gruppierten Daten
Keine neuen Beiträge Access Tabellen & Abfragen: Rechnung erstellen wenn alle Daten vorhanden 6 Freddy 1909 25. Nov 2004, 11:03
Freddy Rechnung erstellen wenn alle Daten vorhanden
Keine neuen Beiträge Access Tabellen & Abfragen: Komment. u Daten in zelle schreiben, Zellenausrichtung festl 2 k@lle 816 06. Okt 2004, 11:49
k@lle Komment. u Daten in zelle schreiben, Zellenausrichtung festl
Keine neuen Beiträge Access Tabellen & Abfragen: Daten Trennen 4 Oliver.Giertz 1194 02. Sep 2004, 13:05
Oliver.Giertz Daten Trennen
Keine neuen Beiträge Access Tabellen & Abfragen: Daten aus Zwischenablage anhängen 5 Elhana 1077 30. Aug 2004, 13:00
Pusteblume Daten aus Zwischenablage anhängen
Keine neuen Beiträge Access Tabellen & Abfragen: Daten suchen in ACCESS. Daten aus Tabellen suchen! 7 Gast 2093 26. Aug 2004, 13:55
Gast Daten suchen in ACCESS. Daten aus Tabellen suchen!
Keine neuen Beiträge Access Tabellen & Abfragen: Anzahl der Monate zwischen 2 Daten 2 master_tj 1837 22. Jul 2004, 13:17
master_tj Anzahl der Monate zwischen 2 Daten
Keine neuen Beiträge Access Tabellen & Abfragen: logische Zuordnung der Daten / Beziehung 0 DEAthWiNg 991 14. Jul 2004, 22:07
DEAthWiNg logische Zuordnung der Daten / Beziehung
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: JavaScript