Диссертация (1137100), страница 15

Просмтор этого файла доступен только зарегистрированным пользователям. Но у нас супер быстрая регистрация: достаточно только электронной почты!

Текст из файла (страница 15)

Оцениваем значение целевых функций (фитнес-функций).int j = 1;String objective_name;String objective_value;String x1 =Convert.ToString(Program.frm5.axSpreadsheet3.get_Range(Program.frm5.axSpreadsheet3.Cells[1, j+ 1]).Value2);while(Convert.ToString(Program.frm5.axSpreadsheet3.get_Range(Program.frm5.axSpreadsheet3.Cells[1, j+ 1]).Value2) != ""){PsSimEng.Value ResultValue =Sim.get_Value(Convert.ToString(Program.frm5.axSpreadsheet3.get_Range(Program.frm5.axSpreadsheet3.Cells[1, j + 1]).Value2));objective_name =Convert.ToString(Program.frm5.axSpreadsheet3.get_Range(Program.frm5.axSpreadsheet3.Cells[1, j+ 1]).Value2);objective_value = Convert.ToString(ResultValue.Number);objective_value = objective_value.Replace(",", ".");OleDbCommand cmd8= new OleDbCommand("insert intoobjectives(ID_PR,n,objective_name, objective_value) values(" + agent_number + "," + q ++ objective_name + "'," + objective_value + ")", connection);cmd8.ExecuteNonQuery();cmd8.Dispose();j++;",'"}//Если в результата выполнения ГА получены новые лучшие решения (DECISIONS), тообновляем их в таблице decisions СУБД для обмена данными между Агентамиfor (int i = 0; i < const_name.Count(); i++){const_name[i] = const_name[i].Replace("(", "[");const_name[i] = const_name[i].Replace(")", "]");String dec_val = Convert.ToString(Sim.get_Value(const_name[i]).Number);109110dec_val = dec_val.Replace(",", ".");OleDbCommand cmd4 = new OleDbCommand("update decisions SET decision_value= " + dec_val + " WHERE decision_name ='" + const_name[i] + "'", connection);cmd4.ExecuteNonQuery();cmd4.Dispose();}String decision_name="";String decision_value="";OleDbDataReader reader2 = null;OleDbCommand cmd7 = new OleDbCommand("select * from decisions", connection);reader2 = cmd7.ExecuteReader();while (reader2.Read()){decision_name = Convert.ToString(reader2[1]);decision_value = Convert.ToString(reader2[2]);decision_value = decision_value.Replace(",", ".");if (decision_value == "") decision_value = "0";OleDbCommand cmd8 = new OleDbCommand("insert intodecisions_full(ID_PR,n,decision_name, decision_value) values(" + agent_number + ", " + q +",'" + decision_name + "'," + decision_value + ")", connection);cmd8.ExecuteNonQuery();cmd8.Dispose();}cmd7.Dispose();}connection.Close();}}}110.

Характеристики

Список файлов диссертации