Punhos confidenciais BackgroundWorker1.DoWork do submarino BackgroundWorker1_DoWork (remetente de ByVal como System.Object, ByVal e como System.ComponentModel.DoWorkEventArgs)
Bgw1 não ofuscante como BackgroundWorker = C (remetente, BackgroundWorker)
clbItems não ofuscantes como a lista (de corda) = C (e.Argument, lista (de corda))
Artigo não ofuscante como a corda
Escurecer o engodo como SqlConnection novo (My.Settings.MyConnectionString)
engodo. Abrir ()
Escurecer o cmd como SqlCommand novo ()
cmd. Conexão = engodo
cmd.CommandTimeout = 0
cmd.CommandType = CommandType.StoredProcedure
Cmd1 não ofuscantes como SqlCommand novo ()
cmd1.Connection = engodo
cmd1.CommandTimeout = 0
cmd1.CommandType = CommandType.StoredProcedure
cmd1.CommandText = “Execution_flag”
cmd1.Parameters.Add (“@stor_proc_name”, SqlDbType.NVarChar)
Para cada artigo nos clbItems
bgw1.ReportProgress (0, artigo)
cmd.CommandText = artigo
cmd.ExecuteNonQuery ()
cmd1.Parameters (“@stor_proc_name”). Valor = artigo
cmd1.ExecuteNonQuery ()
Em seguida
engodo. Fechar ()
Terminar o submarino
|