Access Hilfe

TOM

Elder
Oldschool OC.at'ler

Registered: Nov 2000
Location: Vienna
Posts: 7424

20.07.2006 - 16:28

Sers Leute... ich bräuchte in der Ferialhocken eine kleine Hilfestellung bezüglich MS Access

1: E-Mail per Knopfdruck verschicken

Wie? Ich hab irgendwas mitbekommen, dass das über "MAPI" funktionieren sollte, aber ich komme nicht weiter. Ich will einfach nur einen Button haben wo man draufklickt und er holt sich von einer Tabelle die Adresse und öffnet ein Outlook-Mail (VBA Code schätze ich mal)

2: Website per Knopfdruck öffnen

Wie? Ziemlich das Selbe wie oben, nur eben mit einer Website... angeblich müsste es mit einfachem Ausführ-Makro funktionieren und hinter die IEXPLORER.exe irgendwelche parameter schreiben, damit er die URL aus der Tabelle frisst

tia

TOM

Bearbeitet von TOM am 21.07.2006, 12:48

dio

Here to stay

Registered: Nov 2002
Location: Graz
Posts: 4938

20.07.2006 - 20:12

zu 2.:
Ich hab mit Access nicht viel am Hut, vielleicht hilft es dir trotzdem:
dem IE kannst du ganz einfach die zu öffnende Website als Parameter übergeben:

Code:

iexplore [url]http://www.overclockers.at[/url]

TOM

Elder
Oldschool OC.at'ler

Registered: Nov 2000
Location: Vienna
Posts: 7424

20.07.2006 - 21:11

i know, aber wie is der syntax damit er die url aus der tabelle frisst?

es ist keine fixe adresse, sie ändert sich andauernd und die aktuelle die gerade angezeigt wird, soll per knopfdruck geöffnet werden

dio

Here to stay

Registered: Nov 2002
Location: Graz
Posts: 4938

21.07.2006 - 04:05

die Adresse in ein Feld schreiben und dann auf jenes zugreifen geht sicher.

EndOfDayz

Little Overclocker

Registered: Oct 2004
Location: Austria
Posts: 63

21.07.2006 - 04:19

Vielleicht hilft dir dieser Thread aus einem Office-Forum:

KLICK MICH

TOM

Elder
Oldschool OC.at'ler

Registered: Nov 2000
Location: Vienna
Posts: 7424

21.07.2006 - 08:11

thx... das mit dem Mail funktioniert einwandfrei

jetzt brauch ich nur mehr was für den browser-start :]

edit: in dem forum gerade die lösung gefunden :]

Wen's interessiert:

Code:

Dim IE As Object

    Set IE = CreateObject("InternetExplorer.Application")
    IE.Visible = True
    Call IE.Navigate(Me.Website) 'Me.Feldname enthält die URL

man sollte nur drauf achten, dass das feld auch eine website enthält.... wenn es leer ist zickt er :]

thx

Bearbeitet von TOM am 21.07.2006, 08:19

Neo1010

.

Registered: May 2003
Location: -
Posts: 1212

21.07.2006 - 08:19

vielleicht funkt das:

Code:

Dim pfad as String
pfad="C:\Windows\...." 'der ie pfad
Shell(pfad & " [url]www.overclockers.at[/url]")

EndOfDayz

Little Overclocker

Registered: Oct 2004
Location: Austria
Posts: 63

21.07.2006 - 11:57

Naja du kannst ja noch abfangen ob das Feld leer ist (weiß nicht ob du mit leer einen Leerstring oder wirklich "nix" meinst)

Code:

Dim IE As Object

If IsNull(Me.Website) = False And Me.Website <> "" Then
    Set IE = CreateObject("InternetExplorer.Application")
    IE.Visible = True
    Call IE.Navigate(Me.Website) 'Me.Feldname enthält die URL
End If

Bearbeitet von EndOfDayz am 21.07.2006, 12:14

TOM Elder Oldschool OC.at'ler Registered: Nov 2000 Location: Vienna Posts: 7424	20.07.2006 - 16:28 Sers Leute... ich bräuchte in der Ferialhocken eine kleine Hilfestellung bezüglich MS Access 1: E-Mail per Knopfdruck verschicken Wie? Ich hab irgendwas mitbekommen, dass das über "MAPI" funktionieren sollte, aber ich komme nicht weiter. Ich will einfach nur einen Button haben wo man draufklickt und er holt sich von einer Tabelle die Adresse und öffnet ein Outlook-Mail (VBA Code schätze ich mal) 2: Website per Knopfdruck öffnen Wie? Ziemlich das Selbe wie oben, nur eben mit einer Website... angeblich müsste es mit einfachem Ausführ-Makro funktionieren und hinter die IEXPLORER.exe irgendwelche parameter schreiben, damit er die URL aus der Tabelle frisst tia TOM Bearbeitet von TOM am 21.07.2006, 12:48
dio Here to stay Registered: Nov 2002 Location: Graz Posts: 4938	20.07.2006 - 20:12 zu 2.: Ich hab mit Access nicht viel am Hut, vielleicht hilft es dir trotzdem: dem IE kannst du ganz einfach die zu öffnende Website als Parameter übergeben: Code: `iexplore [url]http://www.overclockers.at[/url]`
TOM Elder Oldschool OC.at'ler Registered: Nov 2000 Location: Vienna Posts: 7424	20.07.2006 - 21:11 i know, aber wie is der syntax damit er die url aus der tabelle frisst? es ist keine fixe adresse, sie ändert sich andauernd und die aktuelle die gerade angezeigt wird, soll per knopfdruck geöffnet werden
dio Here to stay Registered: Nov 2002 Location: Graz Posts: 4938	21.07.2006 - 04:05 die Adresse in ein Feld schreiben und dann auf jenes zugreifen geht sicher.
EndOfDayz Little Overclocker Registered: Oct 2004 Location: Austria Posts: 63	21.07.2006 - 04:19 Vielleicht hilft dir dieser Thread aus einem Office-Forum: KLICK MICH
TOM Elder Oldschool OC.at'ler Registered: Nov 2000 Location: Vienna Posts: 7424	21.07.2006 - 08:11 thx... das mit dem Mail funktioniert einwandfrei jetzt brauch ich nur mehr was für den browser-start :] edit: in dem forum gerade die lösung gefunden :] Wen's interessiert: Code: `Dim IE As Object Set IE = CreateObject("InternetExplorer.Application") IE.Visible = True Call IE.Navigate(Me.Website) 'Me.Feldname enthält die URL` man sollte nur drauf achten, dass das feld auch eine website enthält.... wenn es leer ist zickt er :] thx Bearbeitet von TOM am 21.07.2006, 08:19
Neo1010 . Registered: May 2003 Location: - Posts: 1212	21.07.2006 - 08:19 vielleicht funkt das: Code: `Dim pfad as String pfad="C:\Windows\...." 'der ie pfad Shell(pfad & " [url]www.overclockers.at[/url]")`
EndOfDayz Little Overclocker Registered: Oct 2004 Location: Austria Posts: 63	21.07.2006 - 11:57 Naja du kannst ja noch abfangen ob das Feld leer ist (weiß nicht ob du mit leer einen Leerstring oder wirklich "nix" meinst) Code: `Dim IE As Object If IsNull(Me.Website) = False And Me.Website <> "" Then Set IE = CreateObject("InternetExplorer.Application") IE.Visible = True Call IE.Navigate(Me.Website) 'Me.Feldname enthält die URL End If` Bearbeitet von EndOfDayz am 21.07.2006, 12:14

Access Hilfe

Forum Index > Software > Coding Stuff

TOM

dio

TOM

dio

EndOfDayz

TOM

Neo1010

EndOfDayz