Дипломная работа: Автоматизация учета затрат на производство в компании ООО "Веллонс.Ру"
Внимание! Если размещение файла нарушает Ваши авторские права, то обязательно сообщите нам
117
179. this.шаблоныTableAdapter.Fill(this.bDDataSet.Шаблоны);
180. } private void Form1_Load(object sender, EventArgs e) {
181. // TODO: данная строка кода позволяет загрузить данные в таблицу
182. "bDDataSet1.Метки". При необходимости она может быть перемещена ил
и удалена.
183. this.меткиTableAdapter.Fill(this.bDDataSet1.Метки);
184. // TODO: данная строка кода позволяет загрузить данные в таблицу
185. "bDDataSet.ШаблонСтипом". При необходимости она может быть переме
щена или удалена.
186. this.шаблонСтипомTableAdapter.Fill(this.bDDataSet.ШаблонСтипом);
187. // TODO: данная строка кода позволяет загрузить данные в таблицу
188. "bDDataSet.Шаблоны". При необходимости она может быть перемещена
или удалена.
189. this.шаблоныTableAdapter.Fill(this.bDDataSet.Шаблоны);
190. //обнуляем выбор
191. comboBox1.BindingContext = new BindingContext();
192. comboBox1.SelectedIndex = -
1; } //Здесь хранится список меток и контролов, из которых брать данные для
их заполнения Dictionary<BDDataSet.МеткиRow, Control> dict = new
193. Dictionary<BDDataSet.МеткиRow, Control>();
194. //Здесь хранится список меток, которые относятся к типу Текущая дата и
время List<BDDataSet.МеткиRow> dictDatetime = new List<BDDataSet.МеткиRo
w>(); private void button1_Click(object sender, EventArgs e)
195. /// <summary>
196. /// Заполняем вордовский документ
197. /// </summary>
198. /// <param name="filename"></param>
199. /// <param name="sh"></param>
200. public Microsoft.Office.Interop.Word.Document FillWordDoc(string filename,
201. BDDataSet.ШаблонСтипомRow sh) {
202. Microsoft.Office.Interop.Word.Application ap = new
203. Microsoft.Office.Interop.Word.Application();
204. ap.Visible = false;
205. Document document = null;
206. try {
118
207. //ap.Documents.Close(filename);
208. document = ap.Documents.Open(filename);
209. //получаем список меток документа
210. foreach (BDDataSet.МеткиRow m in dict.Keys)
211. { document.Bookmarks[m.Наименование].Select();
212. Microsoft.Office.Interop.Word.Selection currentSelection = ap.Selection;
213. if (dict[m].GetType() == typeof(System.Windows.Forms.TextBox))
214. { System.Windows.Forms.TextBox t =
215. (System.Windows.Forms.TextBox)dict[m];
216. currentSelection.TypeText(string.IsNullOrEmpty(t.Text) ? "" : t.Text); } else {
217. //вставляем таблицу
218. DataGrid dgv = (DataGrid)dict[m];
219. document.Bookmarks[m.Наименование].Select();
220. System.Data.DataTable dt = (System.Data.DataTable)dgv.DataSource;
221. Microsoft.Office.Interop.Word.Table tbl1 =
222. ap.Selection.Tables.Add(ap.Selection.Range, 1, dt.Columns.Count);
223. //заголовки колонок
224. for (int i = 0; i <= dt.Columns.Count - 1; i++)
225. { tbl1.Cell(1, i + 1).Range.Text = dt.Columns[i].ColumnName;
226. tbl1.Cell(1, i + 1).Range.Borders[WdBorderType.wdBorderLeft].LineStyle
227. = WdLineStyle.wdLineStyleSingle;
228. tbl1.Cell(1, i +
229. 1).Range.Borders[WdBorderType.wdBorderRight].LineStyle = WdLineStyle.
wdLineStyleSingle;
230. tbl1.Cell(1, i + 1).Range.Borders[WdBorderType.wdBorderTop].LineStyle
231. = WdLineStyle.wdLineStyleSingle;
232. tbl1.Cell(1, i +
233. 1).Range.Borders[WdBorderType.wdBorderBottom].LineStyle = WdLineStyle
.wdLineStyleSingle; }
234. //строки таблицы
235. for (int i = 0; i <= dt.Rows.Count - 1; i++)
236. { tbl1.Rows.Add();
237. for (int j = 0; j <= dt.Columns.Count - 1; j++)
238. { tbl1.Cell(tbl1.Rows.Count, j + 1).Range.Text = dt.Rows[i][j] == null ? ""
239. : dt.Rows[i][j].ToString();
119
240. tbl1.Cell(tbl1.Rows.Count, j +
241. 1).Range.Borders[WdBorderType.wdBorderLeft].LineStyle = WdLineStyle.w
dLineStyleSingle;
242. tbl1.Cell(tbl1.Rows.Count, j +
243. 1).Range.Borders[WdBorderType.wdBorderRight].LineStyle = WdLineStyle.
wdLineStyleSingle;
244. tbl1.Cell(tbl1.Rows.Count, j +
245. 1).Range.Borders[WdBorderType.wdBorderTop].LineStyle = WdLineStyle.wd
LineStyleSingle;
246. tbl1.Cell(tbl1.Rows.Count, j +
247. 1).Range.Borders[WdBorderType.wdBorderBottom].LineStyle = WdLineStyle
.wdLineStyleSingle; } }101 } }
248. //получаем список меток с текущей датой и временем
249. foreach (BDDataSet.МеткиRow m in dictDatetime)
250. { document.Bookmarks[m.Наименование].Select();
251. Microsoft.Office.Interop.Word.Selection currentSelection = ap.Selection;
252. if (m.КодВидаМетки == 3)
253. currentSelection.TypeText(DateTime.Now.ToShortDateString());
254. if (m.КодВидаМетки == 4)
255. currentSelection.TypeText(DateTime.Now.ToShortTimeString()); }
256. //колонтитулы
257. ap.ActiveDocument.Sections[1].Footers[Microsoft.Office.Interop.Word.WdHe
aderFooterIndex.wd
258. HeaderFooterPrimary].Range.Text = textBox2.Text;
259. ap.ActiveDocument.Sections[1].Headers[Microsoft.Office.Interop.Word.WdH
eaderFooterIndex.wd
260. HeaderFooterPrimary].Range.Text = textBox1.Text;
261. //ReleaseObject(ap);
262. ap.Visible = true;
263. return document; }
264. catch (Exception ee)
265. { MessageBox.Show(ee.Message, "Возникла ошибка", MessageBoxButtons.
OK,
266. MessageBoxIcon.Error);
120
267. return null; } }
268. /// <summary>
269. /// Заполняем вордовский документ
270. /// </summary>
271. /// <param name="filename"></param>
272. /// <param name="sh"></param>
273. public string FillWordDocPacket(string filename, string filenameData)
274. { Microsoft.Office.Interop.Excel.Application apData = new
275. Microsoft.Office.Interop.Excel.Application();
276. apData.Visible = false;
277. Microsoft.Office.Interop.Excel.Workbook bookData = null;
278. Microsoft.Office.Interop.Excel.Workbooks databook = apData.Workbooks;
279. apData.Workbooks.Open(filenameData,
280. Type.Missing, Type.Missing, Type.Missing, Type.Missing,
281. Type.Missing, Type.Missing, Type.Missing, Type.Missing,
282. Type.Missing, Type.Missing, Type.Missing, Type.Missing,
283. Type.Missing, Type.Missing);
284. bookData = databook[1];
285. Microsoft.Office.Interop.Excel.Worksheet sheetData = bookData.Worksheets[
1];
286. Microsoft.Office.Interop.Word.Application ap = new
287. Microsoft.Office.Interop.Word.Application();
288. ap.Visible = false; string nameFold = "";
289. //создаем папку
290. nameFold = System.Windows.Forms.Application.StartupPath + @"\документ
ы\"
291. sh.Выражение1 + "_" + DateTime.Now.ToShortDateString().Replace(".", "-");
292. DirectoryInfo d;
293. if (!Directory.Exists(nameFold))
294. d = Directory.CreateDirectory(nameFold); else
295. { nameFold = System.Windows.Forms.Application.StartupPath + @"\докумен
ты\"+ sh.Выражение1 + "_" + DateTime.Now.ToShortDateString().Replace(".", "-
") + "-" +
296. DateTime.Now.ToShortTimeString().Replace(":", "-");
297. d = Directory.CreateDirectory(nameFold); }
121
298. for (int j = 7; j <= sheetData.UsedRange.Rows.Count - 1; j++)//строки
299. { if (sheetData.Cells[j, 1].value2 == null) continue; //нет порядковго номера
300. документа
301. string numberDoc = Convert.ToString(sheetData.Cells[j, 1].Value2);
302. //////////////новый документ
303. Document documentData = null;
304. documentData = ap.Documents.Open(filename);
305. //////////////
306. for (int i = 2; i <= sheetData.UsedRange.Columns.Count - 3; i++)//колонки
307. { string nameCol = sheetData.Cells[5, i].Value2 == null ? "" :
308. Convert.ToString(sheetData.Cells[5, i].Value2);
309. if (nameCol == "") continue;
310. DataRow[] dr = bDDataSet1.Метки.Select("КодШаблона=" + sh.КодШабло
на
311. + " and Наименование='" + nameCol + "'");
312. if (dr == null || dr.Length == 0) continue;
313. BDDataSet.МеткиRow metka = ((BDDataSet.МеткиRow)dr[0]);
314. int vidMetka = metka.КодВидаМетки;
315. documentData.Bookmarks[metka.Наименование].Select();
316. Microsoft.Office.Interop.Word.Selection currentSelection = ap.Selection;
317. if (vidMetka == 1)
318. { currentSelection.TypeText(sheetData.Cells[j, i].Value2 == null ? "" :
319. Convert.ToString(sheetData.Cells[j, i].Value2)); }
320. //текущая дата
321. if (vidMetka == 3)
322. currentSelection.TypeText(DateTime.Now.ToShortDateString());
323. //текущее время
324. if (vidMetka == 4)
325. currentSelection.TypeText(DateTime.Now.ToShortTimeString());
326. if (vidMetka == 2) {
327. ///вставляем таблицу
328. string[] s = metka.ЗаголовкиКолонок.Split('/');
329. //int row = b.RefersToRange.Row;
330. // int col = b.RefersToRange.Column;
331. int rowsCount = 0;
Источник: https://baza.diplomsite.ru/previewfile/250