
17-05-10, 18:28
|
 | Συντονιστής Όνομα: Νίκος Έκδοση λογισμικού Office: Ms-Office 2007 Γλώσσα λογισμικού Office: Ελληνική | | Εγγραφή: 28-12-2008 Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.033
| |
Καλησπέρα και απο εδώ ...
Σταύρο, ρίξε μια ματιά στο επισυναπτόμενο αρχείο και τα ...ξαναλέμε ! Αξίζει τον κόπο να δείτε την διαδικασία με την οποία περνάς παραμέτρους σε έκθεση :
ΒΗΜΑ 1ο Φτιάχνουμε μια module και γράφουμε τα παρακάτω Κώδικας:
Option Compare Database
Option Explicit
Public Titlos As String ΒΗΜΑ 2ο
Στην ίδια module, Κώδικας: Public Function FTitlos()
With CurrentDb.OpenRecordset("pinakas2", 4) 'το 4 αφορά κατάσταση ΜΟΝΟ για διάβασμα
.MoveFirst
FTitlos = !onomatameiou & " " & !dieftinsi &" "& !tilephono
End With
End Function
Αυτή η συνάρτηση βρίσκει το 1ο Record ενός πίνακα και διαβάζει τα περιεχόμενα τριών πεδίων, τα οποία και ενώνει. Θα μπορούσαμε σε αυτό το στάδιο να γράψουμε FTitlos= "Καλαμπάκα" ή ότι άλλο και να περαστεί έτσι όποια παράμετρος θέλουμε στην έκθεση. ΒΗΜΑ 3ο Σε ένα πλαίσιο κειμένου κάπου στο Report, υπάρχει ως ‘Προέλευση στοιχείου ελέγχου’ το: Αυτό ήταν ! Δείτε το στο επισυναπτόμενο αρχείο το οποίο αντικατέστησα...διότι δεν είχε καμιά λογική αυτό που είχα πριν. Τουλάχιστον τώρα, έστω και αν το περιεχόμενο δεν δώσει λύση στον φίλο μας Σταύρο, είναι βέβαιο οτι θα βοηθήσει άλλα μέλη & επισκέπτες Φιλικά / Νίκος Δ.
Τελευταία επεξεργασία από το χρήστη Meteora : 18-05-10 στις 15:36.
|