Дипломная работа: Автоматизация складских процессов предприятия ООО «АТОЛ»
Внимание! Если размещение файла нарушает Ваши авторские права, то обязательно сообщите нам
105
}
//сохраняем документ
//колонтитулы
ap.ActiveDocument.Sections[1].Footers[Microsoft.Office.Interop.Word.WdH
eaderFooterIndex.wd
HeaderFooterPrimary].Range.Text = sheetData.Cells[2, 3].value2 == null
? "" : sheetData.Cells[2,
3].value2; ;
ap.ActiveDocument.Sections[1].Headers[Microsoft.Office.Interop.Word.WdH
eaderFooterIndex.wd
HeaderFooterPrimary].Range.Text = sheetData.Cells[1, 3].value2 == null
? "" : sheetData.Cells[1,
3].value2; ;
//получаем список меток с текущей датой и временем
DataRow[] dr1 = bDDataSet1.Метки.Select("КодШаблона=" + sh.КодШаблона
+ " and (КодВидаМетки=3 or КодВидаМетки=4)");
foreach (BDDataSet.МеткиRow m in dr1)
{
documentData.Bookmarks[m.Наименование].Select();
Microsoft.Office.Interop.Word.Selection currentSelection = ap.Selectio
n;
if (m.КодВидаМетки == 3)
currentSelection.TypeText(DateTime.Now.ToShortDateString());
if (m.КодВидаМетки == 4)
currentSelection.TypeText(DateTime.Now.ToShortTimeString());
}
documentData.SaveAs(d.FullName + @"\" + numberDoc + ".docx");
documentData.Close();
if(checkBox1.Checked && sheetData.Cells[j,
sheetData.UsedRange.Columns.Count - 2].Value2 != null )
{
string email = sheetData.Cells[j, sheetData.UsedRange.Columns.Count -
2].Value2 == null ? "" : Convert.ToString(sheetData.Cells[j, sheetData.
UsedRange.Columns.Count -
2].Value2);
string tema = sheetData.Cells[j, sheetData.UsedRange.Columns.Count -
1].Value2 == null ? "" : Convert.ToString(sheetData.Cells[j, sheetData.
UsedRange.Columns.Count -
1].Value2);
string text = sheetData.Cells[j, sheetData.UsedRange.Columns.Count].Va
lue2
106
== null ? "" : Convert.ToString(sheetData.Cells[j, sheetData.UsedRange.
Columns.Count ].Value2);
ClassEmail.SendMail("smtp.mail.ru", "test-diplom-
2017@mail.ru", "test2017",
email,tema, text, d.FullName + @"\" + numberDoc + ".docx");
}
}
ap.Quit();
apData.Quit();
return d.FullName;
}
void ReleaseObject(object obj)
{
try
{
Marshal.ReleaseComObject(obj);
obj = null;
}
catch (Exception ex)
{
MessageBox.Show(@"Unable to release the object " + ex);
obj = null;
}
finally
{
GC.Collect();
}
}
/// <summary>
/// Заполняем экселевский документ
/// </summary>
/// <param name="filename"></param>
/// <param name="sh"></param>
public Microsoft.Office.Interop.Excel.Worksheet FillExcelDoc(string fi
lename,
BDDataSet.ШаблонСтипомRow sh)
{
Microsoft.Office.Interop.Excel.Application ap = new
Microsoft.Office.Interop.Excel.Application();
ap.Visible = false;
Microsoft.Office.Interop.Excel.Workbook book = null;
try
107
{
Microsoft.Office.Interop.Excel.Workbooks excelappworkbooks = ap.Workbo
oks;
ap.Workbooks.Open(filename,
Type.Missing, Type.Missing, Type.Missing, Type.Missing,
Type.Missing, Type.Missing, Type.Missing, Type.Missing,
Type.Missing, Type.Missing, Type.Missing, Type.Missing,
Type.Missing, Type.Missing);
book = excelappworkbooks[1];
//получаем список меток документа
Microsoft.Office.Interop.Excel.Worksheet sheet = book.Worksheets[1];
this.меткиTableAdapter.Fill(this.bDDataSet1.Метки);
foreach (BDDataSet.МеткиRow m in dict.Keys)
{
//ищем нужную метку
foreach (Microsoft.Office.Interop.Excel.Name b in ap.Names)
{
if (b.Name.Equals(m.Наименование))
{
if (dict[m].GetType() == typeof(System.Windows.Forms.TextBox))
{
System.Windows.Forms.TextBox t =
(System.Windows.Forms.TextBox)dict[m];
b.RefersToRange.Value2 = t.Text;
}
else
{
////вставляем таблицу
DataGrid dgv = (DataGrid)dict[m];
System.Data.DataTable dt = (System.Data.DataTable)dgv.DataSource;
//Microsoft.Office.Interop.Word.Table tbl1 =
ap.Selection.Tables.Add(ap.Selection.Range, 1, dt.Columns.Count);
int row = b.RefersToRange.Row;
int col = b.RefersToRange.Column;
////заголовки колонок
for (int i = 0; i <= dt.Columns.Count - 1; i++)
{
Microsoft.Office.Interop.Excel.Range rng =
(Microsoft.Office.Interop.Excel.Range)sheet.Cells[row, i + col];
rng.Value2 = dt.Columns[i].ColumnName;
rng.Borders[XlBordersIndex.xlInsideVertical].LineStyle =
Microsoft.Office.Interop.Excel.XlLineStyle.xlDot;
rng.Borders[XlBordersIndex.xlInsideHorizontal].LineStyle =
Microsoft.Office.Interop.Excel.XlLineStyle.xlDot;
108
rng.Borders[XlBordersIndex.xlEdgeRight].LineStyle =
Microsoft.Office.Interop.Excel.XlLineStyle.xlDot;
rng.Borders[XlBordersIndex.xlEdgeLeft].LineStyle =
Microsoft.Office.Interop.Excel.XlLineStyle.xlDot;
}
////строки таблицы
for (int i = 0; i <= dt.Rows.Count - 1; i++)
{
//вставляем строку, так как под меткой таблицы ниже могут быть
данные и большая таблица может их перетересть
Microsoft.Office.Interop.Excel.Range Line =
(Microsoft.Office.Interop.Excel.Range)sheet.Rows[row + 2 + i];
Line.Insert();
for (int j = 0; j <= dt.Columns.Count - 1; j++)
{
Microsoft.Office.Interop.Excel.Range rng =
(Microsoft.Office.Interop.Excel.Range)sheet.Cells[row + i + 1, j + col]
;
rng.Value2 = dt.Rows[i][j] == null ? "" : dt.Rows[i][j].ToString(); ;
rng.Borders[XlBordersIndex.xlInsideVertical].LineStyle =
Microsoft.Office.Interop.Excel.XlLineStyle.xlDot;
rng.Borders[XlBordersIndex.xlInsideHorizontal].LineStyle =
Microsoft.Office.Interop.Excel.XlLineStyle.xlDot;
rng.Borders[XlBordersIndex.xlEdgeRight].LineStyle =
Microsoft.Office.Interop.Excel.XlLineStyle.xlDot;
rng.Borders[XlBordersIndex.xlEdgeLeft].LineStyle =
Microsoft.Office.Interop.Excel.XlLineStyle.xlDot;
}
}
}
break;
}
}
}
ap.Visible = true;
//получаем список меток с текущей датой и временем
foreach (BDDataSet.МеткиRow m in dictDatetime)
{ //ищем нужную метку
foreach (Microsoft.Office.Interop.Excel.Name b in ap.Names)
{
if (b.Name.Equals(m.Наименование))
{
//текущая дата
if (m.КодВидаМетки == 3) b.RefersToRange.Value2 =
109
DateTime.Now.ToShortDateString();
//текущее время
if (m.КодВидаМетки == 4) b.RefersToRange.Value2 =
DateTime.Now.ToShortTimeString();
break;
}
}
}
//колонтитулы
sheet.PageSetup.CenterFooter = textBox2.Text;
sheet.PageSetup.CenterHeader = textBox1.Text;
ReleaseObject(ap);
return sheet;
}
catch (Exception ee)
{
MessageBox.Show(ee.Message, "Возникла ошибка", MessageBoxButtons.OK,
MessageBoxIcon.Error);
return null;
}
}
private void button2_Click(object sender, EventArgs e)
{
// получаем выбранный шаблон
BDDataSet.ШаблонСтипомRow sh =
(BDDataSet.ШаблонСтипомRow)((DataRowView)comboBox1.SelectedItem).Row;//
;
comboBox1.SelectedItem;
if (sh == null) return;
try
{
string filename = Path.GetTempFileName();
filename = Path.ChangeExtension(filename, (sh.КодТипа == 1 ? ".docx" :
".xlsx"));
using (Stream file = File.OpenWrite(filename))
{
file.Write(sh.Шаблон, 0, sh.Шаблон.Length);
file.Flush();
file.Close();
}
//вордовский шаблон
if (sh.КодТипа == 1)
{
FillWordDoc(filename, sh);
Источник: https://baza.diplomsite.ru/previewfile/594