Discussion :

[cirtey]

Bonjour;
Ci-joint le schema de ma base de données ainsi que le fichier excel d'entrée (le vrai fichier est en xlsx et non xls).
J'ai mappé une base de donné en dbml sous visual studio.
Ci-joint un code pour accéder à excel, importer des données et les exporter vers une base de données en local sql server xpress qui est actuellement vide (il n' y a que les tables et champs correspondants avec les liens entre tables).
J'arrive à importer les données mais je n'arrive pas à les exporter vers la base de données. L'application compile sans donner de message d'erreur.
Pouvez-vous m'aider s'il vous plaît à détecter la source d'erreur, pourquoi il n'y a pas l'export vers la base de données?
D'avance merci.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
 
using System;
using System.Windows.Forms;
 
namespace MiniPim
{
    public partial class Main : Form
    {
        public Main()
        {
            InitializeComponent();
        }
 
        private void btnParcourir_Click(object sender, EventArgs e)
        {
            openFileDialog1.Filter = "Excel 2007 (*.xlsx)|*.xlsx";
            if (openFileDialog1.ShowDialog() == DialogResult.OK)
            {
                txtChemin.Text = openFileDialog1.FileName;
            }
        }
 
        private void btnImport_Click(object sender, EventArgs e)
        {
            Cursor = Cursors.WaitCursor;
            string pathExcelFile = txtChemin.Text;
            TDEF tdef = new TDEF();
            try
            {
                tdef.INSERT(pathExcelFile);
            }
            catch (Exception ex)
            {
                MessageBox.Show(ex.ToString());
            }
 
            using (Confirmation confirmation = new Confirmation())
            {
                Hide();
                confirmation.ShowDialog();
            }
            Close();
        }
    }
}

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
 
 
#region v1
using System;
using System.Collections.Generic;
using System.Windows.Forms;
using System.Linq;
using System.Linq.Expressions;
using Microsoft.Office.Interop.Excel;
using Application=Microsoft.Office.Interop.Excel.Application;
 
namespace MiniPim
{
    class TDEF
    {
        private int v_tdef_id;
        private int v_tdef_typesys;
        private string v_tdef_libelle;
 
        public  void INSERT(string strPath)
        {
 
            object Missing = System.Reflection.Missing.Value;
 
            _Application xlApp = new Application {Visible = false};
 
            _Workbook xlClasseur = xlApp.Workbooks.Open(strPath, Missing, Missing, Missing, Missing,
                                                        Missing, Missing, Missing, Missing,
                                                        Missing, Missing, Missing, Missing,
                                                        Missing, Missing);
 
            Sheets xlFeuilles = xlClasseur.Sheets;
 
            _Worksheet xlFeuill1 = (_Worksheet)xlFeuilles["Feuil1"];
 
          MiniPimDataContext MiniPim = new MiniPimDataContext();
 
            int nbrRows = xlFeuill1.Rows.Count;
            for (int i = 1; i <= nbrRows; i++)
            {
                Range r1 = xlFeuill1.get_Range("A" + i, Missing);
                string typeDeTable = Convert.ToString(r1.Cells.Value2);
                if (typeDeTable.Equals("TDEF"))
                {
                    v_tdef_id = Int32.Parse("" + ((Range)xlFeuill1.Cells[i, "B"]).Value2);
                    v_tdef_typesys = Int32.Parse("" + ((Range)xlFeuill1.Cells[i, "C"]).Value2);
                    v_tdef_libelle = Convert.ToString("" + ((Range)xlFeuill1.Cells[i, "D"]).Value2);
 
                    Type myTYPE = new Type
                                      {
                                          ID = v_tdef_id,
                                          ID_Type_Systeme = v_tdef_typesys,
                                          Libelle = v_tdef_libelle
                                      };
 
                    MiniPim.Types.InsertOnSubmit(myTYPE);
 
                    try
                    {
                        MiniPim.SubmitChanges();
                    }
                    catch (Exception e)
                    {
                        MessageBox.Show(e.ToString());
                    }
 
 
                }
                //else if (typeDeTable.Equals("LNAME"))
                //{
 
                //    //MessageBox.Show("LNAME");
                //}
                //else if(typeDeTable.Equals("LIST"))
                //{
                //    //MessageBox.Show("LIST");
                //}
                //else if (typeDeTable.Equals("CTX"))
                //{
                //    //MessageBox.Show("CTX");
                //}
                //else if (typeDeTable.Equals("CAR"))
                //{
                //    //MessageBox.Show("CAR");
                //}
                //else if (typeDeTable.Equals("TYPE"))
                //{
                //    //MessageBox.Show("TYPE");
                //}
                else if (typeDeTable.Equals(""))
                {
                    //MessageBox.Show("END");
                    break;
                }
            }
            xlClasseur.Close(false, Missing, Missing); // ferme le XLS
            xlApp.Quit(); // On met fin au pilotage
        }
    }
} 
#endregion

[Paul Musso]

Bonjour,

J'ai peut être du mal cet après-midi, mais je ne vois pas une seule référence à du code LinQ To SQL dans ton code ...

[cirtey]

Il y a le l'alimentation de type (correspond à la table types), datacontext, submitchanges...
Tu ne vois pas de var et de select from car je ne fait que des ajouts à la base de données pas de requêtes