Synchroniser tables de deux bases de données en VB.NET

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Synchroniser tables de deux bases de données en VB.NET

ofnipus

Bonjour à tous !

Je développe actuellement un programme en VB.net avec Visual Studio.
La couche d’accès aux données réside en un server Microsoft SQL Server 2005.
Les clients traitent les informations de la base de données du serveur.
Seulement, certains clients seront amenés à utiliser le programme à l’extérieur (les commerciaux).
Pour leurs permettre l’accès (en lecture seulement) à la base de données, une copie des tables à été effectuée sur une base local (SQL Serveur 2005 Edition Express).

Mon problème, est que si la base de donnée distante (du serveur) est mise à jours (nouveau clients, nouveaux devis, etc.), l’utilisateur doit pouvoir mettre à jour sa base de donnée locale via une fonction de synchronisation : « Synchroniser ma base locale avec la base de donnée du serveur ».

Seulement, je ne sais pas comment programmer cette fonction.
Voici le prototype que pourrais être cette fonction, mais comment la programmer …
Sub SynchroniserBase(byval serveur_distant as string, byval serveur_local as string)
.
End Sub

(Dans l’accès aux données, j’ai su utiliser l’objet SQLConnection pour charger mon DataSet pour les traitements)
Qu’elle démarche à suivre pour une synchronisation ?
Merci par avance pour votre aide !

Message édité par ofnipus le 05-10-2007 à 11:29:06

Publicité

MagicBuzz

Le plus simple, c'est de passer par les outils de réplication de SQL Server directement. SQL Server Express contient tout ce qu'il faut pour ça.

Autre solution, vider ta table locale, charger la table distante dans une DataTable, puis recopier les lignes de ce datatable dans un autre qui provient d'un select sur la base locale. Un simple dt.Update() permettera de remplir la base locale. Attention cependant, c'est lent comme méthode, et applicable uniquement si le volume des données n'est pas trop important.

Encore une solution... Un drop de ta table locale, puis un create as select à partir d'une requête réportée (serveur lié par exemple)

ofnipus

Merci pour ta réponse qui ouvre plusieurs solutions.

Pour ce qui est de la première, en effet, je me suis informé sur la réplication, mais il semblerai que celle-ci ne soit possible avec l'Edition Express de SQL Server (en effet, toute les versions sont Express, même sur le serveur).

Pour la deuxième, c'été la seule idée que j'avais, avec prés de 500 enregistrements sur environs une dizaine de tables, j'ai peur de la lenteur de la synchronisation.

En revanche, ta dernière solution m'intéresse (par élimination), mais je ne vois pas trés bien ce que tu veux dire par la...
Peux- tu développer ?

Merci encore.

Message cité 1 fois
Message édité par ofnipus le 01-10-2007 à 17:52:37

ixemul

Nan mais sans blague ! ⚡

ofnipus a écrit :

500 Enreg par table c'est "Minuscule"

---------------
VA APPRENDRE ET REVIENS QUAND TU SAIS, SINON ABSTIENT TOI C'EST UN GRAND CONSEIL QUE JE TE DONNE... TU ES INCOMPÉTENT ET C'EST UNE RÉALITÉ, TU N'AS RIEN A FAIRE ICI FAUT S'Y CONNAITRE ... -Jojo1998 - RIP - http://tinyurl.com/qc47ftk

ofnipus

Vive les SGBR alors !!!!! Chouette !!!!

Jvais faire ca.

Derniére question ...
Existe t'il une solution "générique" pour permettre à un programme client d'accés à un SQL Server en mode HORS CONNEXION ? (les commerciaux chez les clients, sans accés internet).

Merci encore !

Message cité 1 fois

ixemul

Nan mais sans blague ! ⚡

ofnipus a écrit :

Un SQL Server en local sur le pc portable

ofnipus

Avec une réplication sur le serveur principal ... OK

Mais ... ca demande d'avoir une version non-gratuite de SQL Server, ce que l'entreprise dans laquelle je suis en stage ne peut pas se permettre, tant pis. Merci encore pour toute ces info !!

Message édité par ofnipus le 01-10-2007 à 18:20:39

ofnipus

Me revoilà, toujours pour le même problème...

Rappel : les enregistrements ajoutés en mode "hors connexion" sont ajouté dans la base locale du client, avec un ID contenant le 'CODE UTILISATEUR' : « ID_USERxxxxx »
Pour effectuer une synchronisation, j’ai découpé les taches en 2 étapes, et j’ai écrit les requêtes SQL pour ce faire :
1/ Mettre à jour la table de la base SERVER

Code :

INSERT INTO [server].clients
SELECT *
FROM [local].clients
WHERE id_client LIKE (‘ID_USER%’)
MINUS
SELECT * FROM [server].clients

2/ Mettre à jour la table de la base LOCAL

Code :

DROP TABLE [local].clients
CREATE TABLE [local].clients
AS SELECT * FROM [server].clients

Je ne vois pas comment faire pour faire exécuter ces requêtes sans erreurs, merci de votre aide.

Message édité par ofnipus le 04-10-2007 à 11:10:39

MagicBuzz

plutôt qu'un drop, utilise un truncate, ça évite de devoir recréer la table.

sinon, c'est quoi tes erreurs ?

ofnipus

Je ne sais pas où et comment exécuter cette requête.
Je suis partis du principe que la synchronisation été un programme à lui seul (programme que je réimplanterai après dans mon soft sous forme de procédure SUB SynchroBase).

J'ai écrit les requêtes, mais que mettre dans ma procédure pour l'exécution correcte de celle-ci ?

PS: éxécuter une requête sur une base, je m'en sort, mais une sur 2 bases en même temps, c'est la ou est le malaise :s

Merci pour votre aide !

Message édité par ofnipus le 04-10-2007 à 11:20:19

Publicité

MagicBuzz

regarde du côté de "sp_addserver"

ofnipus

Je ne comprend pas ...
A quoi sert cette procédure ?

ofnipus

Pour recardrer mon probléme, le voici en une phrase :

"Comment, en VB.net, exécuter une requête sur 2 tables de 2 bases de données de 2 serveurs SQL Server 2005 différentes ?"

Table_server = Server (SQL Server 2005EX) >> maBase >> maTable
Table_local = myHost (SQL Server 2005EX) >> maBase >> maTable

Merci !

Message édité par ofnipus le 04-10-2007 à 12:15:10

MagicBuzz

Je répète.

Regarde du côté de "sp_addserver"

ofnipus

Ca marche, je vais voir ca de plus prés ... Merci

MagicBuzz

Et n'oublie pas de regarder les articles anexes :

Reference
sp_addlinkedserver (Transact-SQL)
sp_addremotelogin (Transact-SQL)
sp_dropremotelogin (Transact-SQL)
sp_dropserver (Transact-SQL)
sp_helpremotelogin (Transact-SQL)
sp_helpserver (Transact-SQL)
sp_serveroption (Transact-SQL)
System Stored Procedures (Transact-SQL)
Security Stored Procedures (Transact-SQL)

ofnipus

AAA ...

Tout ca ne serai pas en rapport avec la troisiéme solution que tu ma proposé ... ?

(Serveur lié ...)

Message édité par ofnipus le 04-10-2007 à 12:25:08

MagicBuzz

exactement

ofnipus

Ca y est, je suis content, j'ai bien avancé ...

J’ai ajouté un SERVER LIE dans ma base de données locale

Code :

sp_addlinkedserver N'pcserver\sqlexpress'

, puis j’ai créé une procédure de synchronisation (maj_data).

Code :

CREATE PROCEDURE maj_data (@id int) as
insert into [PCSERVER\SQLEXPRESS].[Base CartoRapido].[dbo].devis
select *
from devis
where id_devis > @id * 100000
and id_devis < (@id+1)*100000 - 1
and id_devis not in (select id_devis from [PCSERVER\SQLEXPRESS].[Base CartoRapido].[dbo].devis)
------------- MISE A JOUR DE LA BASE SERVER -------------
DROP TABLE semaines
SELECT * INTO semaines FROM [PCSERVER\SQLEXPRESS].[Base CartoRapido].[dbo].semaines
------------- MISE A JOUR DE LA BASE LOCALE / SEMAINES -------------
DROP TABLE distributions
SELECT * INTO distributions FROM [PCSERVER\SQLEXPRESS].[Base CartoRapido].[dbo].distributions
------------- MISE A JOUR DE LA BASE LOCALE / DISTRIBUTION -------------
DROP TABLE communes
SELECT * INTO communes FROM [PCSERVER\SQLEXPRESS].[Base CartoRapido].[dbo].communes
------------- MISE A JOUR DE LA BASE LOCALE / COMMUNES -------------
DROP TABLE secteurs
SELECT * INTO secteurs FROM [PCSERVER\SQLEXPRESS].[Base CartoRapido].[dbo].secteurs
------------- MISE A JOUR DE LA BASE LOCALE / SECTEURS -------------
DROP TABLE devis
SELECT * INTO devis FROM [PCSERVER\SQLEXPRESS].[Base CartoRapido].[dbo].devis
------------- MISE A JOUR DE LA BASE LOCALE / DEVIS -------------
DROP TABLE clients
SELECT * INTO clients FROM [PCSERVER\SQLEXPRESS].[Base CartoRapido].[dbo].clients
------------- MISE A JOUR DE LA BASE LOCALE / CLIENTS -------------

Le soft client travaille maintenant sur sa base locale. Pour synchroniser, il n’y a plus qu’a faire appel à la procédure maj_data de l’extérieur (à partir du soft client en VB.net)

Code :

Dim connection As New SqlConnection
Dim sql_data_adapter As New SqlDataAdapter
Dim sql_command = New SqlCommand
connection.ConnectionString = "Data Source=" & p_server_local & "\SQLEXPRESS;Initial Catalog=" & p_bdd & ";Integrated Security=True"
sql_command = sql_connexion.CreateCommand()
sql_command.CommandText = "execute maj_data " & p_id_user
Try
connection.Open()
data_set = New DataSet
sql_data_adapter.Fill(data_set, "table" )
Catch ex As Exception
End Try

PB : il me met «procédure introuvable »… pourtant, dans Management Studio, quand je fait appel à cette procédure dans une requête, tout passe bien !

Message édité par ofnipus le 04-10-2007 à 18:38:04

MagicBuzz

A quelques erreurs de syntaxes près -y'a pas d'intellisense sur le forum - (et en C#, mais c'est quasi la même syntaxe comme tu peux voir, puisque ce sont les mêmes objets) :

Code :

sql_command.CommandText = "maj_data";
sql_command.CommandType = CommandType.StoredProcedure;
SqlParameter p = sql_command.CreateParameter();
p.SqlDataType = SqlDataType.Int;
p.Name = "id";
p.Direction = ParameterDirection.Input;
p.Size = 4;
p.Value = p_id_user;
sql_command.AddParameter(p);
try
{
  sql_command.Prepare();
  sql_command.ExecuteNonQuery();
}
catch {}

Message édité par MagicBuzz le 04-10-2007 à 19:17:26

ofnipus

YOUPI !!!

Ca marche !! Merci INIFINIMENT pour ton aide !!

Voici le code VB.net pour ceux que ca pourrait intérresser :

Code :

Dim connection As New SqlConnection
connection.ConnectionString = "Data Source=" & p_server2 & "\SQLEXPRESS;Initial Catalog=" & p_bdd & ";Integrated Security=True"
Dim sql_command As SqlCommand
sql_command = connection.CreateCommand
sql_command.CommandText = "maj_data"
sql_command.CommandType = CommandType.StoredProcedure
Dim p As New SqlParameter
p = sql_command.CreateParameter
p.SqlDbType = SqlDbType.Int
p.ParameterName = "id"
p.Direction = ParameterDirection.Input
p.Size = 4
p.Value = p_id_user
sql_command.Parameters.Add(p)
Try
connection.Open()
sql_command.Prepare()
sql_command.ExecuteNonQuery()
Catch ex As Exception

End Try

Merci pour tous, a bientôt !!

Message édité par ofnipus le 15-10-2007 à 14:51:42

ofnipus

Attention : Faute de ne pas avoir suivit le consseil de Magic Buzz concernant le DROP > TRUNCATE, ma procédure de mise à jours s'effectuer bien, mais occasionnent la destruction des tables (DROP), il s'en trouvai par la suite que les relations et les clé primaires et étrangére sont supprimer.
En effet, il me fallait bien utiliser un TRUNCATE pour conserver la structure des tables, et donc leur relation.

Ceci ma occasionné quelques cheveux en moins avant de pouvoir trouver pourquoi tout le programme planter suite à une synchro !

Publicité

FORUM HardWare.fr

Programmation

C#/.NET managed

Synchroniser tables de deux bases de données en VB.NET

Sujets relatifs
Serveur d'application .NET	programmation pour crypter des données
Utilisation des web services avec Visual Studio 2008 (.NET frwk 3.5)	Synchro de bases access sous access
Application de réplication entre 2 bases différentes	pb formulaire html recuperer données avc perl/cgi ou c++
[WINDEV] Avis sur ce produit face à .NET	[VB.Net 1.1] Scrollbars "incompletes"
Charge de travail d'une migration VB vers VB.NET / C# / JAVA	probléme de base de données une fois pausé sur serveur
Plus de sujets relatifs à : Synchroniser tables de deux bases de données en VB.NET

Page générée en 0.067 secondes