0
我写了下面的代码，允许用户查询基于要打印的word文档和数据源（不同系统）的数据，他们可以选择SOURCE1，SOURCE2或BOTH。查询数据，放入ODBC DataReader中，然后循环以填充ListView控件。从选定的Word文档部分复制一个额外的空白页面？
然后，我允许用户选择要打印的记录，并将这些记录作为邮件合并操作处理到选定的Word文档中。
我现在要做的是将每个单独的文档页面（邮件合并的每个记录）保存到具有自己名称的特定文件夹位置。
CODE：
private void btnSearch_Click(object sender, EventArgs e)
{
lvData.Clear();
string qryCmd = "";
createColumns();
switch (cmbLetterType.SelectedIndex)
{
case 0:
qryCmd = chkSystem("oldAddr");
break;
case 1:
qryCmd = chkSystem("newAddr");
break;
case 2:
qryCmd = chkSystem("nameChg");
break;
}
// If the option for BOTH is selected, qryCmd is a long string containing the individual queries for SOURCE1 and SOURCE2.
// Here I check if a semicolon (;) exists, denoting that there are 2 cmd queries in the string.
// If so, I split the query calling GetiSeriesData() with the first query string, then assigning qryCmd the second
// strings value and continuing processing as normal.
if (qryCmd.Contains(";"))
{
char[] delimitChar = { ';' };
string[] splitQueries = qryCmd.Split(delimitChar);
qryCmd = splitQueries[0];
GetiSeriesData(qryCmd);
qryCmd = splitQueries[1];
}
GetiSeriesData(qryCmd);
// Display message if no records found.
if (lvData.Items.Count == 0)
{
MessageBox.Show("No records found.");
}
lblRecCnt.Text = lvData.Items.Count.ToString();
this.lvData.CheckBoxes = true;
}
public void GetiSeriesData(string query)
{
OdbcDataReader dr;
try
{
//Set value of system based on table being looked at in ConnectionString
string sysValue = "";
if (query.Contains("lib1"))
{
sysValue = "P";
}
if (query.Contains("lib2"))
{
sysValue = "N";
}
MergeDocLibrary mdl = new MergeDocLibrary();
dr = mdl.GetData(query);
Int16 x = 0;
string gndr = "";
// Fill ListView Control lvData
while (dr.Read())
{
lvData.Items.Add(dr["MEMNO"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["NAME"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["ADDR1"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["ADDR2"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["CITY"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["STATE"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["ZIP"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["OLD_ADDR1"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["OLD_ADDR2"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["OLD_CITY"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["OLD_STATE"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["OLD_ZIP"].ToString().Trim());
lvData.Items[x].SubItems.Add(sysValue.ToString().Trim());
lvData.Items[x].SubItems.Add(DateTime.Today.ToString("d"));
lvData.Items[x].SubItems.Add(dr["SEX"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["LNAME"].ToString().Trim());
if (dr["SEX"].ToString().Trim() == "M")
{
gndr = "Mr.";
}
else // (dr["SEX"].ToString().Trim() == "F)
{
gndr = "Ms.";
}
lvData.Items[x].SubItems.Add(gndr + dr["LNAME"].ToString().Trim());
lvData.Items[x].SubItems.Add(dr["CITY"].ToString().Trim() + ", " + dr["STATE"].ToString().Trim() + " " + dr["ZIP"].ToString().Trim());
x += 1;
}
mdl.closeConn();
}
catch (Exception ex)
{
MessageBox.Show("Source:\t" + ex.Source + "\nMessage: \t" + ex.Message + "\nData:\t" + ex.Data);
}
finally
{
}
}
public void OpenAndReview()
{
try
{
string docSave = @"C:\Users\NAME\Desktop\Test.doc";
//MergeDocLibrary mdl = new MergeDocLibrary();
//mdl.mergeDocument(docSource, docLoc);
// Original Mail Merge Document
Word.Range rng;
object start = 0;
object end = 0;
Word.Range newWrdRng;
Word.Application oWord = new Word.Application();
Word.Document oWrdDoc = new Word.Document();
// New Document Instance
Word.Application oNewWord = new Word.Application();
Word.Document oNewWrdDoc = new Word.Document();
// Set 'False' in PROD, 'True' in DEV
oWord.Visible = true;
oNewWord.Visible = true;
Object oTemplatePath = docLoc;
// Open Mail Merge Doc
oWrdDoc = oWord.Documents.Open(oTemplatePath);
// Open New Document
oNewWrdDoc = oNewWord.Documents.Open(docSave);
Object oMissing = System.Reflection.Missing.Value;
// Open Mail Merge Datasource
oWrdDoc.MailMerge.OpenDataSource(docSource, oMissing, oMissing, oMissing,
oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing);
// Execute Mail Merge
oWrdDoc.MailMerge.Execute();
// Set Mail Merge Document as Active Doc
//oWrdDoc.Activate();
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
MessageBox.Show(oWord.ActiveDocument.Sections.Count.ToString());
// 3 Records selected gives 4 Sections Counted??
//~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
// Subtract 1 to account for the extra section being counted?
int docCnt = oWord.ActiveDocument.Sections.Count - 1;
int cnt = 0;
while (cnt != docCnt)
{
cnt++;
// Copy Desired Section from Mail Merge
oWord.ActiveDocument.Sections[cnt].Range.Copy();
// Set focus to the New Word Doc instance
oNewWord.Activate();
// Paste copied range to New Word Doc
oNewWord.ActiveDocument.Range(0, 0).Paste();
// Save New Word Doc
oNewWord.ActiveDocument.SaveAs2(@"C:\Users\NAME\Desktop\SuccesfullySavedDoc-" + cnt + ".doc");
// Clear New Word Doc
oNewWord.ActiveDocument.Content.Select();
oNewWord.Selection.TypeBackspace();
// Set Mail Merge as Active Document
oWord.Activate();
}
// .............
// Save new docuemnt...?
oNewWrdDoc.SaveAs2("SuccesfullySavedTest.doc");
}
catch (Exception ex)
{
MessageBox.Show("Source:\t" + ex.Source + "\nMessage: \t" + ex.Message + "\nData:\t" + ex.Data);
}
finally
{
//
}
}
...
EDIT3：我已经拿到了文件清理掉每个新的循环迭代。现在想弄清楚为什么每个文档与一个额外的空白页节省2
大致的轮廓：
文件1：记录1 +一个额外的空白页（不确定为什么？）
文档2：记录2 +一个额外的空白页（不确定为什么？）
文件3：记录3 +一个额外的空白页（不确定为什么？）
顺便说一句，如果你完全控制了文档的内容/格式，你可以考虑使用Eric White的材料来生成这种输出 - 它根本不使用MailMerge，更符合“ .NET的做事方式“ - http://ericwhite.com/blog/category/open-xml/document-generation-series/ – 2013-11-28 07:49:18
就我个人而言，我会考虑在保存后创建oNewWord文档，创建一个新文档，在你的循环里面。我怀疑这是否会成为主要的表现。 – 2013-12-02 16:33:33
这是一种选择，但我更愿意走这条路线（如果可能的话），只是为了节省一点编码，并保持对任何可能受到维护/更新路上遇到的猎物困扰的人的理解。 –