Forum

Αναζήτηση στο ms-office.gr

Πάμε!
ms-office.gr > Forum > Microsoft Access > Access - Ερωτήσεις / Απαντήσεις > [ Φόρμες ] Αυτόματη εύρεση και εισαγωγή φωτογραφίας ως hyperlink

Access - Ερωτήσεις / Απαντήσεις Access + VBA... Εδώ δεν υπάρχουν όρια!

Απάντηση στο θέμα

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 12-08-17, 02:12
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 03-10-2015
Μηνύματα: 29
Προεπιλογή Αυτόματη εύρεση και εισαγωγή φωτογραφίας ως hyperlink

Καλησπέρα! Θέλω την βοήθεια σας σε κάτι...
εχω έναν πίνακα tblblock ο οποίος εχει ένα πεδίο υπερσυνδεση με ονομα "sinimmeno" στο οποίο βάζω για κάθε εγγραφή χειροκίνητα(δεξί κλικ -> επεξεργασία υπερσυνδεσης ->αναζήτηση στον φάκελο Και διπλό κλικ στην φωτο) την διαδρομή ώστε να το συνδέσω με μια φωτογραφία, και ένα πεδίο A/A το οποίο είναι ο αύξοντας αριθμός της κάθε εγγραφής.
Οι φωτογραφίες αποθηκεύονται σε έναν φάκελο "φωτογραφιες"στον c του υπολογιστή μου έχοντας ως όνομα τον αύξοντα αριθμό της κάθε εγγραφής στην οποία αντιστοιχούν.
θέλω αν γίνετε να βάλω ένα κουμπί-εντολή στην φόρμα μου ώστε όταν το πατάω να κάνει μόνο του αναζήτηση στη συγκεκριμένη διαδρομή που θα του έχω ορίσει( δηλαδή εν προκειμένω στο "φωτογραφίες") και να καταχωρει την διαδρομή αυτόματα στο πεδίο sinimmeno.
Απάντηση με παράθεση
  #2  
Παλιά 12-08-17, 10:46
Όνομα: ΚΩΣΤΑΣ
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 24-01-2015
Μηνύματα: 15
Προεπιλογή

Εχω ακριβως τον ιδιο προβληματισμο.

Ευχαριστω για τον χρονο σας.
Απάντηση με παράθεση
  #3  
Παλιά 12-08-17, 20:54
Το avatar του χρήστη nasos23
Όνομα: ΝΑΣΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 14-10-2010
Μηνύματα: 252
Προεπιλογή

Καλησπέρα σέ όλους
Νίκο ίσως σε εξυπηρετεί αυτό:
Στο κουμπί της φόρμας με το κλίκ
Κώδικας:
Me.sinimmeno = "#c:\φωτογραφιες\" & [A/A] & ".jpg#"
Δες ένα παράδειγμα στο επισυναπτόμενο όπου υπάρχει και ο φάκελος "φωτογραφίες"
Συνημμένα Αρχεία
Τύπος Αρχείου: zip test.zip (390,7 KB, 24 εμφανίσεις)
__________________
Φιλικά, Νάσος

Τελευταία επεξεργασία από το χρήστη nasos23 : 13-08-17 στις 06:55.
Απάντηση με παράθεση
  #4  
Παλιά 14-08-17, 16:56
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 03-10-2015
Μηνύματα: 29
Προεπιλογή

το δοκίμασα αυτό με τον κώδικα στο κλικ. βάζει στο πεδίο sinimmeno τη σωστή διεύθυνση αλλά όταν πάω να ανοίξω τον υπερσυνδεσμο πατώντας πάνω του δεν κάνει τιποτα.
Απάντηση με παράθεση
  #5  
Παλιά 14-08-17, 17:23
Το avatar του χρήστη Meteora
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-12-2008
Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.017
Προεπιλογή

Καλησπέρα...
Κάνε την αλλαγή :
Παράθεση:
Private Sub Εντολή11_Click()
Me.sinimmeno = "#c:\Φωτογραφιες\" & [A/A] & ".jpg#"
Me.Requery
End Sub
Ελπίζω να βοηθηθείς / Νίκος
Απάντηση με παράθεση
  #6  
Παλιά 14-08-17, 17:51
Το avatar του χρήστη nasos23
Όνομα: ΝΑΣΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 14-10-2010
Μηνύματα: 252
Προεπιλογή

Παράθεση:
Αρχική Δημοσίευση από vala Εμφάνιση μηνυμάτων
το δοκίμασα αυτό με τον κώδικα στο κλικ. βάζει στο πεδίο sinimmeno τη σωστή διεύθυνση αλλά όταν πάω να ανοίξω τον υπερσυνδεσμο πατώντας πάνω του δεν κάνει τιποτα.
Ενοείς στη δική σου βάση ή στη δική μου;
__________________
Φιλικά, Νάσος
Απάντηση με παράθεση
  #7  
Παλιά 15-08-17, 23:32
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 03-10-2015
Μηνύματα: 29
Προεπιλογή

δοκίμασα και το Me.Requery αλλά δεν άλλαξε κάτι.
Νάσο η δική σου βάση δουλεύει όπως την εχεις αλλά δεν ξέρω τι διαφορά έχει από την δική μου.. η μονη διαφορα ειναι οτι η διαδρομή η δικιά μου (στην οποια εχω αποθηκευσει τη βδ λαι τον φάκελο φωτογραφιες) είναι στον φακελο τα εγγραφα μου.
Απάντηση με παράθεση
  #8  
Παλιά 16-08-17, 06:11
Το avatar του χρήστη nasos23
Όνομα: ΝΑΣΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 14-10-2010
Μηνύματα: 252
Προεπιλογή

Καλημέρα
Δοκίμασε:

Κώδικας:
Me.sinimmeno = "#C:\Users\Όνομα Χρήστη\Documents\φωτογραφιες\" & [A/A] & ".jpg#"
Όπου όνομα χρήστη: το όνομά σου ή όπως αλλιώς ονομάζεται ο χρήστης του υπολογιστή
__________________
Φιλικά, Νάσος
Απάντηση με παράθεση
  #9  
Παλιά 16-08-17, 09:52
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 03-10-2015
Μηνύματα: 29
Προεπιλογή

το έχω ήδη κάνει αυτό αλλά δεν λειτουργεί..η διαδρομή που βάζω είναι σωστή αλλά η access δεν το δέχεται ως hyperlink. Δηλαδή αν καταχωρησω τον hyperlink μέσω δεξί κλικ-> επεξεργασία υπερσυνδεσης και πατήσω μετά πάνω του μου εμφανίζει ένα μήνυμα (ειδοποίηση ασφαλείας) ως προς το αν θέλω να συνεχίσω και αν το θεωρώ αξιόπιστο, πατάω "ναι" και μου ανοίγει την φωτογραφία. Όταν όμως το καταχωρώ μέσω του κώδικα που μου είπες, κάνω κλικ στην υπερσυνδεση αλλά δεν κάνει τίποτα. Πιστεύω πως και λάθος διαδρομή να έβαζα πάλι θα έκανε κάτι, ίσως μου εμφάνιζε πως δεν υπάρχει αυτή η διαδρομή..
Απάντηση με παράθεση
  #10  
Παλιά 16-08-17, 12:07
Το avatar του χρήστη nasos23
Όνομα: ΝΑΣΟΣ
Έκδοση λογισμικού Office: Ms-Office 2007, Ms-Office 2013
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 14-10-2010
Μηνύματα: 252
Προεπιλογή

Καλημέρα και πάλι.
Δοκίμασε τα εξής:
1 Σε προβολή σχεδίασης της φόρμας το πεδίο sinimmeno μορφή:Είναι υπερσύνδεση επιλέγουμε ναι
2 Στη βάση σου επιλογές access (για access2007) -> Κέντρο αξιοπιστίας->Ρυθμίσεις κέντρου αξιοπιστίας->Ρυθμίσεις μακροεντολών-> Ενεργοποίηση όλων των μακροεντολών.
3 Αν δεν δουλέψει μπορείς να ανεβάσεις ένα δείγμα.
Συνημμένα Thumbnails
Αυτόματη εύρεση και εισαγωγή φωτογραφίας ως hyperlink-1.jpg   Αυτόματη εύρεση και εισαγωγή φωτογραφίας ως hyperlink-2.jpg   Αυτόματη εύρεση και εισαγωγή φωτογραφίας ως hyperlink-3.jpg  
__________________
Φιλικά, Νάσος
Απάντηση με παράθεση
Απάντηση στο θέμα

Εργαλεία Θεμάτων
Τρόποι εμφάνισης

Δικαιώματα - Επιλογές
Δε μπορείτε να δημοσιεύσετε νέα μηνύματα
Δε μπορείτε να δημοσιεύσετε απαντήσεις
Δεν μπορείτε να επισυνάψετε αρχεία
Δεν μπορείτε να επεξεργαστείτε τα μηνύματα σας

Ο κώδικας ΒΒ είναι σε λειτουργία
Τα Smilies είναι σε λειτουργία
Ο κώδικας [IMG] είναι σε λειτουργία
Ο κώδικας HTML είναι εκτός λειτουργίας
Trackbacks are εκτός λειτουργίας
Pingbacks are εκτός λειτουργίας
Refbacks are εκτός λειτουργίας


Παρόμοια Θέματα

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[ Φόρμες ] ΕΙΣΑΓΩΓΗ ΦΩΤΟΓΡΑΦΙΑΣ ΣΕ ΦΟΡΜΑ artchrist73 Access - Ερωτήσεις / Απαντήσεις 2 23-05-17 23:28
Εκτύπωση φωτογραφίας σε έκθεση dimnot Access - Ερωτήσεις / Απαντήσεις 2 18-05-16 20:43
[ Φόρμες ] Αυτόματη εύρεση ή απόδοση νέου ID gmax Access - Ερωτήσεις / Απαντήσεις 1 15-08-14 10:06
[Excel07] Αυτόματη εισαγωγή ημερομηνίας. George R Excel - Ερωτήσεις / Απαντήσεις 1 27-12-13 13:38
Ανέβασμα φωτογραφίας pm4698 Access - Ερωτήσεις / Απαντήσεις 1 30-10-10 17:08


Η ώρα είναι 08:12.