Приватные ручки BackgroundWorker1.DoWork подводной лодки BackgroundWorker1_DoWork (прислужника ByVal как System.Object, ByVal e как System.ComponentModel.DoWorkEventArgs)
Тусклое bgw1 как BackgroundWorker = CType (прислужник, BackgroundWorker)
Тусклые clbItems как список (шнура) = CType (e.Argument, список (шнура))
Тусклый деталь как шнур
Затемните жулика как новое SqlConnection (My.Settings.MyConnectionString)
жулик. Раскройте ()
Затемните cmd как новое SqlCommand ()
cmd. Соединение = жулик
cmd.CommandTimeout = 0
cmd.CommandType = CommandType.StoredProcedure
Тусклые cmd1 как новое SqlCommand ()
cmd1.Connection = жулик
cmd1.CommandTimeout = 0
cmd1.CommandType = CommandType.StoredProcedure
cmd1.CommandText = «Execution_flag»
cmd1.Parameters.Add («@stor_proc_name», SqlDbType.NVarChar)
Для каждого деталя в clbItems
bgw1.ReportProgress (0, деталь)
cmd.CommandText = деталь
cmd.ExecuteNonQuery ()
cmd1.Parameters («@stor_proc_name»). Значение = деталь
cmd1.ExecuteNonQuery ()
Затем
жулик. Закройте ()
Закончите подводную лодку
|