WinForms

Απ: barcode scanner - reader

Parhs88 — Sun, 24 Feb 2013 11:10:22 GMT

Εγω εχω κανει κατι αντιστοιχο με της MOTOROLA το LS2208 που ειναι τζαμι.

Εχω χρησιμοποιησει OPOS driver (οποιος θελει λεπτομερειες ας ρωτησει) σε συνδιασμο με ενα event aggregator /messagebus pattern στην εφαρμογή .Ετσι οταν ερχεται κατι στο σκαννερ παει παντου οπου θελω. Εχω δει αλλες υλοποιησεις που ειχαν κανει χωριστο προγραμμα server για το scanner που το ακουγε με σειριακή!

Απ: barcode scanner - reader

Libra Storm — Wed, 13 Feb 2013 23:33:55 GMT

Unhook Κάνεις;
Είσαι σίγουρος ότι ο Mr. GC δεν το μαζεύει;
Είναι global το HookProc;

Δες τα παρακάτω links.

http://msdn.microsoft.com/en-us/library/windows/desktop/ms644960(v=vs.85).aspx

http://support.microsoft.com/kb/318804

και μιά που "έμπλεξες" με API έχε και αυτό το site γιά reference.

http://www.pinvoke.net/

Απ: barcode scanner - reader

evagelos — Thu, 07 Feb 2013 07:02:57 GMT

Mετά απο αρκετή χρήση, σε κάποια χρονική στιγμή (δεν έχω βρει το πότε), σταματάει να κάνει hook το input απο το barcode reader.

Στην αρχή σκέφτηκα ότι επειδή έπεφτε η σύνδεση του ιντερνετ αλλα δεν είναι αυτό γιατί το ελεγχο αυτό με το "OPENCONNECTION()"

καμια πρόταση για το τι πρέπει να κοιτάξω;

Απ: barcode scanner - reader

Libra Storm — Sat, 26 Jan 2013 05:51:21 GMT

evagelos:
Σε ευχαριστώ για την απάντηση.κανα δυο ερωτήσεις που δεν κατάλαβα

Καταρχήν έκανα και μια αλλαγή

Εβαλα το myval = ""; στο finally για να μηδενίζει παντα.

Ερωτήσεις:

1) λες: cast εφόσον δεν έχει DBNull. Αν έχει System.DBNull.Value ως τιμή ακόμα και το Convert.ToInt16 θα σκάσειcast εφόσον δεν έχει DBNull. Αν έχει System.DBNull.Value ως τιμή ακόμα και το Convert.ToInt16 θα σκάσει

το πεδίο που καλώ είναι το ID του πινακα. Πρέπει να κάνω και εκεί DBNull;

- Εννοώ ότι από την στιγμή που κάποιο πεδίο του πίνακα σου δέχεται NULL τιμές δεν μπορείς να κάνεις cast στον τύπο τον οποίον περιέχει ( int, string κλπ ) γιατί θα σου βγάλει μήνυμα λάθους στις περιπτώσεις που η τιμή από την DataBase είναι NULL.
- O τύπος

- System.DBNull.Value

- απλά εκφράζει την τιμή NULL που παίρνεις από την βάση σου σε τύπο του .net.

- Στην περίπτωση που έχεις ID θα ήταν λάθος σχεδιασμού του πίνακα να το κάνεις να δέχεται NULL τιμές.

2) λες: IDbConnection, IDbCommand κλπ. IDbConnection, IDbCommand κλπ.

Οταν έχω mssql μια εντολή είναι isnull και στην mysql είναι ifnull. το IDBCommand με καλύπτει;

- Δεν καταλαβαίνω την ερώτηση σου. Το IDbCommand είναι Interface, αν εννοείς την περίπτωση στην οποία εκτελείται το command ως Query, τότε θα πάρεις τις τιμές τις οποίες θέλεις από το select, είτε είναι isnull, ifnull ανάλογα με την βάση.
- Επίσης θα ήταν καλό όλα αυτά να είναι functions στο Database layer και να γυρίζουν την σωστή σύνταξη ανά περίπτωση (ISNULL σε SQL, IFNULL σε MySQL, NVL σε Oracle κλπ ).

- Πιστεύω ότι θα σε βοηθήσει καλύτερα το παρακάτω παράδειγμα, η 1η Open γυρνάει interface ανάλογα με το τι Database type έχεις δηλώσει ( ίσως σε κάποιο config file με το αντίστοιχο connection string ), το 2ο δουλεύει με generics.
- Και στις 2 περιπτώσεις χρησιμοποιείς το αντίστοιχο Interface.

-Ας μην σου φαίνεται παρατραβηγμένη η υλοποίηση γιατί θα είναι κρίμα να χάσεις δουλειά επειδή ο χ πελάτης έχει ήδη SQL ή κάποια άλλη βάση γιατί δεν αναφέρομαι μόνο στο συγκεκριμένο project αλλά γενικότερα.
    public partial class Form1 : Form
    {
        private static DatabaseType _dbType = DatabaseType.SQL;

        public Form1()
        {
            InitializeComponent();
        }

        public static enum DatabaseType
        {
            OleDb,
            SQL,
            MySQL,
        }

        public static IDbConnection Open(string connectionString) 
        {
            IDbConnection con = null;

            switch (_dbType)
            {
                case DatabaseType.OleDb:
                    con = new System.Data.OleDb.OleDbConnection(connectionString);
                    break;
                case DatabaseType.SQL:
                    con = new System.Data.SqlClient.SqlConnection(connectionString);
                    break;
                case DatabaseType.MySQL:
                    // TODO
                    break;
            }

            con.Open();

            return con;
        }

        public static TConnection Open<TConnection>(string connectionString) 
            where TConnection : IDbConnection, new()
        {
            TConnection con = new TConnection();

            con.ConnectionString = connectionString;
            con.Open();

            return con;
        }
    }

Απ: barcode scanner - reader

evagelos — Thu, 24 Jan 2013 21:41:42 GMT

Σε ευχαριστώ για την απάντηση.κανα δυο ερωτήσεις που δεν κατάλαβα

Καταρχήν έκανα και μια αλλαγή

Εβαλα το myval = ""; στο finally για να μηδενίζει παντα.

Ερωτήσεις:

1) λες: cast εφόσον δεν έχει DBNull. Αν έχει System.DBNull.Value ως τιμή ακόμα και το Convert.ToInt16 θα σκάσειcast εφόσον δεν έχει DBNull. Αν έχει System.DBNull.Value ως τιμή ακόμα και το Convert.ToInt16 θα σκάσει

το πεδίο που καλώ είναι το ID του πινακα. Πρέπει να κάνω και εκεί DBNull;

2) λες: IDbConnection, IDbCommand κλπ. IDbConnection, IDbCommand κλπ.

Οταν έχω mssql μια εντολή είναι isnull και στην mysql είναι ifnull. το IDBCommand με καλύπτει;

Libra Storm:

       public void MyKeyDown(object sender, KeyEventArgs e) // <- DeviceKeyDown ή DeviceCallBack ή ότι άλλο θες, προτείνω όχι my.
        {
            string value = "";
            // <- Κενό
            if (e.KeyValue >= ((int)Keys.NumPad0) && e.KeyValue <= ((int)Keys.NumPad9))
            { // numpad <- Θα ξεμείνεις από χαρτί στον εκτυπωτή;
                value = Convert.ToInt16(e.KeyValue - ((int)Keys.NumPad0)).ToString(); // Convert.ToInt16;
            }
            else if (e.KeyValue >= ((int)Keys.D0) && e.KeyValue <= ((int)Keys.D9))
            { 
                // regular numbers
                value = Convert.ToInt16(e.KeyValue - ((int)Keys.D0)).ToString();
            }
            else // Έχεις ήδη φιλτράρει μόνο γιά νούμερα.
            {
                myval = ""; // αν είναι private εγώ βάζω _myval.
                myTimeStart = DateTime.Now; // _

                return;
            }

            // Δεν χρειάζεται αυτός ο έλεγχος, θα γίνει return αν δεν είναι νούμερο στο else που βάλαμε, 
            // από την στιγμή που το barcode έχει μόνο Νούμερα.

            //if (chkNumber(value) == true)
            //{
            //    myval = myval + value;
            //    if (myval.Length == 1)
            //        myTimeStart = DateTime.Now;
            //}
            //else
            //{
            //    myval = "";
            //    myTimeStart = DateTime.Now;
            //}

            myval = myval + value; // myval += value;

            if (myval.Length == 1)
            {
                myTimeStart = DateTime.Now;
            }
            else if (myval.Length == barLength)
            {
                myTimerStop = DateTime.Now;
                TimeSpan span = myTimerStop - myTimeStart; // ή stopwatch όπως σωστά ανέφερε ο Παναγιώτης.

                if (this.OpenConnection() == true) // if (this.OpenConnection()) 
                {
                    try
                    {
                        if (loadtrdrObj(myval) == true) // if (loadtrdrObj(myval))
                        {
                            if (span.TotalMilliseconds < 100)
                            {
                                if (SaveData() == 1) // if (SaveData() > 0), αλλιώς αν θέλεις 0 ή 1 τότε γύρνα bool.
                                {
                                    RemTB.Text = "Μαθητής: " + myCustomer.Name + Environment.NewLine +
                                        "Level: " + myCustomer.Level + Environment.NewLine +
                                        "Σχόλια: " + myCustomer.Remarks + Environment.NewLine +
                                        "Ωρα: " + DateTime.Now + Environment.NewLine +
                                        "Τελ. Ημ/νία Πληρωμής: " + myCustomer.LastPayDate;
                                    
                                    // RemTB; txtStudent.Text (textBox), lblStudent.Text (label), cmd or btn (Button) κλπ.
                                    
                                    //positioncontrols();
                                    //this.Activate(); // γιατί μόνο σε αυτό this;
                                    //onePing();

                                    // είτε

                                    this.positioncontrols();
                                    base.Activate(); // ή this
                                    this.onePing();
                                }
                            }

                            myval = "";
                        }
                        else
                        {
                            // /n/n ?. /n = Unix, /r = Old MacOS /r/n = Windows.
                            MessageBox.Show("Δεν βρέθηκε μαθητής με αυτό το Barcode\n\n" + myval,
                                "Λάθος", 
                                MessageBoxButtons.OK, 
                                MessageBoxIcon.Error);
                        }
                    }
                    catch (MySqlException ex)
                    {
                        MessageBox.Show(ex.ToString());
                    }
                    finally
                    {
                        this.CloseConnection();
                    }
                }
                else
                {
                    MessageBox.Show("Δεν υπάρχει σύνδεση!!!");
                }
            }
        }

        private void positioncontrols() // <- PositionControls() ή καλυτερα CenterForm()
        {
            Rectangle rect = Screen.PrimaryScreen.WorkingArea;

            //Divide the screen in half, and find the center of the form to center it
            this.Top = (rect.Height / 2) - (this.Height / 2); // this.Top = (rect.Height - this.Height) / 2;
            this.Left = (rect.Width / 2) - (this.Width / 2);
        }

        private bool chkNumber(string chk) // <- CheckNumber ή IsNumber (string checkString)
        {
            double number;
            CultureInfo culture = CultureInfo.CreateSpecificCulture("el-GR"); // γιατί el-GR; Εγώ έχω en-US δεν θα μου κάνει σωστή μετατροπή.
            NumberStyles style = NumberStyles.Number;

            //if (Double.TryParse(chk, style, culture, out number)) 
            //    return true;
            //else
            //    return false;

            return Double.TryParse(chk, style, culture, out number);
        }

        private bool loadtrdrObj(string barcode) // Τα ονόματα των functions πρέπει να είναι κατανοητά.
        {
            bool found = false;

            string SQLtrdr = "select t.company, t.trdr, t.name, ifnull(t.epipedo, 0)level, " +
                 "(select date from trans where trdr = t.trdr and type=2 order by date desc limit 1) trndate, " +
                 "ifnull(t.remarks,'') remarks " +
                 "from trdr t " +
                 "where t.barcode = @barcode";

            // Caps προτείνω
            string SQLtrdrCAPS = "SELECT t.company, t.trdr, t.name, IFNULL(t.epipedo, 0) level, " + 
                 "(SELECT date FROM trans WHERE trdr = t.trdr AND type = 2 ORDER BY date DESC limit 1) trndate, " +
                 "IFNULL(t.remarks,'') remarks " +
                 "FROM trdr t " +
                 "WHERE t.barcode = @barcode";

            MySqlCommand cmd = new MySqlCommand(SQLtrdr, connection);
            cmd.Parameters.AddWithValue("@barcode", barcode);

            DataTable dt = new DataTable(); // ή Using

            MySqlDataReader dataReader = cmd.ExecuteReader();

            dt.Load(dataReader);

            if (dt.Rows.Count > 0)
            {
                Customer myCust = new Customer
                    (
                        (Int16)(dt.Rows[0]["company"]), // cast εφόσον δεν έχει DBNull. Αν έχει System.DBNull.Value ως τιμή ακόμα και το Convert.ToInt16 θα σκάσει.
                        Convert.ToInt32(dt.Rows[0]["trdr"]), // Το ίδιο
                        dt.Rows[0]["name"].ToString(), // << >>
                        Convert.ToInt16(dt.Rows[0]["level"]), 
                        Convert.ToDateTime(dt.Rows[0]["trndate"]),
                        dt.Rows[0]["remarks"].ToString()
                    );

                myCustomer = myCust;

                found = true;
            }
            //else
            //{
            //    found = false; // Ok αλλά είναι ήδη false
            //}
            //close Data Reader // πλεονασμός
            dataReader.Close(); // το βλέπουμε τι κάνει
            dt.Dispose(); // end using

            return found; // bFound
        }

        /*
         * Το πιό σημαντικό είναι ότι πρέπει να απομονώσεις τελείως τις συναρτήσεις που έχουν να κάνουν με το ADO (SaveData, CloseConnection κλπ).
         * Φτιάξε ένα DLL και βάλε εκεί ότι έχει να κάνει με την βάση.
         * Έτσι θα φτιάξεις μία βιβλιοθήκη που θα χρησιμοποιείς σε κάθε project και θα κάνεις την δουλειά σου καλύτερα και γρήγορα.
         * Επίσης μην ξεχνάς ότι το ADO σου δίνει την δυνατότητα να το διαχειρίζεσαι μέσα από τα Interfaces που σου δίνει.
         * π.χ IDbConnection, IDbCommand κλπ.
         * Έτσι θα μπορείς να παραμετροποιείς τις εφαρμογές που θα φτιάξεις στο μέλλον με τέτοιον τρόπο που θα μπορείς να
         * κάνεις connect σε όλες τις βάσεις δεδομένων, MySQL, SQL, Oracle κλπ χρησιμοποιώντας τον ίδιο κώδικα.
         */
        private int SaveData()
        {
            string SQLtrdr = "";
            // int r = 0;
            SQLtrdr = "INSERT INTO trans(company, date, trdr, type, insdate, upddate) VALUES (@company, @date, @trdr, @type, @insdate, @upddate)";
            MySqlCommand myCommand = new MySqlCommand();

            myCommand.Parameters.AddWithValue("@company", myCustomer.Company);
            myCommand.Parameters.AddWithValue("@date", DateTime.Now);
            myCommand.Parameters.AddWithValue("@trdr", myCustomer.Trdr);
            myCommand.Parameters.AddWithValue("@type", 999);
            myCommand.Parameters.AddWithValue("@insdate", DateTime.Now);
            myCommand.Parameters.AddWithValue("@upddate", DateTime.Now);

            myCommand.CommandText = SQLtrdr;
            myCommand.Connection = connection; // Το connection είναι συνέχεια ανοικτό; 
                                               // Αν ναι σου προτείνω να το ανοίγεις και να το κλείνεις κάθε φορά.
            // r = myCommand.ExecuteNonQuery();

            return myCommand.ExecuteNonQuery();

            //if (r > 0)
            //{
            //    return 1;
            //}
            //else
            //{
            //    return 0;
            //}

            // Να χρησιμοποιείς ένα στυλ σε τέτοιες περιπτώσεις όπως π.χ. 
            // στο αν θα βάζεις Curly Brackets σε conditions με μία πρόταση στο if ή στο else
            // γιατί πριν λες:

            //if (Double.TryParse(chk, style, culture, out number)) 
            //    return true;
            //else
            //    return false;
                      
        }

        public void onePing() // ή και public static void αν χρησιμοποιείται και από αλλού.
        {
            SystemSounds.Asterisk.Play();
        }

Και τέλος, δεν είναι δύσκολο να περάσεις σε  framework 4.0, επίσης υπάρχουν variable length barcode formats που αναγνωρίζουν και ASCII τα οποία είναι πιό βολικά και αναγνώσιμα από νούμερα όπως το 128B.

Καλή επιτυχία στο project σου.

Απ: barcode scanner - reader

Libra Storm — Fri, 04 Jan 2013 09:37:22 GMT

       public void MyKeyDown(object sender, KeyEventArgs e) // <- DeviceKeyDown ή DeviceCallBack ή ότι άλλο θες, προτείνω όχι my.
        {
            string value = "";
            // <- Κενό
            if (e.KeyValue >= ((int)Keys.NumPad0) && e.KeyValue <= ((int)Keys.NumPad9))
            { // numpad <- Θα ξεμείνεις από χαρτί στον εκτυπωτή;
                value = Convert.ToInt16(e.KeyValue - ((int)Keys.NumPad0)).ToString(); // Convert.ToInt16;
            }
            else if (e.KeyValue >= ((int)Keys.D0) && e.KeyValue <= ((int)Keys.D9))
            { 
                // regular numbers
                value = Convert.ToInt16(e.KeyValue - ((int)Keys.D0)).ToString();
            }
            else // Έχεις ήδη φιλτράρει μόνο γιά νούμερα.
            {
                myval = ""; // αν είναι private εγώ βάζω _myval.
                myTimeStart = DateTime.Now; // _

                return;
            }

            // Δεν χρειάζεται αυτός ο έλεγχος, θα γίνει return αν δεν είναι νούμερο στο else που βάλαμε, 
            // από την στιγμή που το barcode έχει μόνο Νούμερα.

            //if (chkNumber(value) == true)
            //{
            //    myval = myval + value;
            //    if (myval.Length == 1)
            //        myTimeStart = DateTime.Now;
            //}
            //else
            //{
            //    myval = "";
            //    myTimeStart = DateTime.Now;
            //}

            myval = myval + value; // myval += value;

            if (myval.Length == 1)
            {
                myTimeStart = DateTime.Now;
            }
            else if (myval.Length == barLength)
            {
                myTimerStop = DateTime.Now;
                TimeSpan span = myTimerStop - myTimeStart; // ή stopwatch όπως σωστά ανέφερε ο Παναγιώτης.

                if (this.OpenConnection() == true) // if (this.OpenConnection()) 
                {
                    try
                    {
                        if (loadtrdrObj(myval) == true) // if (loadtrdrObj(myval))
                        {
                            if (span.TotalMilliseconds < 100)
                            {
                                if (SaveData() == 1) // if (SaveData() > 0), αλλιώς αν θέλεις 0 ή 1 τότε γύρνα bool.
                                {
                                    RemTB.Text = "Μαθητής: " + myCustomer.Name + Environment.NewLine +
                                        "Level: " + myCustomer.Level + Environment.NewLine +
                                        "Σχόλια: " + myCustomer.Remarks + Environment.NewLine +
                                        "Ωρα: " + DateTime.Now + Environment.NewLine +
                                        "Τελ. Ημ/νία Πληρωμής: " + myCustomer.LastPayDate;
                                    
                                    // RemTB; txtStudent.Text (textBox), lblStudent.Text (label), cmd or btn (Button) κλπ.
                                    
                                    //positioncontrols();
                                    //this.Activate(); // γιατί μόνο σε αυτό this;
                                    //onePing();

                                    // είτε

                                    this.positioncontrols();
                                    base.Activate(); // ή this
                                    this.onePing();
                                }
                            }

                            myval = "";
                        }
                        else
                        {
                            // /n/n ?. /n = Unix, /r = Old MacOS /r/n = Windows.
                            MessageBox.Show("Δεν βρέθηκε μαθητής με αυτό το Barcode\n\n" + myval,
                                "Λάθος", 
                                MessageBoxButtons.OK, 
                                MessageBoxIcon.Error);
                        }
                    }
                    catch (MySqlException ex)
                    {
                        MessageBox.Show(ex.ToString());
                    }
                    finally
                    {
                        this.CloseConnection();
                    }
                }
                else
                {
                    MessageBox.Show("Δεν υπάρχει σύνδεση!!!");
                }
            }
        }

        private void positioncontrols() // <- PositionControls() ή καλυτερα CenterForm()
        {
            Rectangle rect = Screen.PrimaryScreen.WorkingArea;

            //Divide the screen in half, and find the center of the form to center it
            this.Top = (rect.Height / 2) - (this.Height / 2); // this.Top = (rect.Height - this.Height) / 2;
            this.Left = (rect.Width / 2) - (this.Width / 2);
        }

        private bool chkNumber(string chk) // <- CheckNumber ή IsNumber (string checkString)
        {
            double number;
            CultureInfo culture = CultureInfo.CreateSpecificCulture("el-GR"); // γιατί el-GR; Εγώ έχω en-US δεν θα μου κάνει σωστή μετατροπή.
            NumberStyles style = NumberStyles.Number;

            //if (Double.TryParse(chk, style, culture, out number)) 
            //    return true;
            //else
            //    return false;

            return Double.TryParse(chk, style, culture, out number);
        }

        private bool loadtrdrObj(string barcode) // Τα ονόματα των functions πρέπει να είναι κατανοητά.
        {
            bool found = false;

            string SQLtrdr = "select t.company, t.trdr, t.name, ifnull(t.epipedo, 0)level, " +
                 "(select date from trans where trdr = t.trdr and type=2 order by date desc limit 1) trndate, " +
                 "ifnull(t.remarks,'') remarks " +
                 "from trdr t " +
                 "where t.barcode = @barcode";

            // Caps προτείνω
            string SQLtrdrCAPS = "SELECT t.company, t.trdr, t.name, IFNULL(t.epipedo, 0) level, " + 
                 "(SELECT date FROM trans WHERE trdr = t.trdr AND type = 2 ORDER BY date DESC limit 1) trndate, " +
                 "IFNULL(t.remarks,'') remarks " +
                 "FROM trdr t " +
                 "WHERE t.barcode = @barcode";

            MySqlCommand cmd = new MySqlCommand(SQLtrdr, connection);
            cmd.Parameters.AddWithValue("@barcode", barcode);

            DataTable dt = new DataTable(); // ή Using

            MySqlDataReader dataReader = cmd.ExecuteReader();

            dt.Load(dataReader);

            if (dt.Rows.Count > 0)
            {
                Customer myCust = new Customer
                    (
                        (Int16)(dt.Rows[0]["company"]), // cast εφόσον δεν έχει DBNull. Αν έχει System.DBNull.Value ως τιμή ακόμα και το Convert.ToInt16 θα σκάσει.
                        Convert.ToInt32(dt.Rows[0]["trdr"]), // Το ίδιο
                        dt.Rows[0]["name"].ToString(), // << >>
                        Convert.ToInt16(dt.Rows[0]["level"]), 
                        Convert.ToDateTime(dt.Rows[0]["trndate"]),
                        dt.Rows[0]["remarks"].ToString()
                    );

                myCustomer = myCust;

                found = true;
            }
            //else
            //{
            //    found = false; // Ok αλλά είναι ήδη false
            //}
            //close Data Reader // πλεονασμός
            dataReader.Close(); // το βλέπουμε τι κάνει
            dt.Dispose(); // end using

            return found; // bFound
        }

        /*
         * Το πιό σημαντικό είναι ότι πρέπει να απομονώσεις τελείως τις συναρτήσεις που έχουν να κάνουν με το ADO (SaveData, CloseConnection κλπ).
         * Φτιάξε ένα DLL και βάλε εκεί ότι έχει να κάνει με την βάση.
         * Έτσι θα φτιάξεις μία βιβλιοθήκη που θα χρησιμοποιείς σε κάθε project και θα κάνεις την δουλειά σου καλύτερα και γρήγορα.
         * Επίσης μην ξεχνάς ότι το ADO σου δίνει την δυνατότητα να το διαχειρίζεσαι μέσα από τα Interfaces που σου δίνει.
         * π.χ IDbConnection, IDbCommand κλπ.
         * Έτσι θα μπορείς να παραμετροποιείς τις εφαρμογές που θα φτιάξεις στο μέλλον με τέτοιον τρόπο που θα μπορείς να
         * κάνεις connect σε όλες τις βάσεις δεδομένων, MySQL, SQL, Oracle κλπ χρησιμοποιώντας τον ίδιο κώδικα.
         */
        private int SaveData()
        {
            string SQLtrdr = "";
            // int r = 0;
            SQLtrdr = "INSERT INTO trans(company, date, trdr, type, insdate, upddate) VALUES (@company, @date, @trdr, @type, @insdate, @upddate)";
            MySqlCommand myCommand = new MySqlCommand();

            myCommand.Parameters.AddWithValue("@company", myCustomer.Company);
            myCommand.Parameters.AddWithValue("@date", DateTime.Now);
            myCommand.Parameters.AddWithValue("@trdr", myCustomer.Trdr);
            myCommand.Parameters.AddWithValue("@type", 999);
            myCommand.Parameters.AddWithValue("@insdate", DateTime.Now);
            myCommand.Parameters.AddWithValue("@upddate", DateTime.Now);

            myCommand.CommandText = SQLtrdr;
            myCommand.Connection = connection; // Το connection είναι συνέχεια ανοικτό; 
                                               // Αν ναι σου προτείνω να το ανοίγεις και να το κλείνεις κάθε φορά.
            // r = myCommand.ExecuteNonQuery();

            return myCommand.ExecuteNonQuery();

            //if (r > 0)
            //{
            //    return 1;
            //}
            //else
            //{
            //    return 0;
            //}

            // Να χρησιμοποιείς ένα στυλ σε τέτοιες περιπτώσεις όπως π.χ. 
            // στο αν θα βάζεις Curly Brackets σε conditions με μία πρόταση στο if ή στο else
            // γιατί πριν λες:

            //if (Double.TryParse(chk, style, culture, out number)) 
            //    return true;
            //else
            //    return false;
                      
        }

        public void onePing() // ή και public static void αν χρησιμοποιείται και από αλλού.
        {
            SystemSounds.Asterisk.Play();
        }

Και τέλος, δεν είναι δύσκολο να περάσεις σε  framework 4.0, επίσης υπάρχουν variable length barcode formats που αναγνωρίζουν και ASCII τα οποία είναι πιό βολικά και αναγνώσιμα από νούμερα όπως το 128B.

Καλή επιτυχία στο project σου.

Απ: barcode scanner - reader

evagelos — Wed, 02 Jan 2013 09:16:17 GMT

με τα πολλά:

public void MyKeyDown(object sender, KeyEventArgs e)
        {
            string value = "";
            if (e.KeyValue >= ((int)Keys.NumPad0) && e.KeyValue <= ((int)Keys.NumPad9))
            { // numpad
                value = Convert.ToInt16(e.KeyValue - ((int)Keys.NumPad0)).ToString();
            }
            else if (e.KeyValue >= ((int)Keys.D0) && e.KeyValue <= ((int)Keys.D9))
            { // regular numbers
                value = Convert.ToInt16(e.KeyValue - ((int)Keys.D0)).ToString();
            }


            if (chkNumber(value) == true)
            {
                myval = myval + value;
                if (myval.Length == 1)
                    myTimeStart = DateTime.Now;
            }
            else
            {
                myval = "";
                myTimeStart = DateTime.Now;
            }


            if (myval.Length == barLength)
            {
                myTimerStop = DateTime.Now;
                TimeSpan span = myTimerStop - myTimeStart;

                if (this.OpenConnection() == true)
                {
                    try
                    {
                        if (loadtrdrObj(myval) == true)
                        {
                            if (span.TotalMilliseconds < 100)
                            {
                                if (SaveData() == 1)
                                {                                    
                                    RemTB.Text = "Μαθητής: " + myCustomer.Name + Environment.NewLine +
                                        "Level: " + myCustomer.Level + Environment.NewLine +
                                        "Σχόλια: " +myCustomer.Remarks + Environment.NewLine + 
                                        "Ωρα: " + DateTime.Now + Environment.NewLine +
                                        "Τελ. Ημ/νία Πληρωμής: " + myCustomer.LastPayDate;

                                    positioncontrols();
                                    this.Activate();
                                    onePing();
                                }
                            }
                            myval = "";
                        }
                        else
                        {
                            MessageBox.Show("Δεν βρέθηκε μαθητής με αυτό το Barcode\n\n" + myval, "Λάθος", MessageBoxButtons.OK, MessageBoxIcon.Error);
                        }
                    }
                    catch (MySqlException ex)
                    {
                        MessageBox.Show(ex.ToString());
                    }
                    finally
                    {
                        this.CloseConnection();
                    }
                }
                else
                {
                    MessageBox.Show("Δεν υπάρχει σύνδεση!!!");
                }
            }
        }

Ψάχνω μονο για νούμερα

οταν φτάσει στο επιθυμητό μήκος το string (Γραμμή 27)

βλέπω σε πόσο χρόνο πληκτρολογήθηκε (Γραμμή 30)

Ψάχνω να βρω αν υπάρχει ο μάθητής στην βάση (Γραμμή 36)

Αν ο χρόνος που χρειάστηκε να πληκτρολογηθεί το νούμερο είναι λιγότερο απο 100ms πάει να πει ότι το διάβασε το barcode scanner (Γραμμή 38)

Αποθηκεύω τα δεδομένα (Γραμμή 40)

Εμφανίζω στην φόρμα μου τις πληροφορίες (Γραμμή 42)

Βάζω στο κέντρο της οθόνης την αφαρμογή μου (Γραμμή 48)

Την φέρνω μπροστά απο κάθε άλλο ανοιχτό παράθυρο στα windows (Γραμμή 49)

Κάνω ένα beep (Γραμμή 50)

Μηδενίζω το string μου (Γραμμή 53)

Οι υπόλοιπες functions:

        private void positioncontrols()
        {
            Rectangle rect = Screen.PrimaryScreen.WorkingArea;
            //Divide the screen in half, and find the center of the form to center it
            this.Top = (rect.Height / 2) - (this.Height / 2);
            this.Left = (rect.Width / 2) - (this.Width / 2);
        }

        private bool chkNumber(string chk)
        {
            double number;
            CultureInfo culture = CultureInfo.CreateSpecificCulture("el-GR");
            NumberStyles style = NumberStyles.Number;

            if (Double.TryParse(chk, style, culture, out number))
                return true;
            else
                return false;
        }

        private bool loadtrdrObj(string barcode)
        {
           bool found = false;
           string SQLtrdr = "select t.company, t.trdr, t.name, ifnull(t.epipedo, 0)level, " +
                "(select date from trans where trdr = t.trdr and type=2 order by date desc limit 1) trndate, " +
                "ifnull(t.remarks,'') remarks "+
                "from trdr t " +
                "where t.barcode = @barcode";

            MySqlCommand cmd = new MySqlCommand(SQLtrdr, connection);
            cmd.Parameters.AddWithValue("@barcode", barcode);

            DataTable dt = new DataTable();

            MySqlDataReader dataReader = cmd.ExecuteReader();
            dt.Load(dataReader);
            if (dt.Rows.Count > 0)
            {
                Customer myCust = new Customer
                    (
                    Convert.ToInt16(dt.Rows[0]["company"]),
                    Convert.ToInt32(dt.Rows[0]["trdr"]),
                    dt.Rows[0]["name"].ToString(),
                    Convert.ToInt16(dt.Rows[0]["level"]),
                    Convert.ToDateTime(dt.Rows[0]["trndate"]),
                    dt.Rows[0]["remarks"].ToString()
                    );
                myCustomer = myCust;
                found = true;
            }
            else
            {
                found = false;
            }
            //close Data Reader
            dataReader.Close();
            dt.Dispose();
            return found;
        }

        private int SaveData()
        {
            string SQLtrdr = "";
            int r = 0;
            SQLtrdr = "insert into trans(company, date, trdr, type, insdate, upddate) values (@company, @date, @trdr, @type, @insdate, @upddate)";
            MySqlCommand myCommand = new MySqlCommand();

            myCommand.Parameters.AddWithValue("@company", myCustomer.Company);
            myCommand.Parameters.AddWithValue("@date", DateTime.Now);
            myCommand.Parameters.AddWithValue("@trdr", myCustomer.Trdr);
            myCommand.Parameters.AddWithValue("@type", 999);
            myCommand.Parameters.AddWithValue("@insdate", DateTime.Now);
            myCommand.Parameters.AddWithValue("@upddate", DateTime.Now);

            myCommand.CommandText = SQLtrdr;
            myCommand.Connection = connection;
            r = myCommand.ExecuteNonQuery();

            if (r > 0)
            {
                return 1;
            }
            else
            {
                return 0;
            }
        }


        public void onePing()
        {
            SystemSounds.Asterisk.Play();
        }

Και επειδή με ευρος 0-100 έχω 0 στον προγραμματισμό, αν μπορείτε να με διορθώσετε όπου μπορεί να κάνω λάθος ή διορθώσεις ...

Ευχαριστώ και συγνώμη

Απ: barcode scanner - reader

evagelos — Fri, 21 Dec 2012 07:06:24 GMT

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

Αυτό είναι σε .net 3.5

Οσον αφορά το ποστ που έδωσες πιο πάνω ομολογώ δεν καταλαβα τι πρέπει να κάνω για να το ενσωματώσω στο "δικό" μου.

Εκτος και αν φτιάξω μια άλλη εφαρμογή που θα ανοίγει ξεχωριστά και θα κάνει hook. Οταν βρει αυτό που πρέπει να βρει, θα συνδέεται στην mysql για να κάνει το insert στους πίνακες που θέλω

using System;
using System.Diagnostics;
using System.Windows.Forms;
using System.Runtime.InteropServices;

class InterceptKeys
{
    private const int WH_KEYBOARD_LL = 13;
    private const int WM_KEYDOWN = 0x0100;
    private static LowLevelKeyboardProc _proc = HookCallback;
    private static IntPtr _hookID = IntPtr.Zero;

    public static void Main()
    {
        _hookID = SetHook(_proc);
        Application.Run();
        UnhookWindowsHookEx(_hookID);
    }

    private static IntPtr SetHook(LowLevelKeyboardProc proc)
    {
        using (Process curProcess = Process.GetCurrentProcess())
        using (ProcessModule curModule = curProcess.MainModule)
        {
            return SetWindowsHookEx(WH_KEYBOARD_LL, proc,
                GetModuleHandle(curModule.ModuleName), 0);
        }
    }

    private delegate IntPtr LowLevelKeyboardProc(
        int nCode, IntPtr wParam, IntPtr lParam);

    private static IntPtr HookCallback(
        int nCode, IntPtr wParam, IntPtr lParam)
    {
        if (nCode >= 0 && wParam == (IntPtr)WM_KEYDOWN)
        {
            int vkCode = Marshal.ReadInt32(lParam);
            Console.WriteLine((Keys)vkCode);
        }
        return CallNextHookEx(_hookID, nCode, wParam, lParam);
    }

    [DllImport("user32.dll", CharSet = CharSet.Auto, SetLastError = true)]
    private static extern IntPtr SetWindowsHookEx(int idHook,
        LowLevelKeyboardProc lpfn, IntPtr hMod, uint dwThreadId);

    [DllImport("user32.dll", CharSet = CharSet.Auto, SetLastError = true)]
    [return: MarshalAs(UnmanagedType.Bool)]
    private static extern bool UnhookWindowsHookEx(IntPtr hhk);

    [DllImport("user32.dll", CharSet = CharSet.Auto, SetLastError = true)]
    private static extern IntPtr CallNextHookEx(IntPtr hhk, int nCode,
        IntPtr wParam, IntPtr lParam);

    [DllImport("kernel32.dll", CharSet = CharSet.Auto, SetLastError = true)]
    private static extern IntPtr GetModuleHandle(string lpModuleName);
}

Απ: barcode scanner - reader

Παναγιώτης Καναβός — Thu, 20 Dec 2012 19:26:09 GMT

Υ.Υ.Γ Και γιατί όχι και σε Silverlight ... Το Silverlight 5 υποστηρίζει P/Invoke, ενώ με το Microsoft.Bcl.Async package μπορείς να προσθέσεις υποστήριξη για async/await σε .NET 4 και Silverlight 4

Απ: barcode scanner - reader

Παναγιώτης Καναβός — Thu, 20 Dec 2012 19:20:44 GMT

Libra Storm:
Ναι μπορείς, με timespan struct ή με την system.enviroment.tickCount property και "κράτα" την διαφορά χρόνου μεταξύ 2 διαδοχικών keydown events,

Υπάρχει ήδη το System.Diagnostics.Stopwatch το οποίο κάνει αυτό ακριβώς.

Επαυξάνω για τα υπόλοιπα, έτσι κι αλλιώς πρέπει να ρυθμίσεις το scanner να σου στείλει κάποιους χαρακτήρες στην αρχή για να καταλάβεις ότι πρόκειται για το scanner και όχι για το χρήστη.

Όσον αφορά τους φτηνούς scanners, έριξα μία γρήγορη ματιά σε αυτούς του 40άρικου και βλέπω ότι παίζουν απλά σαν πληκτρολόγια.

Πλατειάζοντας λίγο, βρήκα αυτό το blog post του Stephen Toub (γνωστότατος για το Task Parallel Library, Async programming) για Keyboard Hooks το οποίο συνοδεύει το άρθρο του για debugging με το Visual Studio στο MSDN Magazine του Μαΐου 2006. Βρήκα και άλλες υλοποιήσεις που "τυλίγουν" αυτό τον κώδικα σε μία κλάση που σηκώνει events και αναρωτιέμαι, γιατί events που είναι η "παλιά μόδα" και όχι Tasks που είναι ο σύγχρονος τρόπος προγραμματισμού? Αν ο καθηγητής δεν έχει επιβάλλει τη χρήση .NET 3.5-, άνετα μπορείς να γράψεις το hook με Tasks ή (σε .ΝΕΤ 4.5/4 με προϋποθέσεις) με async/await. Έτσι δεν θα κολλάει το UI όσο η εφαρμογή διαβάζει/επεξεργάζεται τα keystrokes, ούτε θα υπάρχει κίνδυνος να χαθούν keyboard events επειδή το UI thread έτρεχε κάτι άλλο.

Η συμπεριφορά της εφαρμογής θα είναι απείρως καλύτερη και θα εντυπωσιάσει και τον καθηγητή

Υ.Γ. Αυτό εξελίσσεται σε πολύ ενδιαφέρον thread ...

Απ: barcode scanner - reader

Libra Storm — Thu, 20 Dec 2012 07:46:16 GMT

"Μπορώ να βάλω κάποιο έλεγχο για την διαρκεια πουθ πάτησε τα 2 νούμερα;"

"πχ αν πάτησε 2 νούμερα ε διάστημα 1 δευτερολέπτου το ένα απο το άλλο, είναι σίγουρο ότι δεν το έστειλε το barcode, αλλα τα πάτησε ο χρήστης"

Ναι μπορείς, με timespan struct ή με την system.enviroment.tickCount property και "κράτα" την διαφορά χρόνου μεταξύ 2 διαδοχικών keydown events, αλλά
αν γιά παράδειγμα ο Χρήστης πχ γράψει πολύ γρήγορα ή απλά πατήσει το ίδιο πλήκτρο συνέχεια θα νομίζει το πρόγραμμα ότι έστειλε event ο Scanner.

Θα σου πρότεινα Όταν φτιάξεις τα barcode πρόσθεσε στην αρχή κάποιο αναγνωριστικό ή αν ο scanner έχει ρυθμίσεις , ένα νούμερο ή κάποιους ASCII characters και μετά εφόσον ο σκάνερ στείλει Carriage Return ή οτιδήποτε άλλο έχει ρυθμιστεί να στέλνει τότε κάνε parse το string.

Φτιάξε τα λοιπόν τα Barcodes σου, βάλε το αναγνωριστικό σου σε αυτά σε συνδυασμό με το ID του Μαθητή και αν γίνει το parse valid γράψε το στην βάση.

Απ: barcode scanner - reader

evagelos — Wed, 19 Dec 2012 19:51:19 GMT

δεν έχω ακόμα.

Σκέφτομουν κάτι απο εδώ : http://www.ics.gr/index.php?target=categories&category_id=50

αλλά θέλω να είμαι σίγουρος πριν πάρω κάτι. Οσον αφορά το SetWindowsHookEx

Μέχρι στιγμής έχω φτάσει εδώ:

		UserActivityHook actHook;
		void MainFormLoad(object sender, System.EventArgs e)
		{
            actHook = new UserActivityHook(); // crate an instance with global hooks
			// hang on events
			//actHook.OnMouseActivity+=new MouseEventHandler(MouseMoved);
			actHook.KeyDown+=new KeyEventHandler(MyKeyDown);
			//actHook.KeyPress+=new KeyPressEventHandler(MyKeyPress);
			//actHook.KeyUp+=new KeyEventHandler(MyKeyUp);
		}
		

		
		public void MyKeyDown(object sender, KeyEventArgs e)
		{
			//LogWrite("KeyDown 	- " + e.KeyData.ToString());
            
            string value = "";
            if (e.KeyValue >= ((int)Keys.NumPad0) && e.KeyValue <= ((int)Keys.NumPad9))
            { // numpad
                value = Convert.ToInt16(e.KeyValue - ((int)Keys.NumPad0)).ToString();
            }
            else if (e.KeyValue >= ((int)Keys.D0) && e.KeyValue <= ((int)Keys.D9))
            { // regular numbers
                value =  Convert.ToInt16(e.KeyValue - ((int)Keys.D0)).ToString();
            }


            if (chkNumber(value) == true)
                myval = myval + value;
            else
                myval = "";

            if (myval.Length == 13)
            {
                textBox1.Text = myval;
                myval = "";
            }
		}

        private bool chkNumber(string chk)
        {

            double number;
            CultureInfo culture = CultureInfo.CreateSpecificCulture("el-GR");
            NumberStyles style = NumberStyles.Number;
            if (Double.TryParse(chk, style, culture, out number))
                return true;
            else
                return false;
        }

Κάνω έλεγχο αν πατησε ο χρήστης ένα χαρακτήρα και αν πάτησε "μηδενίζω" το string μου.

Μπορώ να βάλω κάποιο έλεγχο για την διαρκεια πουθ πάτησε τα 2 νούμερα;

πχ αν πάτησε 2 νούμερα ε διάστημα 1 δευτερολέπτου το ένα απο το άλλο, είναι σίγουρο ότι δεν το έστειλε το barcode, αλλα τα πάτησε ο χρήστης

Απ: barcode scanner - reader

Libra Storm — Tue, 18 Dec 2012 22:36:28 GMT

Ναι, δυστυχώς δεν γνωρίζω αν υπάρχει πιό πρόσφατη έκδοση. Αν δεν υποστηρίζει UPOS δεν θα παίζει θα είναι "Κινέζικος".

Δεν μας είπε τελικά ο Evagelos τι scanner έχει.

Απ: barcode scanner - reader

Παναγιώτης Καναβός — Tue, 18 Dec 2012 22:24:14 GMT

Γι αυτό μιλάς? Ή υπάρχει κάτι πιο πρόσφατο? Θα πρέπει πάντως ο scanner να υποστηρίζει το UPOS για να χρησιμοποιηθεί από το POS for .NET

Χμμμ, καιρός να δούμε τις εξελίξεις στα φτηνά barcode scanners ...

Απ: barcode scanner - reader

Libra Storm — Tue, 18 Dec 2012 22:10:19 GMT

Γιά να "πιάνεις" keystrokes ανεξάρτητα από το αν η εφαρμογή έχει focus ή όχι μπορείς να χρησιμοποιήσεις την SetWindowsHookEx function. Αυτό σε περίπτωση που ο Scanner στέλνει keys.

Αν ο Scanner αναγνωρίζεται ως Device από το λειτουργικό μπορείς να χρησιμοποιήσεις την Βιβλιοθήκη Microsoft POS for .NET. Αυτή αναγνωρίζει τα POS Devices του συστήματος και σηκώνει το DataEvent σε περίπτωση που σκανάρεις κάτι.