Bonjour à tous,
Voici un extrait de mon code qui s'execute sur un serveur SQL en réseau :
Cependant, la table étant tellement grosse, cela met énormément de temps pour que le fichier soit créer sur un share réseau.
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 Dim ConnSQL As String = "Data Source=" & SelectedServer & ";Initial Catalog=" & SelectedDatabase & ";Persist Security Info=True;User ID=" & Username & ";Password=" & Password & "" Dim sqlConnect As SqlConnection = New SqlConnection(ConnSQL) sqlConnect.Open() ' Création du SqlDataAdapter Dim da As SqlClient.SqlDataAdapter = New SqlClient.SqlDataAdapter("Select * from Clients", sqlConnect) ' Création d'un DataSet Dim ds As DataSet = New DataSet() ' Remplissage du DataSet avec le SqlDataAdapter da.Fill(ds) ' Ecriture du fichier XML au moyen de la méthode WriteXml ds.WriteXml(FolderArchive & FileName & ".xml", XmlWriteMode.IgnoreSchema)
Existe t il un moyen pour optimiser cela et créer le fichier rapidement ?
Merci à tous pour vos réponses...
Partager