110,579
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
oneatree 2010-09-02
- 打赏
- 举报
mark
deyygywxf 2010-09-02
- 打赏
- 举报
using Microsoft.Office.Interop.Word;
认真学编程 2010-09-02
- 打赏
- 举报
太有用了！学习学习
认真学编程 2010-09-02
- 打赏
- 举报
添加引用/com/Microsoft Office 11.0 Object Library
若还有其它错误，再添加一个引用/com/Microsoft words 11.0 Object Library
若还有其它错误，再添加一个引用/com/Microsoft words 11.0 Object Library
Net85 2010-09-02
- 打赏
- 举报
如果依照楼上几位所说，还无法引用的话。
添加引用---COM---Microsoft Words 11.0 Object library.
然后再在代码里用。using Microsoft.Office.Interop.Word;
添加引用---COM---Microsoft Words 11.0 Object library.
然后再在代码里用。using Microsoft.Office.Interop.Word;
cjj282 2009-09-29
- 打赏
- 举报
太好了!可是Process怎么引用呢?
flyerwing 2009-09-27
- 打赏
- 举报
public static string CreateWordFile(string CheckedInfo)
{
string message = "";
try
{
Object Nothing = System.Reflection.Missing.Value;
string path = AppDomain.CurrentDomain.BaseDirectory;
Directory.CreateDirectory(path+"WordExp"); // 创建文件所在目录
string name = "WordExp_" + DateTime.Now.ToShortDateString().Trim().Replace("-", "_") + ".doc ";
object filename = (path+ @"WordExp\\" + name).Trim(); // 文件保存路径
// 创建Word文档
Microsoft.Office.Interop.Word.Application WordApp = new Microsoft.Office.Interop.Word.ApplicationClass();
Microsoft.Office.Interop.Word.Document WordDoc = WordApp.Documents.Add(ref Nothing, ref Nothing, ref Nothing, ref Nothing);
// 添加页眉
WordApp.ActiveWindow.View.Type = WdViewType.wdOutlineView;
WordApp.ActiveWindow.View.SeekView = WdSeekView.wdSeekPrimaryHeader;
WordApp.ActiveWindow.ActivePane.Selection.InsertAfter(" [页眉内容] ");
WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphRight; // 设置右对齐
WordApp.ActiveWindow.View.SeekView = WdSeekView.wdSeekMainDocument; // 跳出页眉设置
WordApp.Selection.ParagraphFormat.LineSpacing = 15f; // 设置文档的行间距
// 移动焦点并换行
object count = 14;
object WdLine = Microsoft.Office.Interop.Word.WdUnits.wdLine; // 换一行;
WordApp.Selection.MoveDown(ref WdLine, ref count, ref Nothing); // 移动焦点
WordApp.Selection.TypeParagraph(); // 插入段落
// 文档中创建表格
Microsoft.Office.Interop.Word.Table newTable = WordDoc.Tables.Add(WordApp.Selection.Range, 12, 3, ref Nothing, ref Nothing);
// 设置表格样式
newTable.Borders.OutsideLineStyle = Microsoft.Office.Interop.Word.WdLineStyle.wdLineStyleThickThinLargeGap;
newTable.Borders.InsideLineStyle = Microsoft.Office.Interop.Word.WdLineStyle.wdLineStyleSingle;
newTable.Columns[1].Width = 100f;
newTable.Columns[2].Width = 220f;
newTable.Columns[3].Width = 105f;
// 填充表格内容
newTable.Cell(1, 1).Range.Text = " 产品详细信息表 ";
newTable.Cell(1, 1).Range.Bold = 2; // 设置单元格中字体为粗体
// 合并单元格
newTable.Cell(1, 1).Merge(newTable.Cell(1, 3));
WordApp.Selection.Cells.VerticalAlignment = Microsoft.Office.Interop.Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter; // 垂直居中
WordApp.Selection.ParagraphFormat.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphCenter; // 水平居中
// 填充表格内容
newTable.Cell(2, 1).Range.Text = " 产品基本信息 ";
newTable.Cell(2, 1).Range.Font.Color = Microsoft.Office.Interop.Word.WdColor.wdColorDarkBlue; // 设置单元格内字体颜色
// 合并单元格
newTable.Cell(2, 1).Merge(newTable.Cell(2, 3));
WordApp.Selection.Cells.VerticalAlignment = Microsoft.Office.Interop.Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter;
// 填充表格内容
newTable.Cell(3, 1).Range.Text = " 品牌名称： ";
//newTable.Cell(3, 2).Range.Text = BrandName;
// 纵向合并单元格
newTable.Cell(3, 3).Select(); // 选中一行
object moveUnit = Microsoft.Office.Interop.Word.WdUnits.wdLine;
object moveCount = 5;
object moveExtend = Microsoft.Office.Interop.Word.WdMovementType.wdExtend;
WordApp.Selection.MoveDown(ref moveUnit, ref moveCount, ref moveExtend);
WordApp.Selection.Cells.Merge();
// 插入图片
//string FileName = Picture; // 图片所在路径
string FileName = path+"a.jpg";
object LinkToFile = false;
object SaveWithDocument = true;
object Anchor = WordDoc.Application.Selection.Range;
WordDoc.Application.ActiveDocument.InlineShapes.AddPicture(FileName, ref LinkToFile, ref SaveWithDocument, ref Anchor);
WordDoc.Application.ActiveDocument.InlineShapes[1].Width = 100f; // 图片宽度
WordDoc.Application.ActiveDocument.InlineShapes[1].Height = 100f; // 图片高度
// 将图片设置为四周环绕型
Microsoft.Office.Interop.Word.Shape s = WordDoc.Application.ActiveDocument.InlineShapes[1].ConvertToShape();
s.WrapFormat.Type = Microsoft.Office.Interop.Word.WdWrapType.wdWrapSquare;
newTable.Cell(12, 1).Range.Text = " 产品特殊属性 ";
newTable.Cell(12, 1).Merge(newTable.Cell(12, 3));
// 在表格中增加行
WordDoc.Content.Tables[1].Rows.Add(ref Nothing);
WordDoc.Paragraphs.Last.Range.Text = " 文档创建时间： " + DateTime.Now.ToString(); // “落款”
WordDoc.Paragraphs.Last.Alignment = Microsoft.Office.Interop.Word.WdParagraphAlignment.wdAlignParagraphRight;
// 文件保存
WordDoc.SaveAs(ref filename, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing, ref Nothing);
WordDoc.Close(ref Nothing, ref Nothing, ref Nothing);
WordApp.Quit(ref Nothing, ref Nothing, ref Nothing);
message = name + " 文档生成成功，以保存到WordEXP下 ";
bool a = false;
object c = a;
KillProcess("WINWORD");
WordApp = null;
WordDoc = null;
}
catch (Exception ept)
{
message = " 文件导出异常！ " + ept.Message;
}
finally
{
}
return message;
}
private static void KillProcess(string processName)
{
System.Diagnostics.Process myproc = new System.Diagnostics.Process(); //得到所有打开的进程
try
{
foreach (Process thisproc in Process.GetProcessesByName(processName))
{
if (!thisproc.CloseMainWindow())
{ thisproc.Kill(); }
}
}
catch (Exception Exc)
{
}
}flyerwing 2009-09-27
- 打赏
- 举报
using Microsoft.Office.Interop.Word;
/*添加引用->COM->Microsoft Word 11.0 Object Library*/这样不知道能满足吗？
