freestuff.gr αρχική σελίδα
 FAQFAQ    ΑναζήτησηΑναζήτηση   Λίστα ΜελώνΛίστα Μελών   Ομάδες ΜελώνΟμάδες Μελών   <b>Εγγραφή Μέλους</b>Εγγραφή Μέλους 
 ΠροφίλΠροφίλ   Επιλογές μέλους Επιλογές   Τα bookmarks μου Τα bookmarks μου   Προσωπικά μηνύματαΠροσωπικά μηνύματα 
  διαφήμιση  

Καλώς ήρθατε στο forum μας! Για να συμμετάσχετε στις συζητήσεις θα πρέπει να είσαστε μέλος. Γίνετε μέλος τώρα!.

Πολλαπλή εκτύπωση


 Forum index » Δημιουργία Web Sites, Γραφικών & Προγραμματισμός » SQL και SQL Servers (RDBMS) » MS Access
Moderators:  Super-Moderators, WebDev Moderators
Εισαγωγή νέου Θέματος   Απάντηση στο Θέμα Σελίδα 1 από 1 [5 Μηνύματα]      Bookmarks Tags: εκτύπωση Mark the topic unread :: Προηγούμενο θέμα :: Επόμενο θέμα
ΑποστολέαςΜήνυμα
ABLADE


Μέλος από: 18 Ιουλ 2007
Μηνύματα: 110
Περιοχή: Θεσσαλονίκη
View users profile Visit posters website
ΜήνυμαΣτις: 28 Αυγ 2007 14:13    Θέμα: Πολλαπλή εκτύπωση Απάντηση με παράθεση  Mark this post and the followings unread

Πως μπορώ να τυπώνω μια έκθεση με ένα κουμπί τόσες φορές όσες λέει ένα πεδιο μίας φόρμας? Δηλαδή απο μία φόρμα που περιέχει τύπο προϊόντων και αριθμό τεμαχίων, να τυπώνω τις οδηγίες του προϊόντος τόσες φορές όσες είναι ο αριθμός τεμαχίων.

_________________
georiege


Μέλος από: 09 Ιουλ 2007
Μηνύματα: 79

View users profile Visit posters website
ΜήνυμαΣτις: 04 Οκτ 2007 18:55    Θέμα: Εκτύπωση Απάντηση με παράθεση  Mark this post and the followings unread

Καλησπέρα !

Πρέπει να γράψεις λίγο κώδικα σε VBA.

Αυτό γίνετε με τα παρακάτω βήματα :
Ας υποθέσουμε ότι το Textbox που θα δηλώνεις πόσες φορές θα
εκτυπωθεί η φόρμα σου ονομάζετε pnumber και το κουμπί που θα
πατάς για να γίνει η εκτύπωση ονομάζετε bprint.

Πατώντας δεξί κλικ επάνω στο κουμπί επιλεγείς ιδιότητες.
Επέλεξε την κατηγόρια (Συμβάν)
Πήγαινε στο συμβάν (Με το κλικ) και πάτα δεξιά ένα κουμπί με 3 τελείες που σου εμφανίζει.
Επέλεξε το (Λειτουργία δόμησης κώδικα)

Στο παράθυρο που θα σου ανοίξει για να γράψεις τον κώδικα σε (Visual Basic πλέων),
πρέπει να σου έχει έτοιμο γραμμένο το παρακάτω sub

Private Sub bprint_Click()

End Sub


Πήγαινε και πρόσθεσε την εντολή, έτσι ώστε ο κώδικας να είναι όπως παρακάτω.

Private Sub bprint_Click()

DoCmd.PrintOut ,,,,pnumber.Value

End Sub

Κλίσε το παράθυρο με την Visual Basic , κάνε Save και είσαι έτοιμος.

Εάν θέλεις μπορείς να βάλεις και έναν έλεγχο για να μην σου πετάει error εάν στο textbox δεν έχεις γράψει τίποτα ή εάν δεν έχεις γράψει αριθμό.
Οπότε ο κώδικας θα γίνει κάπως έτσι :

Private Sub bprint_Click()

If Not (pnumber.Value = "") Then
Else
Exit Sub
End If

If Not IsNumeric(pnumber.Value) Then
Exit Sub
End If


DoCmd.PrintOut ,,,,pnumber.Value

End Sub
Καλή επιτυχία

_________________
I do this for Aiur

http://www.aspx.gr
ABLADE


Μέλος από: 18 Ιουλ 2007
Μηνύματα: 110
Περιοχή: Θεσσαλονίκη
View users profile Visit posters website
ΜήνυμαΣτις: 15 Οκτ 2007 20:37    Θέμα: Απάντηση με παράθεση  Mark this post and the followings unread

Ευχαριστώ πολύ, είχα απογοητευθεί (σχεδόν είχα ξεχάσει αυτό το post). Θα το δοκιμάσω αύριο και θα σου πω αποτελέσματα.
Thanx anyway!!!!!

_________________
ABLADE


Μέλος από: 18 Ιουλ 2007
Μηνύματα: 110
Περιοχή: Θεσσαλονίκη
View users profile Visit posters website
ΜήνυμαΣτις: 17 Οκτ 2007 15:33    Θέμα: Απάντηση με παράθεση  Mark this post and the followings unread

Τελικά δούλεψε αλλά δεν βολεύει γιαυτό που θέλω να κάνω. Πρέπει να βρω άλλο τρόπο. Βασικά θέλω απο μία δευτερεύουσα φόρμα η οποία έχει τα πεδια "τύπος" και "τεμάχια" να τυπώνω με ένα κλικ τόσα φυλλάδια απο τον κάθε τύπο όσα τα τεμάχια αυτού. Σκέφτηκα μήπως να έκανα ένα ερώτημα το οποίο θαδημιουργεί τόσες εγγραφές απο κάθε τύπο όσα και τεμάχια. Γίνεται?

_________________
Programmer


Μέλος από: 22 Σεπ 2007
Μηνύματα: 67

View users profile
ΜήνυμαΣτις: 17 Οκτ 2007 23:53    Θέμα: Απάντηση με παράθεση  Mark this post and the followings unread

ABLADE ανέφερε:
Τελικά δούλεψε αλλά δεν βολεύει γιαυτό που θέλω να κάνω. Πρέπει να βρω άλλο τρόπο. Βασικά θέλω απο μία δευτερεύουσα φόρμα η οποία έχει τα πεδια "τύπος" και "τεμάχια" να τυπώνω με ένα κλικ τόσα φυλλάδια απο τον κάθε τύπο όσα τα τεμάχια αυτού. Σκέφτηκα μήπως να έκανα ένα ερώτημα το οποίο θαδημιουργεί τόσες εγγραφές απο κάθε τύπο όσα και τεμάχια. Γίνεται?


Όχι μην το κάνεις έτσι...
Αν βρω την όρεξη θα σου γράψω κώδικα σε visual basic να σου κάνει την δουλειά σου...
Δώσε όμως περισσότερες λεπτομέρειες πρώτα...

Επίσης μην ασχολέισαι με πράγματα που δεν μπορέις να κάνεις μόνος σου... γιατί μετά θα τρέχεις να βρεις άλλους να σου λύσουν τα προβλήματα (και στην περίπτωση σου δεν είναι βέβαιο ότι θα τους βρείς), με αποτέλεσμα να καθυστερέις υπερβολικά...
Εμφάνιση Μηνυμάτων:   
Εισαγωγή νέου Θέματος   Απάντηση στο Θέμα Σελίδα 1 από 1 [5 Μηνύματα] Mark the topic unread :: Προηγούμενο θέμα :: Επόμενο θέμα
 Forum index » Δημιουργία Web Sites, Γραφικών & Προγραμματισμός » SQL και SQL Servers (RDBMS) » MS Access
Τώρα είναι 18 Ιαν 2017 22:16 | All times are UTC + 2


Email This Page to Someone! add to Favorites

     Powered by p h p B B © 2001,2005 p h p B B Group
Για άμεση επικοινωνία με τον διαχειριστή του freestuff.gr στο email: freestuff.gr(παπάκι)gmail.com


Copyright © 1999-2013 Freestuff.gr All Rights Reserved  
Version Aegean, designed by N. Tsaganos