コード例 #1
0
ファイル: EmailPlacement.cs プロジェクト: DawnLightning/SAS
 private void FillWordTable(List<string> ListSupervisor,WordTableInfo Info,WordTools Tool,List<string> ListFileName)
 {
     for (int i = 0; i < ListSupervisor.Count; i++)
     {
         if (i == 0)
         {
             Info.Supervisor = ListSupervisor[0];
            // ListFileName.Add(Tool.Addchiefsupervisordata(Info));
             ListFileName.Add(Tool.fullcheifsupervisor(Info));
         }
         else
         {
             Info.Supervisor = ListSupervisor[i];
            // ListFileName.Add(Tool.Addsupervisordata(Info));
             ListFileName.Add(Tool.fullsupervisor(Info));
         }
     }
 }
コード例 #2
0
ファイル: WordTools.cs プロジェクト: chenRunfeng/SAS
        public string Addsupervisordata(WordTableInfo Info)
        {
            Common.Common.load_supervisor();
            object missingValue = System.Reflection.Missing.Value;
            object myTrue = false;                  //不显示Word窗口
            //object fileName = Environment.CurrentDirectory + "\\" + "chief_supervisor.doc";
            object fileName1 = Environment.CurrentDirectory + "\\" + "supervisor.doc";
            string newfile = Common.Common.strAddfilesPath+ "\\" + Info.Teacher + Info.Time.Trim() + Info.Supervisor + ".doc";
            Microsoft.Office.Interop.Word._Application oWord1 = new Microsoft.Office.Interop.Word.Application();
            Microsoft.Office.Interop.Word._Document oDoc1;
            oDoc1 = oWord1.Documents.Open(ref fileName1, ref missingValue,
               ref myTrue, ref missingValue, ref missingValue, ref missingValue,
               ref missingValue, ref missingValue, ref missingValue,
               ref missingValue, ref missingValue, ref missingValue,
               ref missingValue, ref missingValue, ref missingValue,
               ref missingValue);
            Microsoft.Office.Interop.Word.Table newtable1 = oDoc1.Tables[1];
            oWord1.Selection.TypeText("广东医学院教师课堂教学质量评价表" + "(" + Info.Teachingtype + ")");
            newtable1.Cell(1, 2).Range.Text = Info.Teacher;
            newtable1.Cell(1, 4).Range.Text = Info.Perfession;
            newtable1.Cell(1, 6).Range.Text = Info.Time.Substring(0, Info.Time.IndexOf(" "));
            newtable1.Cell(2, 2).Range.Text = Info.Class;
            newtable1.Cell(2, 4).Range.Text = Info.Classroom + Info.Time.Substring(Info.Time.IndexOf(" ") + 1);
            newtable1.Cell(3, 2).Range.Text = Info.Subject;
            object bSaveChange = true;
            oDoc1.Close(ref bSaveChange, ref missingValue, ref missingValue);
            oDoc1 = null;
            oWord1 = null;

            closefile();
            if (!System.IO.File.Exists(Common.Common.strAddfilesPath))
            {
                Directory.CreateDirectory(Common.Common.strAddfilesPath);
            }
            System.IO.File.Copy(fileName1.ToString(), newfile, true);

            File.Delete(fileName1.ToString());
            return newfile;
               // sent_email(Supervisor, Time, Subject, newfile);
            // movetofile(newfile);
            //File.Move(newfile, cCommon.strAddfilesPath);
        }
コード例 #3
0
ファイル: WordTools.cs プロジェクト: chenRunfeng/SAS
        //首席
        public string Addchiefsupervisordata(WordTableInfo Info)
        {
            Common.Common.load_cheif_supervisor();
            object missingValue = System.Reflection.Missing.Value;
            object myTrue = false;                  //不显示Word窗口
            object fileName = Environment.CurrentDirectory + "\\" + "chief_supervisor.doc";//WORD文档所在路径
            string newfile =  Common.Common.strAddfilesPath + Info.Teacher + Info.Time.Trim() + Info.Supervisor + ".doc";//存储路径名称
            // object fileName1 = Environment.CurrentDirectory + "\\" + "supervisor.doc";
            Microsoft.Office.Interop.Word._Application oWord = new Microsoft.Office.Interop.Word.Application();
            Microsoft.Office.Interop.Word._Document oDoc;
            oDoc = oWord.Documents.Open(ref fileName, ref missingValue,
               ref myTrue, ref missingValue, ref missingValue, ref missingValue,
               ref missingValue, ref missingValue, ref missingValue,
               ref missingValue, ref missingValue, ref missingValue,
               ref missingValue, ref missingValue, ref missingValue,
               ref missingValue);
            Microsoft.Office.Interop.Word.Table newtable = oDoc.Tables[1];//获取word文档中的表格
            newtable.Cell(1, 2).Range.Text = Info.Teacher;
            newtable.Cell(1, 6).Range.Text = Info.Time.Substring(0, Info.Time.IndexOf(" "));
            newtable.Cell(2, 6).Range.Text = Info.Classroom + Info.Time.Substring(Info.Time.IndexOf(" ") + 1);
            newtable.Cell(4, 2).Range.Text = Info.Class;
            newtable.Cell(5, 2).Range.Text = Info.Subject;
            object bSaveChange = true;
            oDoc.Close(ref bSaveChange, ref missingValue, ref missingValue);
            oDoc = null;
            oWord = null;

            closefile();
            if (!System.IO.File.Exists(Common.Common.strAddfilesPath))
            {
                Directory.CreateDirectory(Common.Common.strAddfilesPath);
            }

            System.IO.File.Copy(fileName.ToString(), newfile, true);

            File.Delete(fileName.ToString());
            //sent_email(Supervisor, Time, Subject, newfile);
            //movetofile(newfile);
            return newfile;
        }
コード例 #4
0
ファイル: EmailPlacement.cs プロジェクト: DawnLightning/SAS
 private WordTableInfo InitializeWordInfo()
 {
     WordTableInfo Info = new WordTableInfo();
     Info.Supervisor = listView1.CheckedItems[0].SubItems[9].Text;
     Info.Time = listView1.CheckedItems[0].SubItems[8].Text;
     Info.Classroom = listView1.CheckedItems[0].SubItems[5].Text;
     Info.Perfession = listView1.CheckedItems[0].SubItems[4].Text;
     Info.Teacher = listView1.CheckedItems[0].SubItems[6].Text;
     Info.Class = listView1.CheckedItems[0].SubItems[1].Text;
     Info.Subject = listView1.CheckedItems[0].SubItems[2].Text;
     Info.Teachingtype = listView1.CheckedItems[0].SubItems[3].Text;
     return Info;
 }
コード例 #5
0
ファイル: WordTools.cs プロジェクト: chenRunfeng/SAS
 public string fullsupervisor(WordTableInfo Info)
 {
     Common.Common.load_supervisor();
     string fileName1 = Environment.CurrentDirectory + "\\" + "supervisor.doc";
     string newfile = Common.Common.strAddfilesPath + "\\" + Info.Teacher + Info.Time.Trim() + Info.Supervisor + ".doc";
     DocX doc = DocX.Load(fileName1);
     doc.ReplaceText("title","广东医学院教师课堂教学质量评价表" + "(" + Info.Teachingtype + ")") ;
     Table table = doc.Tables[0];
     table.Rows[0].Cells[1].Paragraphs[0].ReplaceText("Teacher", Info.Teacher);
     table.Rows[0].Cells[3].Paragraphs[0].ReplaceText("Perfession", Info.Perfession);
     table.Rows[0].Cells[5].Paragraphs[0].ReplaceText("Time", Info.Time.Substring(0, Info.Time.IndexOf(" ")));
     table.Rows[1].Cells[1].Paragraphs[0].ReplaceText("Class", Info.Class);
     table.Rows[1].Cells[3].Paragraphs[0].ReplaceText("address", Info.Classroom + Info.Time.Substring(Info.Time.IndexOf(" ") + 1));
     table.Rows[2].Cells[1].Paragraphs[0].ReplaceText("Context", Info.Subject);
     if (!System.IO.File.Exists(Common.Common.strAddfilesPath))
     {
         Directory.CreateDirectory(Common.Common.strAddfilesPath);
     }
     doc.SaveAs(newfile);
     doc.Dispose();
     return newfile;
 }
コード例 #6
0
ファイル: WordTools.cs プロジェクト: chenRunfeng/SAS
        //一般
        public string fullcheifsupervisor(WordTableInfo Info)
        {
            Common.Common.load_cheif_supervisor();
            string fileName = Environment.CurrentDirectory + "\\" + "chief_supervisor.doc";//WORD文档所在路径
            string newfile =  Common.Common.strAddfilesPath + Info.Teacher + Info.Time.Trim() + Info.Supervisor + ".doc";//存储路径名称
            DocX doc = DocX.Load(fileName);
            Table table = doc.Tables[0];

             table.Rows[0].Cells[1].Paragraphs[0].ReplaceText("teacher", Info.Teacher);
             table.Rows[0].Cells[5].Paragraphs[0].ReplaceText("time", Info.Time.Substring(0, Info.Time.IndexOf(" ")));
             table.Rows[1].Cells[5].Paragraphs[0].ReplaceText("address", Info.Classroom + Info.Time.Substring(Info.Time.IndexOf(" ") + 1));
             table.Rows[3].Cells[1].Paragraphs[0].ReplaceText("class", Info.Class);
             table.Rows[4].Cells[1].Paragraphs[0].ReplaceText("context", Info.Subject);
             if (!System.IO.File.Exists(Common.Common.strAddfilesPath))
             {
                 Directory.CreateDirectory(Common.Common.strAddfilesPath);
             }
             doc.SaveAs(newfile);

             doc.Dispose();
             return newfile;
        }