如何在中调用word

chinaxiaonan 2004-04-23 12:47:43
哪位大侠有源码,让我参考一下!
chinaxiaonan@tom.com
在下感激不尽!
Q号:113920836
...全文
67 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
chinaxiaonan 2004-04-23
  • 打赏
  • 举报
回复
这步已经做了,可是代码怎么写
tscrystal 2004-04-23
  • 打赏
  • 举报
回复
private void bt_excel_Click(object sender, System.EventArgs e)
{
string str_sdrqy="";
string str_sdrqm="";
string str_sdrqd="";
string str_djrqy="";
string str_djrqm="";
string str_djrqd="";
string str_djrq = System.DateTime.Today.ToShortDateString().ToString().Trim();
object oMissing = System.Reflection.Missing.Value;
//Start Word and create a new document.
Word._Application oWord;
Word._Document oDoc;
oWord = new Word.Application();
oWord.Visible = true;
object oTemplate =Server.MapPath(".")+"\\excel\\qzzx.doc";
try
{
oDoc = oWord.Documents.Add(ref oTemplate, ref oMissing,ref oMissing, ref oMissing);
object oBookMark = "MyBookmark0";
oDoc.Bookmarks.Item(ref oBookMark).Range.Text = this.fymc.Text.Trim();
oBookMark="MyBookmark1";
oDoc.Bookmarks.Item(ref oBookMark).Range.Text = this.ajmc.Text.Trim();
if(this.sdrq.Text.Trim().Length!=0)
{
str_sdrqy=System.Convert.ToDateTime(this.sdrq.Text.Trim()).Year.ToString();
str_sdrqm=System.Convert.ToDateTime(this.sdrq.Text.Trim()).Month.ToString();
str_sdrqd=System.Convert.ToDateTime(this.sdrq.Text.Trim()).Day.ToString();
oBookMark="MyBookmark2";
oDoc.Bookmarks.Item(ref oBookMark).Range.Text = str_sdrqy;
oBookMark="MyBookmark3";
oDoc.Bookmarks.Item(ref oBookMark).Range.Text = str_sdrqm;
oBookMark="MyBookmark4";
oDoc.Bookmarks.Item(ref oBookMark).Range.Text = str_sdrqd;
}


oBookMark="MyBookmark5";
oDoc.Bookmarks.Item(ref oBookMark).Range.Text =this.cfsh.Text.Trim();
oBookMark="MyBookmark6";
oDoc.Bookmarks.Item(ref oBookMark).Range.Text =this.clqk.Text.Trim();
jezh temp = new jezh();
string str_je = temp.zxzjdx(this.zxje.Text.Trim());
oBookMark="MyBookmark7";
oDoc.Bookmarks.Item(ref oBookMark).Range.Text =str_je;

if(this.djrq.Text.Trim().Length!=0)
{
str_djrqy=System.Convert.ToDateTime(this.djrq.Text.Trim()).Year.ToString();
str_djrqm=System.Convert.ToDateTime(this.djrq.Text.Trim()).Month.ToString();
str_djrqd=System.Convert.ToDateTime(this.djrq.Text.Trim()).Day.ToString();
oBookMark="MyBookmark8";
oDoc.Bookmarks.Item(ref oBookMark).Range.Text = str_djrqy ;
oBookMark="MyBookmark9";
oDoc.Bookmarks.Item(ref oBookMark).Range.Text = str_djrqm ;
oBookMark="MyBookmark10";
oDoc.Bookmarks.Item(ref oBookMark).Range.Text = str_djrqd ;
}
Random nRandom = new Random();
string strXls = nRandom.Next().ToString()+".doc";
string fileName = Server.MapPath(".")+"\\excel\\temp\\"+strXls;
object str_file=fileName;
oDoc.SaveAs(ref str_file,ref oMissing,ref oMissing,ref oMissing,ref oMissing,ref oMissing,ref oMissing,ref oMissing,ref oMissing,ref oMissing,ref oMissing);
fileName = "";
fileName = strXls;
string strUrl = "<script>window.open("+"'\\excel\\/temp/"+strXls+"'";
strUrl = strUrl+","+"'"+"A"+"'"+","+"'"+"'";
strUrl =strUrl+","+"false)</script>";
oWord.Application.Quit(ref oMissing,ref oMissing,ref oMissing);
oWord=null;
Response.Write(strUrl);
}
catch
{
oWord.Application.Quit(ref oMissing,ref oMissing,ref oMissing);
oWord=null;
}
}
zengch24 2004-04-23
  • 打赏
  • 举报
回复
添加引用--COM--Microsoft word *** libary9.0
dahuzizyd 2004-04-23
  • 打赏
  • 举报
回复
http://www.c-sharpcorner.com/Code/2002/Mar/WordFromDotNet.asp
jackyoung02 2004-04-23
  • 打赏
  • 举报
回复
看看本机的word版本是多少??Office2000和XP版本库不一样,方法参数的个数也不一样
chinaxiaonan 2004-04-23
  • 打赏
  • 举报
回复
tscrystal(月朗星稀) :你发的是什么
chinaxiaonan 2004-04-23
  • 打赏
  • 举报
回复
Word.ApplicationClass wa = new Word.ApplicationClass ();
object filename = @"c:\\a.doc";
object missing = System.Reflection .Missing .Value;
wa.Documents.Open (ref filename,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing,ref missing);
wa.ShowMe ();
可编译提示:重载"open"方法示获得15参数

111,120

社区成员

发帖
与我相关
我的任务
社区描述
.NET技术 C#
社区管理员
  • C#
  • AIGC Browser
  • by_封爱
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

让您成为最强悍的C#开发者

试试用AI创作助手写篇文章吧