[Débutant] convertir base de donnees [Résolu]

[frag132]

Bonjour,

J'ai jusqu’à maintenant manipulé microsoft access pour créer ma base de données en .mdb.
Cependant en application les performances de mon logiciel sur réseau se sont avérées très médiocres.
J'aimerai convertir ma base en .db "adaptive server anywhere 11", ce qu'utilise les pc actuellement pour gérer d'autres bases de données.
Cependant je suis bloqué car je ne sais pas trop comment m'y prendre...
Quelqu'un peux t-il m'éclairer ? merci.

[hunteshiva]

Bonjour,

Envoyé par frag132

J'aimerai convertir ma base en .db "adaptive server anywhere 11", ce qu'utilise les pc actuellement pour gérer d'autres bases de données.

Quel est mle niveau d’accessibilité que tu veux? réseau local?
peut tu nous donner les grandes lignes de ta BDD actuelle *le nombre de lignes et de colonne suffira *

[frag132]

bonjour et merci d'avoir répondu.
Il y a 6 tables, la plus grande comporte 3 colonnes et 109 lignes. 2 des 3 colonnes sont en relations avec d'autres tables.
Les autres tables font 4 colonnes environ pour moins de lignes (genre 10).
La base est en réseau local pour les pc locaux, mais accessible depuis des connexions de tout le sud via des connexions adsl basiques (1 mega minimum) sur le domaine.
La base données en elle même est placée dans un dossier partagé sur la racine de l'un des disques durs sur l'un de nos pc.

[Neiflheim]

Ta base de données ne me semble pas très lourde, tu as combien de connexion simultanées environ?

Sinon le problème peux se situer au niveau de ton logiciel d'interrogation aussi...

[Er3van]

En effet, se prendre le chou à migrer pour même pas 5Mo de données, je pense que c'est un peu une perte de temps; tu mettras moins de temps à reconstruire ta base.

Ceci dit, pour revenir au besoin de base, pourquoi est-ce une base sous format de fichier et pas d'un serveur de base de données ?

Etant donné que les données qui sont dessus sont faites pour être exposées depuis un peu partout ton entreprise, autant en profiter pour construire une architecture plus solide. Si tu as besoin de garder le mode fichier, tu peux construire un WebService qui expose les données, plutôt que les clients se connectent directement sur la base.

[frag132]

et bien niveau connexion simultanées, il y en aura tres peu 10 en même temps maximum.
Niveau connexion dans le programme, j'ai un module de connexion/deconnexion et des fonctions contenant des requetes au démarrage:

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
 
Module module_bdd
 
    Public Function connection() As System.Data.OleDb.OleDbConnection
        Dim MyConnection As New System.Data.OleDb.OleDbConnection()
        Try
            MyConnection.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data source=C:\\xx.xx.xx.xx\base.mdb;Jet OLEDB:Database Password=pass;"
            MyConnection.Open()
        Catch ex As Exception
            MessageBox.Show("Impossible d'établir la connection à la base." & ex.Message)
        End Try
        Return MyConnection
    End Function
 
    'deconection de la base
    Public Sub deconnection(ByVal MyConnection As System.Data.OleDb.OleDbConnection)
        Try
            MyConnection.Close()
        Catch ex As Exception
            MessageBox.Show("Impossible de se déconnecter de la base." & ex.Message)
        End Try
    End Sub
 
End Module

Apres mon programme s'organise comme ceci : Au lancement le Form1 se connecte a la bdd, puis les fonctions suivantes font diverses operations de recuperations de routine :

Code :

1
2
3
4
5
6
7
8
9
10
 
Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        connection = module_bdd.connection
        changecomputername()
        recup_nom_site() 
        agencename()
        recup_service()
        Timer1.Start()
        activesendbutton() ' bouton envoyer desactivé
    End Sub

recup_nom_site, agencename, recup_service, un exemple, je vous met recup_nom_site :

Code :

1
2
3
4
5
6
7
8
9
10
11
 
Sub recup_nom_site()
        Dim ReadSQL As OleDbDataReader
        Dim CommandSQL As New OleDbCommand("Select centrale.centrale_nom FROM centrale WHERE centrale.centrale_pc='" & Environment.MachineName & "'", connection)
        ReadSQL = CommandSQL.ExecuteReader
        Do While ReadSQL.Read()
            Centralename.Text = (ReadSQL.GetValue(0))
        Loop
        ReadSQL.Close()
 
    End Sub

Y a t-il un moyen d'optimiser tout ca ?.. Mon principal problème est que quand je lance le programme rien ne s'affiche a l'ecran, on a beau attendre 10 minutes, rien du tout, malgrès que le processus est bien la et qu'il ne peut pas être arrêté sans redémarrer le pc...

[Er3van]

Clairement, l'architecture globale n'est pas du tout adaptée à l'utilisation.

Et ouvrir une connexion à la base au début et la fermer à la fin est une très mauvaise idée, car ça veut dire que pendant toute la durée d'exécution du programme ta connexion reste ouverte ! (si j'ai bien compris ton procédé...)

En revanche, vu la taille de ta base, je suis un peu surpris que ça prenne plus de 10s, même avec une latence sur le réseau. Le problème vient peut-être du fait que les accès concurrents bloquent l'accès à ta base.

Tu sais à quel niveau de ton programme ça bloque?
Ça ne lance pas d'exception ni rien?
Si une seule instance tourne, ça marche bien?

Ma préconisation sera d'avoir un client lourd (vb.net par exemple) qui interroge un WebService qui se gère de faire les requête vers la base.
Un WebService c'est pas très dur à faire, surtout depuis le framework 3.5, en revanche ça t'impose d'avoir un serveur IIS pour le faire tourner en central.

Si ce n'est pas possible, l'autre option (qui n'est pas incompatible avec la première, si tu fais les deux c'est même mieux!) c'est de migrer ta base vers un serveur de base de données.
Si le prix de la licence est un frein, SQL Server Express 2008 R2 est gratuite ! (Sinon, rien ne t'empêche de t'orienter vers du PostGreSQL, même si les drivers sont moins stables/fiables)

En espérant que ça t'aide !

[frag132]

Je suis conscient que se connecter des le debut et rester connecté tout le long n'est pas judicieux.
Cependant le programme s'adapte au pc sur lequel il est lancé, et y affiche une multitude d'information depuis la base de données.
A la limite je peux peut-être deconnecter la base de données apres la premiere procédure de récuperation de données ?
Le problème c'est qu'a chaque clique dans une listbox specifique, cela affiche en temps réel ce que contient la base de données...

PS : Les pc sont sous Framework 2.0

[Er3van]

Dans ce cas il faut que tu ouvres/fermes la connexion à chaque action (clic sur listbox).

Faire du synchrone en direct sur une base c'est un peu "dangereux" comme approche. C'est en lecture uniquement ?

[frag132]

le logiciel met 2x plus de temps a se lancer avec la technique du deco/reco chez moi...

[Er3van]

Je ne vois pas de lien entre le temps que ton programme met à se lancer, et le fait d'avoir changer la façon de se connecter à la base quand tu cliques sur un bouton.. sauf éventuellement si tu charges tout au lancement... et si la connexion en elle même est longue, du fait du répertoire partagé notamment.

Si c'est le cas, ça confirme qu'il faut que tu migres ta base vers un serveur de base de données.

[frag132]

en effet tout se fait au demarrage, regarde mon extrait de code un peu plus haut -> "Form1_load".

Et concernant le serveur de base données, et bien nous on a un pc avec le fichier stocké dessus mais c'est tout ! comment je pourrai ameliorer la vitesse du coup ? existe t-il des petits logiciels a placer sur le pc dit "serveur" conçus pour améliorer ça ?

[Er3van]

La base est en réseau local pour les pc locaux, mais accessible depuis des connexions de tout le sud via des connexions adsl basiques (1 mega minimum) sur le domaine.

on a un pc avec le fichier stocké dessus mais c'est tout !

C'est un peu en contradiction... chaque PC a son propre fichier ou il est stocké sur le réseau ?

Et vous n'avez pas de serveur du tout pour installer SQL Server ?
Dans ce cas ça devient compliqué...

----

Effectivement, je n'avais pas fait le rapprochement avec ton form1_Load.

Ceci dit, je me suis peut-être mal exprimé :
Les connexions doivent être ouvertes/fermées sur les actions utilisateur, ce n'est pas utile entre chaque étape de l'initialisation.
Cela donnerait par exemple :

Code vb :

1
2
3
4
5
6
7
8
9
10
11
12
 
Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        connection = module_bdd.connection
        [...] // Initialisation
        module_bdd.deconnection
    End Sub
 
Sub ListBox1_OnXXXX() /* selon ton event */
        connection = module_bdd.connection
        [...] // Maj de ta listBox
        module_bdd.deconnection
End Sub

[frag132]

merci pour tes réponses.
La base est sur un seul pc, sur lequel d'autre pc viennent chercher les info,
L'extrait de code que tu viens d'envoyer c'est ce que j'ai actuellement dans le code (j'ai du prendre le mauvais fichier pour mettre mes extraits de code car j'ai déjà fait comme ca ^^), j'ai redemarré les pc "clients" et le logiciel met 30 secondes a s'ouvrir, et met 5 secondes pour actualiser les listbox.
J'ai donc installé WAMPServer 2 et je vais refaire ma base sous PHPmyAdmin.
Ce sera surement plus rapide....
Existe t-il une méthode pour porter mon .mdb en phpmyadmin ? j'ai essayé de la porter table par table en .csv mais les liens ne tiennent pas du coup je suis parti pour tout refaire !...

[Er3van]

Si la base est sur un seul PC, alors tu n'as qu'à installer un SQL Server sur ce pc là ! (En espérant qu'il soit toujours accessible...)

Par contre, avec WAMP/PHPMyAdmin tu m'as achevé, que vient faire PHP ici ?

[Bluedeep]

Envoyé par Er3van

Et vous n'avez pas de serveur du tout pour installer SQL Server ?
Dans ce cas ça devient compliqué...

Non, la version Express s'installe parfaitement sur un poste client, et vu le traffic ici, ce ne sera pas un problème. (c'est vrai aussi pour la version normale mais en "développeur edition"; et dans ce cas, son utilisation en exploite serait une violation de l'EUA).

[Er3van]

Oui, bien d'accord, c'est ce que je dis un peu plus bas :

Envoyé par Moi-même

Si la base est sur un seul PC, alors tu n'as qu'à installer un SQL Server sur ce pc là ! (En espérant qu'il soit toujours accessible...)

J'entendais par serveur une machine connectée au réseau et accessible pendant la période d'utilisation, avec si possible personne ne l'utilisant en direct et dédiée à de l'applicatif... mais un PC peut faire l'affaire.

EDIT : Pour l'EUA, effectivement, ça peut être un critère si tu veux pas de souci avec Microsoft ! :p

[Bluedeep]

Envoyé par Er3van

EDIT : Pour l'EUA, effectivement, ça peut être un critère si tu veux pas de souci avec Microsoft ! :p

Il n'y a aucun problème avec l'EUA de la version Express, qu'il est parfaitement licite d'utiliser dans une environnement de production.

Je parlais de l'EUA de la version Developper Edition qui ,fonctionnellement, est une version archi-complète, pas cher du tout (moins de 100 €) mais n'est pas autorisée en prod.

J'admet que mon message pouvait être ambigüe, mais j'insiste : l'utilisation de SQL Server EXpress est parfaitement légale en prod.

[frag132]

Ca y est j'ai tout porté sur phpmyadmin, j'ai crée la base, en utilisant wamp server 2.
Reste plus qu'a m'y connecter avec mon logiciel en vb.net : la question est comment
J'ai crée l'utilisateur lambda pour tester. Quelqu'un peu me donner un exemple de connexion a une base de ce genre ? actuellement pour ma base access j'utilisais :

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
 
Module module_bdd
 
    Public Function connection() As System.Data.OleDb.OleDbConnection
        Dim MyConnection As New System.Data.OleDb.OleDbConnection()
        Try
            MyConnection.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data source=C:\\xx.xx.xx.xx\base.mdb;Jet OLEDB:Database Password=pass;"
            MyConnection.Open()
        Catch ex As Exception
            MessageBox.Show("Impossible d'établir la connection à la base." & ex.Message)
        End Try
        Return MyConnection
    End Function
 
    'deconection de la base
    Public Sub deconnection(ByVal MyConnection As System.Data.OleDb.OleDbConnection)
        Try
            MyConnection.Close()
        Catch ex As Exception
            MessageBox.Show("Impossible de se déconnecter de la base." & ex.Message)
        End Try
    End Sub
 
End Module

Après avoir un peu trafiqué j'obtiens :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
 
Public Function connection() As System.Data.SqlClient.SqlConnection
        Dim serverstring As String = "server=localhost;user id=root;password=root;database=nomdelabase"
        Dim SQLConnection As New System.Data.SqlClient.SqlConnection()
        SQLConnection.ConnectionString = serverstring
        Try
                SQLConnection.Open()
        Catch ex As Exception
            MessageBox.Show("Impossible d'établir la connection à la base." & ex.Message)
        End Try
        Return SQLConnection
    End Function

Impossible de me connecter a la base de données qu'il me dit "le serveur est introuvable[..] error 40" pourtant wamp tourne bien bien sur mon pc !

[frag132]

je tiens le bon bout ! quelqu'un utilise un peu les commandes des référence system.data.sql et system.data.sqlclient ?