[VB2005]sql server : datatable vide

Version imprimable

27/05/2008, 15h22
Kropernic

[VB2005]sql server : datatable vide

Bonjour,

Voici mon problème.

J'utilise pour accéder à ma base de donnée, un ensemble de classe que j'ai écris. A priori, il fonctionne très bien, je l'utilise dans plusieurs applications et je n'ai aucun soucis avec.

Seulement voilà, maintenant, j'ai un soucis ^^.

Dans ma classe, il y a une fonction, que j'ai appelée DoFastUpdate, qui consiste juste à mettre à jour la db à partir d'un dataset. La fonction se charge de regarder quelles lignes sont ajoutées, modifiées ou supprimées. J'utilise cette fonction lorsque j'ai un grand nombre d'enregistrements à ajouter d'un coup (dans le cas qui m'occupe, plus de 1 000 000).

Cela fonctionne très bien à partir du moment où j'ai un dataset avec une datatable que je peux remplir mais pour avoir ce dataset et cette datatable, qu'est-ce que je fais (en fait, je ne l'ai fait qu'une fois, quand ma table était encore vide^^) : "select * from matable". Donc j'ai mon dataset avec la datable vide mais totalement prête à recevoir de nouvelles lignes.

Maintenant que ma table contient pas loin de 1 700 000 record, je me vois mal faire pareil ^^. Je pourrais faire un select qui ne revient aucun résultat mais cela mets aussi pas mal de temps (déjà essayé :aie:).

Donc voilà, je suis à la recherche d'un moyen de récupérer une datatable correctement formatée mais vide.

Quelqu'un peut-il m'aider ?

Griftou.
27/05/2008, 17h10
Poulain

Eh bien, en bidouillant un peu, tu peux faire une requee qui va chercher avec un paramètre impossible.

Par exemple si tu as une case prénom, tu tapes dans ta requete
where prenom=492084 il devrait te retourner ligne vide et architecture de ta table.

Problème: il va parcourir toutes les lignes. Il faudrait reussir a recupérer juste l'architecture de la table.
27/05/2008, 17h28
Kropernic

Dans mon précédent message, j'explique que c'est ce que j'avais trouvé comme solution qui en théorie fonctionne mais qui en pratique est inexploitable car elle prend trop de temps à l'exécution. En fait, ma table contient des enregistrements de transaction caisse de grands magasins (15 magasins en fait). Pour le moment, il n'y a que les 3 premiers mois de 2006 (on mets en place un nouveau système alors on teste avec ça) et ça fait déjà presque 1 700 000 de records. Donc on peut oublier la requête qui ne renvoie aucun résultat.

Merci quand même Poulain.

Quelqu'un d'autre ?

Edit : J'ai bien tenté en créant manuellement les colonnes dans le code mais j'trouve pas trop comment faire. J'ai vu un exemple dans la MSDN mais ça fonctionne pas :aie:

Griftou.

Finalement, voici un début de solution :
Code:

1 2 3 4 5 6 7 8 9 ds = New DataSet Dim dt As New DataTable ds.Tables.Add(dt) dt.Columns.Add("DATE", System.Type.GetType("System.String")) dt.Columns.Add("SIEGE", System.Type.GetType("System.String")) dt.Columns.Add("RAY", System.Type.GetType("System.String")) dt.Columns.Add("TYPE", System.Type.GetType("System.String")) dt.Columns.Add("EANART", System.Type.GetType("System.String"))
Ici je crée donc un dataset et une datatable dans laquelle j'ajoute des datacolumns.

Seulement j'ai un nouveau problème. J'ai des colonnes de type "currency" et je ne trouve pas comment les créer :oops:

Quelqu'un sait ? P-e suffit-il d'utiliser le type double ou qqch du genre mais j'aimerais être sûr....

Griftou.

28/05/2008, 10h01
SaumonAgile

Je dirais que currency est de type decimal.
28/05/2008, 10h02
Kropernic

Venant de toi, je prends ça pour sûr ^^.

Merci !

Griftou.
28/05/2008, 10h08
SaumonAgile

Une liste complète des équivalences :
http://msdn.microsoft.com/en-us/library/ms131092.aspx

Voici finalement mon code.

Code:

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
    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        dataTr = Data_Module.DataFactory.CreateSqlServer(line, "sa", "I'm_happy", "TICKETS")
        dataTr.DoConnect()

        Dim SR As New StreamReader("C:\.NET Projet\EALZBONT\tr.txt")
        Dim l As String = SR.ReadLine
        l = SR.ReadLine
        Dim tab As String()
        Dim row As DataRow
        'ds = dataTr.DoSelect("select * from ticket where siege = '000'")
        Dim i As Integer = 0

        ds = New DataSet
        Dim dt As New DataTable

        dt.Columns.Add("DATE", System.Type.GetType("System.String"))
        ...
        ...définition de toutes les colonnes...
        ...
        dt.Columns.Add("TYPERAY", System.Type.GetType("System.String"))
        dt.TableName = "Ticket"
        ds.Tables.Add(dt)

        While Not l = Nothing
            i += 1
            row = ds.Tables(0).NewRow
            l = l.Replace(".", ",")
            tab = l.Split(Chr(9))
            For x As Byte = 0 To tab.GetLength(0) - 1
                row.Item(x) = tab(x)
            Next
            ds.Tables(0).Rows.Add(row)
            If i Mod 100000 = 0 Then
                dataTr.DoFastUpdate(ds)
                ds.Tables(0).Rows.Clear()
                Console.WriteLine("maj db ok pour i = " & i.ToString)
            End If
            l = SR.ReadLine
        End While
        Console.WriteLine("lecture fichier terminée --> MAJ DB")
        dataTr.DoFastUpdate(ds)

        SR.Close()
        SR.Dispose()
        dataTr.DoDisconnect()

        Console.WriteLine("traitement TR terminé")
    End Sub

Le problème est que la ligne en rouge me donne l'erreur ci-dessous.

Citation:

Update unable to find TableMapping['Table'] or DataTable 'Table'.

Honnêtement, c'est du chinois pour moi. J'comprends bien qu'il n'arrive pas à trouver quelque chose mais quoi ?

Griftou.

Voici la fonction utilisée dans le message précédent. C'est là dedans qu'il y aurait un problème apparemment. Problème qui, d'après mes recherches sur le net, serait lié au dataadapter et au commandbuilder mais je ne vois pas pourquoi.

Est-ce que quelqu'un pourrait m'aider svp ?

Merci d'avance.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
    Public Function DoFastUpdate(ByRef ds As System.Data.DataSet) As Boolean Implements IData.DoFastUpdate
        'pour des updates en éditant directement dans la datagrid
 
        Try
            If Not da Is Nothing Then
                da.Dispose()
            End If
            da = New SqlClient.SqlDataAdapter
            da.SelectCommand = cmd
            cb = New SqlClient.SqlCommandBuilder(da)
 
            da.Update(ds)
            da.Dispose()
            cb.Dispose()
            Return True
        Catch ex As Exception
            MsgBox(ex.Message)
            Return False
        End Try
        'Return ds
    End Function

Griftou.

Bonjour
Concernant la création de la table, j croix que c’est facile, vous ajouter un nouvel élément à votre solution de type dataset (que vous le nommé DataSetType.xsd), puis dans la partie design qui sera affichée, vous faite un glisser de la table (depuis la source de données du projet - via laquelle vous vous connectez à votre base de données-)
Puis la définition de la table sera automatiquement ajouté à votre dataset.

Puis vous changez l’instanciation de ton dataset
donc le code :
Code:

1 2 3 4 5 6 7 8 9 10 ds = New DataSet Dim dt As New DataTable dt.Columns.Add("DATE", System.Type.GetType("System.String")) ... ...définition de toutes les colonnes... ... dt.Columns.Add("TYPERAY", System.Type.GetType("System.String")) dt.TableName = "Ticket" ds.Tables.Add(dt)
sera remplacé par:

Code:

ds = New DataSetType

Concernant l’erreur, il signifié que vous n’avez fournit de mapping à votre da (dataAdapter) donc il ne saura pas comment enregistrer votre dataset
d’ailleurs je ne comprends pas comment l’enregistrement du dataset se fera, pour être explicite, je croix qu’il faut ajouter une ligne
Code:

1 2 3 cmd.commandText= "Nom de la procédure stockée d’enregistrement" 'au lieu de [da.UpdateCommand = cmd] il faut mettre peut être da.UpdateCommand = cmd
donc voilà, j’espère que ça vous aidera
bonne continuation.

29/05/2008, 15h49
Kropernic

Ca ne fonctionnera car la base de donnée n'est pas incorporée dans le projet. Je ne peux donc pas faire de drag&drop.

Je me connecte toujours manuellement à mes bases de données sans utiliser l'interface de VS.

Merci quand même.

Griftou.
29/05/2008, 15h57
farhaoui.mohamed

même si elle n'est pas incorporée dans la solution, essayez d'ajouter le serveur puis la table (normalement ça doit fonctionner)
03/06/2008, 12h47
Kropernic

Je ne veux pas ajouter de datasource dans la solution/projet...

Je me suis cassé le c... à tout gérer manuellement, c'est pas pour des prunes ^^

Griftou.