Καλώς ορίσατε στο dotNETZone.gr - Σύνδεση | Εγγραφή | Βοήθεια
σε

 

Αρχική σελίδα Ιστολόγια Συζητήσεις Εκθέσεις Φωτογραφιών Αρχειοθήκες

Μεταφορά δεδομένων με στην Access

Îåêßíçóå áðü ôï ìÝëïò pavgre. Τελευταία δημοσίευση από το μέλος Evangelos στις 28-04-2006, 00:40. Υπάρχουν 1 απαντήσεις.
Ταξινόμηση Δημοσιεύσεων: Προηγούμενο Επόμενο
  •  11-04-2006, 09:10 11772

    Μεταφορά δεδομένων με στην Access

    Χαίρεται. Καινούργιος στο φόρουμ. Επειδή δεν είμαι και πολύ σχετικός με την Access θα ήθελα την βοήθειά σας. Υπάρχει ένας server που πέρνει τις τιμές του PLC (Programmable Logic Controller) και τα μεταφέρει στον PC. Από εκεί και πέρα μπορεί κάποιος χρησιμοποιόντας DDE να μεταφέρει τις τιμές σε EXCEL. Μπορεί κάποιος να μεταφέρει τιμές και με τον παρακάτω κώδικα

    Dim ExcelApp As excel.Application
    Dim ExcelWorkbook As excel.Workbook
    Dim ExcelSheet As excel.Worksheet

    Private Sub Form_Load()

    Set ExcelApp = CreateObject("Excel.Application")

    Set ExcelWorkbook = ExcelApp.Workbooks.Open(MyFileName) 
    Set ExcelSheet = ExcelWorkbook.Worksheets(1)

    End Sub

    Private Sub Timer1_Timer()
    Dim server As Object 'FaconServer object declaration

    Set server = CreateObject("FaconSvr.FaconServer") 'Create the FaconServer object
    'server.OpenProject ("c:\test.fcs") ' Open the project file(D:\Demo.fcs)
                                            ' which was created previously
        server.Connect
       Timer1.Enabled = True
    Text2.Text = server.GetItem("Channel0.Station0.Group0", "R0")

    ExcelSheet.Cells(1, 1).Value = Time
    ExcelSheet.Cells(1, 2).Value = Text2.Text
    ExcelWorkbook.Save

    End Sub

    Έτσι μεταφέρω δεδομένα σε Excel. Μήπως ξέρει κανείς αν γίνεται να στείλω δεδομένα σε Access και πως;

     

  •  28-04-2006, 00:40 12186 σε απάντηση της 11772

    Απ: Μεταφορά δεδομένων με στην Access

    Τα πράγματα στην Access δεν είναι τόσο απλά. Το καλύτερο που έχεις να κάνεις είναι να χρησιμοποιήσεις το ADO.NET
    Αρχικά πρέπει να φτιάξεις μια σύνδεση με τη βάση. Αυτό θα γίνει φτιάχνοντας ένα Connection object και στο Connection String θα δηλώνεις ότι χρησιμοποιείς Access (Jet) και ποιό είναι το αρχείο της βάσης.



        System.Data.OleDb.OleDbConnection connection =
             new System.Data.OleDb.OleDbConnection (
             "Provider =Microsoft.Jet.OLEDB.4.0;Data Source=\"C:\\blabla.mdb\""
             );
        connection.Open();

    Έπειτα μπορείς με διάφορους τρόπους να εισάγεις τα δεδομένα σου.
    Ο πιο απλός είναι να φτιάχνεις Command objects με εντολές SQL που να εισάγουν τα δεδομένα στους πίνακές σου και να τις εκτελείς.
    Αν έχεις για παράδειγμα έναν πίνακα table1 με πεδία id, data1, data2 που είναι Number, Text και Text αντίστοιχα:



        string sqlQuery = "INSERT INTO table1 (id, data1, data2) VALUES (1,'Hello','world')";
        System.Data.OleDb.OleDbCommand command = new
           System.Data.OleDb.OleDbCommand( sqlQuery, connection );
        command.ExecuteNonQuery();
        command.Dispose();

    Στο τέλος κλείνεις το connection, και είσαι εντάξει.

       

      connection.Close();
      connection.Dispose();

    Πρόσεξε μόνο να μην έχεις ανοικτή τη βάση σου στην Access, όταν τρέχει το πρόγραμμά σου.

    Όπου και να κοιτάξεις, θα βρεις πληροφορίες για το ADO.NET. Μπορείς να αρχίσεις από το MSDN.

    Καλή τύχη!

     

     

Προβολή Τροφοδοσίας RSS με μορφή XML
Με χρήση του Community Server (Commercial Edition), από την Telligent Systems