Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Hyperlink öffnen bzw. im Formular einfügen
zurück: Formular mit mehreren Datensätzen verschiedener Tabellen weiter: Verknüpfung Hauptformular und Unterformular via Button 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
gm
Access-Einsteiger


Verfasst am:
27. Apr 2007, 08:50
Rufname:

Hyperlink öffnen bzw. im Formular einfügen - Hyperlink öffnen bzw. im Formular einfügen

Nach oben
       Version: Office 97

Hallo zusammen,

folgendes Problem:

In einer Abfrage generiere ich einen Dateinamen und möchte diesen - zusammen mit einem Pfad - in einem Formular als Hyperlink anzeigen. Ein Tabellenfeld habe und möchte ich dafür nicht generieren.

Gibt es eine Möglichkeit den Ausdruck "Dateiname" in einem Formular als Hyperlink anzuzeigen?

Falls nicht, wie könnte ich den Link mit Hilfe eines Buttons öffnen? Der Befehl FollowHyperlink funktioniert bei mir nicht (Access97).

Danke für Eure Hilfe!

_________________
Gruss
Markus
JörgG
Access-Team


Verfasst am:
27. Apr 2007, 10:08
Rufname:
Wohnort: b. Dresden


AW: Hyperlink öffnen bzw. im Formular einfügen - AW: Hyperlink öffnen bzw. im Formular einfügen

Nach oben
       Version: Office 97

Hallo,

die berechnete Spalte in der Abfrage ist "nur" ein Textfeld. Du kannst es im Formular ja so formatieren das es wie ein Hyperlink aussieht und beim Klicken:
Code:
Private Sub TxtFldHyperlink_Click()
    Application.FollowHyperlink Me!TxtFldHyperlink
End Sub

Edit: Embarassed Office97, jetzt hab ich's auch gelesen . . . sind das immer die gleichen Dateitypen (zB .xls), dann könnte Shell() bzw ShellExecute() weiterhelfen.
Shell() ist oft zickig wenn Leerzeichen im Namen vorkommen (zB D:\Eigene Dateien\...), hier musst Du den Namensstring in Chr(34) & Pfadname & Chr(34) verpacken.

_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.


Zuletzt bearbeitet von JörgG am 27. Apr 2007, 10:17, insgesamt einmal bearbeitet
gm
Access-Einsteiger


Verfasst am:
27. Apr 2007, 10:16
Rufname:

AW: Hyperlink öffnen bzw. im Formular einfügen - AW: Hyperlink öffnen bzw. im Formular einfügen

Nach oben
       Version: Office 97

Hallo Jörg,

es handelt sich entweder um *.pdf oder *.tif.

btw: Es ist schon schlimm wenn man mit Office97 arbeiten muss. ;)

_________________
Gruss
Markus
JörgG
Access-Team


Verfasst am:
27. Apr 2007, 10:36
Rufname:
Wohnort: b. Dresden

AW: Hyperlink öffnen bzw. im Formular einfügen - AW: Hyperlink öffnen bzw. im Formular einfügen

Nach oben
       Version: Office 97

Hallo,

na ja, die höheren Versionen haben auch ihre Macken Very Happy , probiere es doch mal so:
Code:
Private Sub TxtFldHyperlink_Click()
    Call Shell(Chr(34) & Me!TxtFldHyperlink & Chr(34), 3)
End Sub
Man kann auch das Programm mitgeben:
Code:
Private Sub TxtFldHyperlink_Click()
    Dim strProg As String, strDatei As String
   
    strProg = "C:\Programme\Adobe\Acrobat 7.0\Reader\AcroRd32.exe"
    strDatei = "D:\Eigene Dateien\Deine.pdf"   'bzw = Me!TxtFldHyperlink
    If Right(strDatei, 3) = "pdf" Then
        Call Shell(Chr(34) & strProg & Chr(34) & Chr(32) & Chr(34) & _
                   strDatei & Chr(34), 3)
      ElseIf Right(strDatei, 3) = "tif" Then
        'mit *.tif
      Else
        MsgBox "Kein Programm mit Datei verknüpft" 'irgendeine Meldung
    End If
End Sub

_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.
gm
Access-Einsteiger


Verfasst am:
27. Apr 2007, 11:54
Rufname:


AW: Hyperlink öffnen bzw. im Formular einfügen - AW: Hyperlink öffnen bzw. im Formular einfügen

Nach oben
       Version: Office 97

gm am 27. Apr 2007 um 11:38 hat folgendes geschrieben:
Danke, Jörg.
Das hilft mir weiter!

Sorry, ich war etwas voreilig.

Ich habe jetzt ein Textfeld erstellt und diesem zum Test den Inhalt ="D:\test\006-0991.pdf" zugewiesen.

Wenn ich jetzt draufklicke, passiert folgendes:
Code:
Private Sub tf_hyperlink_Click()
    Call Shell(Chr(34) & Me![tf_hyperlink] & Chr(34), 3)
End Sub
mit der Fehlermeldung
Zitat:
Laufzeitfehler '5': Unzulässiger Prozeduraufruf oder ungültiges Argument
Was habe ich falsch gemacht?
_________________
Gruss
Markus
JörgG
Access-Team


Verfasst am:
27. Apr 2007, 15:57
Rufname:
Wohnort: b. Dresden

AW: Hyperlink öffnen bzw. im Formular einfügen - AW: Hyperlink öffnen bzw. im Formular einfügen

Nach oben
       Version: Office 97

Hallo,

gibt es die Datei an besagtem Ort? Probiere mal den:
Code:
Private Sub tf_hyperlink_Click()
    Call Shell("D:\test\006-0991.pdf", 3)
End Sub

_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.
gm
Access-Einsteiger


Verfasst am:
27. Apr 2007, 16:29
Rufname:

AW: Hyperlink öffnen bzw. im Formular einfügen - AW: Hyperlink öffnen bzw. im Formular einfügen

Nach oben
       Version: Office 97

Hi,

habe ich versucht.

Wenn der Pfad nicht stimmt bzw. die Datei nicht gefunden wird, kommt eine entsprechende Meldung. Sobald alles stimmt, kommt wieder die gleiche Fehlermeldung.

Sad

_________________
Gruss
Markus
JörgG
Access-Team


Verfasst am:
27. Apr 2007, 19:26
Rufname:
Wohnort: b. Dresden

AW: Hyperlink öffnen bzw. im Formular einfügen - AW: Hyperlink öffnen bzw. im Formular einfügen

Nach oben
       Version: Office 97

Hallo,

gib das Programm mit:
Code:
Private Sub tf_hyperlink_Click()
    Dim strProg As String, strDatei As String
   
    On Error Resume Next
    strProg = "C:\Apps32\AdobeReader7.0\Reader\AcroRd32.exe"
    strDatei = "Deine.pdf"
    Call Shell(Chr(34) & strProg & Chr(34) & Chr(32) & Chr(34) & _
               strDatei & Chr(34), 3)
    If Err > 0 Then MsgBox "Datei oder Programm nicht gefunden!"
    On Error Goto 0
End Sub
Gerade noch mal getestet, das klappt (Programmpfad noch anpassen).
_________________
MfG, Jörg Very Happy

Bitte das Feedback nicht vergessen.
Gast



Verfasst am:
30. Apr 2007, 07:58
Rufname:


AW: Hyperlink öffnen bzw. im Formular einfügen - AW: Hyperlink öffnen bzw. im Formular einfügen

Nach oben
       Version: Office 97

Das funktioniert jetzt auch! Smile

Vielen Dank, Jörg.
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: kreuzabfrage ausführen nach vorgeschaltetem formular mit kom 4 Gast 887 21. Dez 2004, 15:17
Gast kreuzabfrage ausführen nach vorgeschaltetem formular mit kom
Keine neuen Beiträge Access Tabellen & Abfragen: Create View bzw. Abfrage 1 Hedonist 899 17. Dez 2004, 12:07
lothi Create View bzw. Abfrage
Keine neuen Beiträge Access Tabellen & Abfragen: Formeln vom Formular, werden in der Abfrage nicht angezeigt 4 maddes 895 23. Nov 2004, 12:38
Skogafoss Formeln vom Formular, werden in der Abfrage nicht angezeigt
Keine neuen Beiträge Access Tabellen & Abfragen: In Abfrage nachträglich neue Tabelle einfügen 2 Chris79 498 13. Okt 2004, 22:18
Gast In Abfrage nachträglich neue Tabelle einfügen
Keine neuen Beiträge Access Tabellen & Abfragen: Aktionsabfrage in Formular -immer nur einen Datensatz ändern 6 blauvogel 1092 08. Okt 2004, 11:43
Skogafoss Aktionsabfrage in Formular -immer nur einen Datensatz ändern
Keine neuen Beiträge Access Tabellen & Abfragen: Zeile der Dateneingabe (*) in einem Formular verschieben 2 Albertus 790 08. Okt 2004, 09:17
Albertus Zeile der Dateneingabe (*) in einem Formular verschieben
Keine neuen Beiträge Access Tabellen & Abfragen: Suchfunktion mit mehreren Kriterien aus Formular 5 Danny G. 2218 09. Sep 2004, 11:08
Danny G. Suchfunktion mit mehreren Kriterien aus Formular
Keine neuen Beiträge Access Tabellen & Abfragen: Tabelle, Formular, Abfrage...und nun ? 3 Gags 790 29. Aug 2004, 22:05
lothi Tabelle, Formular, Abfrage...und nun ?
Keine neuen Beiträge Access Tabellen & Abfragen: Abfragefeld nachträglich in Formular 3 Sebbl 1705 05. Aug 2004, 15:14
mabe38 Abfragefeld nachträglich in Formular
Keine neuen Beiträge Access Tabellen & Abfragen: Formular aus Endlosformular öffnen ? 10 G-Markus 1619 20. Jul 2004, 15:38
Gast Formular aus Endlosformular öffnen ?
Keine neuen Beiträge Access Tabellen & Abfragen: Bilder in Access einfügen? 12 Lord Raydenor 3016 18. Mai 2004, 12:41
Lord Raydenor Bilder in Access einfügen?
Dieses Thema ist gesperrt, du kannst keine Beiträge editieren oder beantworten. Access Tabellen & Abfragen: Mehrmalige Abfrage durch Formular 11 Wickiman 897 03. Mai 2004, 15:23
Willi Wipp Mehrmalige Abfrage durch Formular
 

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