Discussion :

[vinczente]

Bonjour,
J'aimerais transferer une table d'une bdd sqlserver vers mysql en utilisant les drivers ODBC. Les deux tables on la meme definition et j'utilise GetRows pour recuperer les donnees de la premiere base de donnee.

Code :

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

1
2
3
4
5
6
7
8
 
        Dim Rs As New ADODB.Recordset
        Dim SQLConnection As New ADODB.Connection
        SQLConnection.Open("connectionstring")
        SQLConnection.CommandTimeout = 0
        Rs.Open("DimAccount", SQLConnection, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockReadOnly)
        Dim datatable As New Object
        datatable = Rs.GetRows()

Cela me retourne un objet a 2 dimentions que je ne sais pas comment parser
Comment faire pour l'inserer dans ma table mysql?

Code :

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

1
2
3
4
5
6
 
        Dim Rs2 As New ADODB.Recordset
        Dim SQLConnection2 As New ADODB.Connection
        SQLConnection2.Open("Dsn=mysql;")
        SQLConnection2.CommandTimeout = 0
        Rs2.Open("DimAccount", SQLConnection2, ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockBatchOptimistic)

Merci pour votre aide

[tomlev]

Euh... c'est du VB, du VBS, du VB.NET... ?

ADODB est une API obsolète, en VB.NET on utilise ADO.NET

Une bonne solution pour régler ton problème est de passer par un DataSet et 2 DataAdapter :
- un DataAdapter pour SQL Server que tu utilises pour charger les données dans le DataSet
- un autre DataAdapter pour MySQL que tu utilises pour insérer dans la base MySQL les données du DataSet

Plus d'infos sur ADO.NET :
http://dotnet.developpez.com/articles/ado1/
http://dotnet.developpez.com/articles/ado2/

Un post dans lequel j'avais posté du code pour un problème similaire :
http://www.developpez.net/forums/d63...i/#post3755524

C'est du C#, et c'est pour migrer des données entre dBase et Oracle, mais c'est pas difficile à traduire en VB.NET et à adapter à ton cas