Файл: 1. Техникоэкономическая характеристика предметной области и предприятия. Анализ деятельности как есть 7.docx

ВУЗ: Не указан

Категория: Реферат

Дисциплина: Не указана

Добавлен: 09.01.2024

Просмотров: 410

Скачиваний: 7

ВНИМАНИЕ! Если данный файл нарушает Ваши авторские права, то обязательно сообщите нам.
HaKrraijHaa". При необходимости она может быть перемещена или удалена.

this .накла AHaaTableAdapter.F ill(this .dbDataSet. Накладная):

}

private void buttonl_Click(object sender, EventArgs e)

{

string query = "SELECT [Наименование] FROM [ТМЦ] WHERE [Код] > @id"; string connectString = "Pro\ider=Microsoft.Jet.OLEDB.4.0;Data Source=db.mdb;";

OleDbConnection con = new OleDbConnection(connectString); con.Open();

OleDbCommand cmd = new 01eDbCommand(query,con);

//cmd.Co mmandText = "SELECT [Наименование] FROM [1МЦ] WHERE [Код]-" +

cneuHaKnaztHoftDataGridView.CurrentRow.Cells ["Column 1"]. Value.ToString();

//string str= Convert.ToString(cmd.ExecuteScalar());

//MessageBox.Show(str);

// con.CloseO;

//ExportTo Exce 1(спецНакладнойОа1а Grid View);

Microsoft.Office.Interop.Excel.Application Exl =new Microsoft.OfFice.Interop.Excel.ApplicationO;

M icrosoft.Office. Interop .Excel.Workbook wb;

XIReferenceStyle RefStyle = Exl.ReferenceStyle;

Exl. Visible = true;

String TemplatePath = SystemWindows.Forms.Application.StartupPath + @"\Огет на оплату.xltx";

try

{

wb = Exl.Workbooks.Add(TenplatePath); //!!!

}

catch (System.Exception ex)

{

throw new Exception("He удалось загрузить шаблон для экспорта " +
ex.Message);

}

Worksheet ws = wb.Worksheets.get_Item( 1) as Worksheet;

intj = 22;

for (int i = 0; i < спецНакладной1)а1аОгк1 View.Columns.Count-1; ++i)

{

cmd.CommandText = "SELECT [Наименование] FROM [ТМЦ] WHERE [Код]=" +

спец Накладной Data Grid Vie w.Rows[i], Cells ["Column 1"]. Value.ToStringQ; string strl = Convert.ToStnng(cmd.ExecuteScalar()); ws.Cells[j. 8] = strl;

ws.Cells [j, 25] = cncHHaK.'iajHofiDataCmd View. Rows [i]. Cel Is [4]. Value.ToStringO; ws.Cells [j, 30] = спецНакладнойОа1а Grid View. Rows[i].Cells[5].Value.ToString();

j++;

}

string shapka = HOMepTextBoxl.Text + " от " + да rdDateT imePicker 1. Value.ToShortDateString(); Microsoft. Office. Interop .Excel. Range mg =

(Microsoft.Office.Interop.Excel.Range)ws.Range[ws.Cells[l, 1], ws.Cells[12, 12]];

mg.Replace("4 от 17 апреля 2007 г.", shapka, Microsoft.Office.Interop.Excel.XlLookAt.xlPart, Microsoft.Office.Interop.Excel.XlSearchOrder.xlByRows, false, Type.Missing, Typc.Missing, Type.Missing); ws .Co lu mns. Entire Co lu mn. AutoFit();

Exl.ReferenceStylc = RefStyle; con.CloseO;

}

public void ExportTo Excel] Data Grid View grid)

{

Microsoft.Office.Interop.Excel.Application Exl =new Microsoft.Office.Interop.Excel.ApplicationO; Microsoft.Office.Interop.Excel.Workbook wb;

XIReferenceStyle RefStyle = Exl.ReferenceStyle;

Exl.Visible = tme;

String TemplatePath = System. Windows .Forms .Application. StartupPath + @"\Счет на оплату, xltx"; try

{

wb = Exl.Workbooks.Add(TemplatePath);

//!!!

}

catch (System.Exception ex)

{

throw new Exception("He удалось загрузить шаблон для экспорта " + ex.Message);

}

Worksheet ws - wb.Worksheets.get_Item(l)as Worksheet; for(int j = 0; j < grid. Columns. Count; ++j)

{

(ws.Cells[l, j + 1] as Range).Value2 = grid.Columns[j].HeaderText; for (int i = 0; i < grid.Rows.Count; ++i)

{

object Val = grid.Rows[i].Cells[j].Value; if (Val != null)

(ws.Cells[i + 2, j + 1] as Range).Value2 = Val.ToStringQ;

}

}

ws .Columns. Entire Co lu mn. AutoFit();

Exl.RefercnceStyle = RefStyle;

ReleaseExcel(Exl as Object);

}

private void ReleaseExcel(object excel)

{

// Уничтожение объекта Excel.

Marshal. Re lcaseComObject(excel);

// Вызываем сборщик мусора для немедленной очистки памяти GC.GetTota!Memory(true);

}

}