Εμφάνιση ενός μόνο μηνύματος
  #10  
Παλιά 17-05-10, 18:28
Το avatar του χρήστη Meteora
Meteora Ο χρήστης Meteora δεν είναι συνδεδεμένος
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού 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, υπάρχει ως ‘Προέλευση στοιχείου ελέγχου’ το:
Κώδικας:
=FTitlos()
Αυτό ήταν !

Δείτε το στο επισυναπτόμενο αρχείο το οποίο αντικατέστησα...διότι δεν είχε καμιά λογική αυτό που είχα πριν. Τουλάχιστον τώρα, έστω και αν το περιεχόμενο δεν δώσει λύση στον φίλο μας Σταύρο, είναι βέβαιο οτι θα βοηθήσει άλλα μέλη & επισκέπτες
Φιλικά / Νίκος Δ.
Συνημμένα Αρχεία
Τύπος Αρχείου: zip test_reports.zip (24,1 KB, 34 εμφανίσεις)

Τελευταία επεξεργασία από το χρήστη Meteora : 18-05-10 στις 15:36.
Απάντηση με παράθεση