IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

Copie de base en VB.NET


Sujet :

VB.NET

  1. #1
    Membre confirmé Avatar de jlm22
    Homme Profil pro
    Etudiant
    Inscrit en
    Décembre 2010
    Messages
    203
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : France

    Informations professionnelles :
    Activité : Etudiant

    Informations forums :
    Inscription : Décembre 2010
    Messages : 203
    Par défaut Copie de base en VB.NET
    Bonjour,

    Je fait un programme de copie de base Oracle, j'execute le programme tout les soir grâce à une tâche planifier.

    Problème : les copies sont très longue et les tables très grosses.

    J'aimerais savoir s'il y a une méthode plus optimisé que celle que j'ai :

    En gros je crée une connection sur les 2 bases, (pour l'instant c'est dans une base access que j'envoie mes données c'est pour les test)

    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
     
     
    Dim LDaOracle As OleDbDataAdapter
            Dim LDtOracle As New DataTable
            Dim LDrOracle As DataRow
            Dim cmd, cmd2 As New OleDb.OleDbCommand
            P_cnOracle = New OleDbConnection("Provider=MSDAORA.0; Data Source=Base1;User Id=****;Password=*****;")
            P_cnAccess.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C:\mabase2.mdb;"
            P_cnAccess.Open()
            If P_cnOracle.State = ConnectionState.Broken Then P_cnOracle.Close()
            If P_cnOracle.State = ConnectionState.Closed Then
                Try
                    P_cnOracle.Open()
                Catch
                    MsgBox("Impossible de se connecter à la base : Base1", vbAbort, "ERREUR")
                End Try
            End If
            cmd.Connection() = P_cnAccess
            LDaOracle = New OleDbDataAdapter("SELECT * FROM tablebase1, P_cnOracle)
            LDaOracle.Fill(LDtOracle)
     
            If LDtOracle.Rows.Count > 0 Then
                For Each LDrOracle In LDtOracle.Rows
     
                    cmd.CommandText = "INSERT INTO TableBase2Access (colonne1, colonne2, colenne3, colonne4,colonne5, colonne6, colonne7, colenne8, colonne9, colonne10, colonne11, colonne12, colonne13, colonne14, colenne15) VALUES " & _
                                       "('" & LDrOracle("colonne1").ToString & "'" & _
                                       ", '" & LDrOracle("colonne2").ToString & "'" & _
                                      ", '" & LDrOracle("colonne3").ToString & "'" & _
                                       ", '" & LDrOracle("colonne4").ToString & "'" & _
                                        ", '" & LDrOracle("colonne5").ToString & "'" & _
                                        ", '" & LDrOracle("colonne6").ToString & "'" & _
                                        ", '" & LDrOracle("colonne7").ToString & "'" & _
                                       ", '" & LDrOracle("colonne8").ToString & "'" & _
                                        ", '" & LDrOracle("colonne9").ToString & "'" & _
                                        ", '" & LDrOracle("colonne10").ToString & "'" & _
                                        ", '" & LDrOracle("colonne11").ToString & "'" & _
                                        ", '" & LDrOracle("colonne12").ToString & "'" & _
                                        ", '" & LDrOracle("colonne13").ToString & "'" & _
                                        ", '" & LDrOracle("colonne14").ToString & "'" & _
                                        ", '" & LDrOracle("colonne15").ToString & "')"
                    cmd.ExecuteNonQuery()
                Next
            End If
        End Sub
    Imaginez ce code pour 50 tables de ma base 1, c'est un peu lourd (un peu )
    Peut être y'a t-il mieux à faire

    Merci d'avance

  2. #2
    Expert éminent Avatar de Pol63
    Homme Profil pro
    .NET / SQL SERVER
    Inscrit en
    Avril 2007
    Messages
    14 198
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Puy de Dôme (Auvergne)

    Informations professionnelles :
    Activité : .NET / SQL SERVER

    Informations forums :
    Inscription : Avril 2007
    Messages : 14 198
    Par défaut
    ne pas faire oracle->vb puis vb->access mais oracle-> access
    Cours complets, tutos et autres FAQ ici : C# - VB.NET

  3. #3
    Membre confirmé Avatar de jlm22
    Homme Profil pro
    Etudiant
    Inscrit en
    Décembre 2010
    Messages
    203
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : France

    Informations professionnelles :
    Activité : Etudiant

    Informations forums :
    Inscription : Décembre 2010
    Messages : 203
    Par défaut
    j'ai pris access pour les test en attendant d'avoir fait la base Oracle, la copie se fera de Oracle > Oracle

  4. #4
    Expert éminent Avatar de Pol63
    Homme Profil pro
    .NET / SQL SERVER
    Inscrit en
    Avril 2007
    Messages
    14 198
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Puy de Dôme (Auvergne)

    Informations professionnelles :
    Activité : .NET / SQL SERVER

    Informations forums :
    Inscription : Avril 2007
    Messages : 14 198
    Par défaut
    dans ce cas c'est encore mieux

    après selon la finalité y a peut être encore plus simple ou totalement différent, mais tu ne nous as pas dit dans quel but tu veux faire une copie ...
    Cours complets, tutos et autres FAQ ici : C# - VB.NET

  5. #5
    Membre confirmé Avatar de jlm22
    Homme Profil pro
    Etudiant
    Inscrit en
    Décembre 2010
    Messages
    203
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : France

    Informations professionnelles :
    Activité : Etudiant

    Informations forums :
    Inscription : Décembre 2010
    Messages : 203
    Par défaut
    En faite j'ai ma première base qui est purger tout les 2 mois pour que les requêtes soit plus rapide pour les utilisateurs, et pour avoir un historique il faut avoir une base qui est une fourchette de donnée d'environ 3 ans, il faut donc que tout les jours j'envoie les données d'une base vers l'autre.

  6. #6
    Expert éminent Avatar de Pol63
    Homme Profil pro
    .NET / SQL SERVER
    Inscrit en
    Avril 2007
    Messages
    14 198
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Puy de Dôme (Auvergne)

    Informations professionnelles :
    Activité : .NET / SQL SERVER

    Informations forums :
    Inscription : Avril 2007
    Messages : 14 198
    Par défaut
    il y d'autres solutions pour avoir des perfs que de purger une base (des indexs, un schéma intelligent ...)
    Cours complets, tutos et autres FAQ ici : C# - VB.NET

  7. #7
    Membre confirmé Avatar de jlm22
    Homme Profil pro
    Etudiant
    Inscrit en
    Décembre 2010
    Messages
    203
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : France

    Informations professionnelles :
    Activité : Etudiant

    Informations forums :
    Inscription : Décembre 2010
    Messages : 203
    Par défaut
    Les indexs sont déjà présent (de plus trop d'index tue l'index, c'est pas en ayant une flopper d'index que la base iras plus vite il faut les choisir judicieusement sinon aucun interet) , le schéma est "intelligent" aussi ^^

    Tu t'éloignes du sujet ! je voulais savoir s'il y avait une autre solution que mes insert (au passage le fait que je travaille avec vb est une contrainte du cahier des charges donc a moins que tu me trouves un moyen de faire un update de ma base 2 tout les soirs a 00h sans passer par vb ! j'ai pensé au trigger mais c'est trop lourd a mettre en place et trop couteux).

    J'ai aussi pensé a une sauvegarde incrémentale, mais je n'ai aucune idée du moyen de mettre en place ce système en vb (A cogiter ) et sinon je sèche un peu

    Merci pour ton aide

  8. #8
    Expert éminent Avatar de Pol63
    Homme Profil pro
    .NET / SQL SERVER
    Inscrit en
    Avril 2007
    Messages
    14 198
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 43
    Localisation : France, Puy de Dôme (Auvergne)

    Informations professionnelles :
    Activité : .NET / SQL SERVER

    Informations forums :
    Inscription : Avril 2007
    Messages : 14 198
    Par défaut
    je ne connais pas oracle, mais sur sql server il y a des tas de moyens de faire ce que tu veux faire sans vb (ou avec juste une ligne de code en vb pour démarrer le truc) et de manière très performance (genre une procédure stockée insert into autrebase.tabletruc select * from tabletruc)

    donc je serais toi j'irais demander sur le forum oracle tu auras plus de réponses efficaces qu'ici

    par contre donne leur les détails que tu n'as pas donné ici (plusieurs serveurs oracle ou un seul avec les 2 bases dedans etc...)
    Cours complets, tutos et autres FAQ ici : C# - VB.NET

  9. #9
    Membre éclairé Avatar de lukeni2
    Homme Profil pro
    Administrateur systèmes et réseaux
    Inscrit en
    Février 2008
    Messages
    92
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 45
    Localisation : Congo-Kinshasa

    Informations professionnelles :
    Activité : Administrateur systèmes et réseaux
    Secteur : Finance

    Informations forums :
    Inscription : Février 2008
    Messages : 92
    Par défaut
    Si les deux bases de données se trouvent sur le même serveur, une seul requête sql peu faire l'affaire:
    insert into basedestination.nomtable select * from basesource.nomtable where condition.

  10. #10
    Membre chevronné
    Profil pro
    Inscrit en
    Février 2010
    Messages
    291
    Détails du profil
    Informations personnelles :
    Âge : 56
    Localisation : France

    Informations forums :
    Inscription : Février 2010
    Messages : 291
    Par défaut
    Bonjour,

    Je ne pratique pas Oracle, mais une solution utilisée en Postgres est la suivante.

    Une base de donnée Maître sur un serveur, une base de données de réplication sur un autre. Pour chaque requête update, delete, insert sur la base de données maître création d'un fichier log contenant ces requêtes. Sur le serveur "esclave" un programme en tâche de fond (un service) qui va régulièrement lire ce fichier log et met à jour la BD de réplication.

    Autre solution qui réside dans le stockage, avoir une baie de stockage qui permet de faire des snapshots et on fait une image de la base à intervalles réguliers. Mais cela à un coût (dans les 20-30 k€ pour une solution de stockage à 12 To). Pour ma part j'utilise ça:

    http://www.hds.com/products/storage-...rage-2100.html

  11. #11
    Membre confirmé Avatar de jlm22
    Homme Profil pro
    Etudiant
    Inscrit en
    Décembre 2010
    Messages
    203
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : France

    Informations professionnelles :
    Activité : Etudiant

    Informations forums :
    Inscription : Décembre 2010
    Messages : 203
    Par défaut
    salut salut

    Nos amis du forum Oracle m'ont orienté vers un logiciel d'Oracle nommée Streams pas facile facile à mettre en place mais sa marche pas mal. Juste un test qui ne fonctionne pas c'est la coupure réseaux qui empeche l'utilisateur d'ajouter des donnée dans la table source mais bon je suis dessus y'a forcément un moyen de contourner ce problème

    A voir

Discussions similaires

  1. VB .Net et copie de base de donnees
    Par vinczente dans le forum VB.NET
    Réponses: 7
    Dernier message: 17/04/2009, 10h33
  2. requete copie de base
    Par majeb dans le forum MS SQL Server
    Réponses: 1
    Dernier message: 16/08/2005, 18h25
  3. Copie de base
    Par ptidoudou02 dans le forum MS SQL Server
    Réponses: 4
    Dernier message: 03/05/2005, 14h39
  4. Probleme de de copie de base de données
    Par valentin4949 dans le forum Access
    Réponses: 3
    Dernier message: 01/11/2004, 16h54
  5. Problème Lors d'un copie de base
    Par 79Charles dans le forum Administration
    Réponses: 17
    Dernier message: 19/08/2004, 15h13

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo