АИС "Работа с покупателями"
Реферат - Компьютеры, программирование
Другие рефераты по предмету Компьютеры, программирование
p>
// Копируем файл шаблонный
FileInfo fi1 = new FileInfo(path);
fi1.CopyTo(path2);
String zapr3;
zapr3 = "insert into OPENROWSET('Microsoft.Jet.OLEDB.4.0', 'Excel 8.0; Database=" + path2 + " ; ID=Foks; Password=676676', 'SELECT * FROM [Прайс$]') SELECT Naimenov, KodNom, Strana, MinimPartija, CAST (Cena AS nvarchar) FROM dbo._Nomenklatura, dbo._Ceni, dbo._Ostatki WHERE (([EtoGruppa] = 0) AND (Kolichestvo>0) AND (_Ostatki.Nomen=KodNom) AND (_Ceni.Nomen=KodNom) AND (NomerPrajsa=" +
Session["prs"].ToString() + ") AND (Otec='"+ str +"') ) ORDER BY Naimenov";
// помечаем всё цыфркой 3, дабы 100% не было конфликтов
SqlConnection con3 = new SqlConnection(System.Configuration.ConfigurationSettings.ConnectionStrings["ConnectionForForWeb"].ConnectionString);
SqlCommand cmd3 = new SqlCommand(zapr3, con3);
con3.Open();
cmd3.ExecuteScalar();
con3.Close();
ПРИЛОЖЕНИЕ Д
Код работы с WEB Службой из ASP.NET
//******************************************************************************
//Загрузка номенклатуры, которую получаем от удалённой службы
void Button1_Click(object sender, EventArgs e)
{
int i, vsego; // Счётчик и общее число записей, полученных от Web Службы
DataTable ds = new DataTable();
Sluzba.Service ws = new Sluzba.Service();
ws.Timeout = 1000 * 60 * 5;
try{
ds = ws.VigruzNom(); // Получаем данные с удалённой службы
}
catch{
LabelInfo.Text = "Ошибка доступа к 1С. Подождите 15 минут и повторите попытку";
return;
}
// ds.Tables[0].TableName = "Nomenkl";
// ds.Tables[0].Columns[0].ColumnName = "EtoGruppa";
// ds.Tables[0].Columns[1].ColumnName = "KodNom";
// ds.Tables[0].Columns[2].ColumnName = "Otec";
// ds.Tables[0].Columns[3].ColumnName = "Strana";
// ds.Tables[0].Columns[4].ColumnName = "Naimenov";
// ds.WriteXml(@"C:\ds.xml");
// Подключение к MS SQL Server
SqlConnection konekt = new SqlConnection("Server=FKS;Integrated Security=True;Database=ForWeb");
SqlCommand sqlcom = new SqlCommand("NomenObnovi", konekt);
sqlcom.CommandType = CommandType.StoredProcedure;
SqlParameter param = null;
param = sqlcom.Parameters.Add(new SqlParameter("@KodNom", SqlDbType.Char, 9));
param.Direction = ParameterDirection.Input;
param = sqlcom.Parameters.Add(new SqlParameter("@EtoGruppa", SqlDbType.SmallInt, 9));
param.Direction = ParameterDirection.Input;
param = sqlcom.Parameters.Add(new SqlParameter("@Otec", SqlDbType.Char, 9));
param.Direction = ParameterDirection.Input;
param = sqlcom.Parameters.Add(new SqlParameter("@Strana", SqlDbType.Char, 30));
param.Direction = ParameterDirection.Input;
param = sqlcom.Parameters.Add(new SqlParameter("@Naimenov", SqlDbType.Char, 300));
param.Direction = ParameterDirection.Input;
LabelInfo.Text = "Ждите завершения выгрузки номенклатуры";
vsego = ds.Rows.Count;
konekt.Open();
for (i = 0; i < vsego; i++)
{
sqlcom.Parameters[0].Value = ds.Rows[i][1];
sqlcom.Parameters[1].Value = ds.Rows[i][0];
sqlcom.Parameters[2].Value = ds.Rows[i][2];
sqlcom.Parameters[3].Value = ds.Rows[i][3];
sqlcom.Parameters[4].Value = ds.Rows[i][4];
sqlcom.ExecuteNonQuery();
}
konekt.Close();
LabelInfo.Text = "Выгрузка номенклатуры успешно завершена, обновилось записей - " + vsego;
}