Discussion :

[Pelote2012]

Bonjour

En fait j'ai une fonction dans laquelle j'ai un zippage à faire.
Je voudrai mettre le zippage dans un thread à part et continuer mon traitement de ma fonction principale toto

Code vb :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Private Delegate Sub ThreadDelegate(ByVal obj As MiseADisposition, ByVal Folder As IO.DirectoryInfo)
...
public sub toto(ByVal LaMADAs MiseADisposition, ByVal Folder As IO.DirectoryInfo)
Traitement 1
...
Dim tester As ThreadDelegate = AddressOf Zippage.zippageDossier
Dim params(1) As Object
params(0) = LaMAD
params(1) = Folder
tester.DynamicInvoke(params)
traitement2
...
End Sub

Ce code attend le retour ... je n'arrive pas à dire qu'il exécute en parallèle.
Le traitement d'erreur est interne à Zippage.zippageDossier.
Je n'ai pas besoin et je ne veux pas attendre la fin de Zippage.zippageDossier
(quand je zip des fichiers de plusieurs Go, ça met longtemps et les utilisateurs s'inpatienteront)

Merci de votre aide

[Pelote2012]

A force de grater

Code vb :

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

Dim T As Task = Task.Factory.StartNew(Sub() Zippage.zippageDossier(LaMAD, Folder))