Poignées privées BackgroundWorker1.DoWork du sous-marin BackgroundWorker1_DoWork (expéditeur de ByVal comme System.Object, ByVal e comme System.ComponentModel.DoWorkEventArgs)
Faible bgw1 comme BackgroundWorker = C (expéditeur, BackgroundWorker)
Faibles clbItems comme liste (de corde) = C (e.Argument, liste (de corde))
Faible article comme corde
Obscurcir l'escroquerie en tant que nouveau SqlConnection (My.Settings.MyConnectionString)
escroquerie. S'ouvrir ()
Obscurcir le cmd en tant que nouveau SqlCommand ()
cmd. Raccordement = escroquerie
cmd.CommandTimeout = 0
cmd.CommandType = CommandType.StoredProcedure
Faibles cmd1 en tant que nouveau SqlCommand ()
cmd1.Connection = escroquerie
cmd1.CommandTimeout = 0
cmd1.CommandType = CommandType.StoredProcedure
cmd1.CommandText = « Execution_flag »
cmd1.Parameters.Add (« @stor_proc_name », SqlDbType.NVarChar)
Pour chaque article dans les clbItems
bgw1.ReportProgress (0, article)
cmd.CommandText = article
cmd.ExecuteNonQuery ()
cmd1.Parameters (« @stor_proc_name »). Valeur = article
cmd1.ExecuteNonQuery ()
Après
escroquerie. Se fermer ()
Finir le sous-marin
|