άνοιγμα αρχείου pdf με εντολή
 

καλημέρα σε όλους τους φίλους
θα ήθελα αν γνωρίζει κάποιος τον τρόπο (vba) έτσι ώστε σε ένα κουμπί να προσθέσω τον κώδικα που θα μου ανοίγει συγκεκριμένο αρχείο σε .pdf που βρίσκεται όχι στον c: αλλά στον G:\inv
ευχαριστώ εκ των προτέρων

φιλικά
Τάσος Κ.

Καλημέρα σε όλους!

Συνονόματε δοκίμασε:


Καλή συνέχεια!

Τάσος

Φίλε Τάσο
ευχαριστώ πάρα πολύ, δούλεψε με την πρώτη περίπτωση δηλαδή με

Private Sub cmdOpenPDF_Click()

Dim OpenFile As Long
OpenFile = ShellExecute(0, "open", "G:\inv\Mypdf.pdf", "", "C:\", SW_SHOWNORMAL)

End Sub

προσπάθησα όμως αντί του Mypdf.pdf στο Mypdf να παίρνει το όνομα (τιμή) από τη φόρμα μου
FORMS! ΤΙΜΟΛΟΓΙΑ ΠΩΛΗΣΗΣ ! inv_No
μήπως πρέπει να κάνω διαφορετική σύνταξη ή ορθογραφία?

ευχαριστώ και πάλι για την πολύτιμη βοήθεια σου
Τάσος

Καλησπέρα

Η σύνταξη καλή είναι, αλλά εκείνο το κενό που έχεις στο όνομα της φόρμας σου μπορεί να σταθεί εμπόδιο στη λύση που ζητάς τώρα ή αργότερα. Δοκίμασε βάζοντάς το ανάμεσα σε [ ] ή άλλαξε όνομα στη φόρμα σου.
Καλού -κακού ανέβασε ΟΛΗ τη γραμμή της ShellExecute(...)
Με εκτίμηση
Νίκος Δ.

Δοκίμασε:

MyFile = Forms![ΤΙΜΟΛΟΓΙΑ ΠΩΛΗΣΗΣ]![inv_No]

Αν το κουμπί που τρέχει τον κώδικα και το πεδίο [inv_No] βρίσκονται στην ίδια φόρμα τότε:

MyFile = Me![inv_No]

Σε κάθε περίπτωση φρόντισε να μην υπάρχουν κενά στην αρχή και στο τέλος των ονομάτων.

Καλή συνέχεια!

Τάσος

δυστυχώς φίλοι μου αν και άλλαξα το όνομα της φόρμας είτε με

Private Sub ÅíôïëÞ40_Click()
Dim OpenFile As String
OpenFile = ShellExecute(0, "open", "G:\inv\forms![invoices]![inv_No].pdf", "", "C:\", SW_SHOWNORMAL)
End Sub

είτε με Private Sub ÅíôïëÞ40_Click()
Dim OpenFile As String
OpenFile = ShellExecute(0, "open", "G:\inv\Me![inv_No].pdf", "", "C:\", SW_SHOWNORMAL)
End Sub

δεν δουλεύει. Μόνο αν βάλω συγκεκριμένη τιμή μέσα από την vba δουλεύει

Δοκίμασε αυτό :
ή καλύτερα φρόντισε να κάνεις χρήση της τεχνικής που με τα πράσινα γράμματα παρουσίασε ο Τάσος στο πρώτο μήνυμά του.

περιμένουμε την εξέλιξη...

Νίκος Δ

Υστερολόγιο : το πεδίο [inv_no] τι περιέχει ; τι θα γίνει αν η εφαρμογή τρέξει σε υπολογιστή που δεν έχει G;

κύριοι σας ευχαριστώ πολύ δουλεύει τέλεια μετά τη τελευταία προσθήκη
φιλικά
Τάσος

Νίκο
το πεδίο inv_No είναι αριθμός ο οποίος παραπέμπει στο G: ( που είναι flash memory) όπου έχω αποθηκευμένα τα αντίστοιχα τιμολόγια σε μορφή pdf. Μπήκα σε αυτή τη διαδικασία γιατί πολλές φορές μέσα από τη βάση χρειάζεται να ανοίξω και το τιμολόγιο στην κανονική του μορφή έτσι όπως έχει αποθηκευτεί.
Σε ευχαριστώ και πάλι για τη βοήθεια σου
Τάσος

Καλησπέρα...

επισυνάπτω μια λύση που χρησιμοποιώ αρκετά σε ότι αφορά συνδεδεμένα αρχεία μέσα στην access...

Νομίζω είναι αυτό που ψάχνεις...