asp.net打印功能上传到服务器后不能实现

[hello_web1]

在本地IIS发布后测试没有问题，上传到服务器 一到打印那 就一直处于加载中，不动弹了，百度了很多方法 都不管用，请大家帮吗一下啦。

[hello_web1]

呃，这么冷清啊。我的问题啊 折磨死了。

[hello_web1]

int id =Convert.ToInt32(Request.QueryString["id"]);
MOrder order = new OrderManage().SelectById(id);
string gdsNum = new GDSManage().SelectById(order.GdsId).GdsNum;
_Document wDoc = null; //--word文档
_Application wApp = null; //--word进程
Application thisApplication = new ApplicationClass();
wApp = thisApplication;

string tmpDocFile = Server.MapPath("~/Tem/") + "\\"+gdsNum+".doc"; //模板路径
object templatefile = tmpDocFile;
object missing = Type.Missing;
wDoc = wApp.Documents.Add(ref templatefile, ref missing, ref missing, ref missing); //在现有进程内打开文档
wDoc.Activate(); //当前文档置前

List<string> findText = new List<string>();
List<string> replaceText = new List<string>();

findText.Add("{Num}");
findText.Add("{gdsName}");
findText.Add("{createTime}");
findText.Add("{userName}");
findText.Add("{jianhuName}");
findText.Add("{task}");

replaceText.Add(order.Num);
replaceText.Add(GetGDSNameById(order.GdsId));
replaceText.Add(order.CreateTime.ToString());
replaceText.Add(GetUserNamesByIds(order.UserIds));
replaceText.Add(GetUserNameById(order.JianhuId));
replaceText.Add(order.Task);
for (int k = 0; k < findText.Count; k++) {
//替换模版中的字符开始
object replaceAll = Microsoft.Office.Interop.Word.WdReplace.wdReplaceAll; //替换所有
wApp.Selection.Find.ClearFormatting();
wApp.Selection.Find.Text = findText[k]; //替换的字符为#old#
wApp.Selection.Find.Format = false;
wApp.Selection.Find.Forward = true; //向前查找
wApp.Selection.Find.MatchByte = true;
wApp.Selection.Find.Wrap = Microsoft.Office.Interop.Word.WdFindWrap.wdFindAsk;
wApp.Selection.Find.Replacement.ClearFormatting();
wApp.Selection.Find.Replacement.Text = replaceText[k]; //替换后新字符
wApp.Selection.Find.Execute(
ref missing, ref missing, ref missing, ref missing, ref missing,
ref missing, ref missing, ref missing, ref missing, ref missing,
ref replaceAll, ref missing, ref missing, ref missing, ref missing);
}

//一般我们要在模版内插入图片，这个位置是事先定好的，我们在模版内使用字符串“#Image#”来代替

string FileName = Server.MapPath("~/upload/") + "\\" + GetUserPicById(order.PdUserId); //另存为的路径
object LinkToFile = false;
object SaveWithDocument = true;

wApp.Selection.Find.ClearFormatting();
wApp.Selection.Find.Text = "{pic}";
wApp.Selection.Find.Format = false;
wApp.Selection.Find.Forward = true;
wApp.Selection.Find.MatchByte = true;
wApp.Selection.Find.Wrap = Microsoft.Office.Interop.Word.WdFindWrap.wdFindAsk;

if (wApp.Selection.Find.Execute(
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, ref missing))
{
wApp.Selection.InlineShapes.AddPicture(FileName, ref LinkToFile, ref SaveWithDocument, ref missing);
}
wApp.Selection.Find.ClearFormatting();
wApp.Selection.Find.Text = "{pic2}";
wApp.Selection.Find.Format = false;
wApp.Selection.Find.Forward = true;
wApp.Selection.Find.MatchByte = true;
wApp.Selection.Find.Wrap = Microsoft.Office.Interop.Word.WdFindWrap.wdFindAsk;

if (wApp.Selection.Find.Execute(
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, ref missing))
{
wApp.Selection.InlineShapes.AddPicture(FileName, ref LinkToFile, ref SaveWithDocument, ref missing);
}
//插入图片结束 , 如果有多个图片需要替换，循环该模块即可

object background = false; //这个很重要，否则关闭的时候会提示请等待Word打印完毕后再退出，加上这个后可以使Word所有
object filename = Server.MapPath("upload") + "\\" + order.Num + ".doc"; //另存为的路径
wDoc.SaveAs(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, ref missing);
wDoc.PrintOut(ref background, 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, ref missing, ref missing,

ref missing);
object saveOption = Microsoft.Office.Interop.Word.WdSaveOptions.wdSaveChanges;
wDoc.Close(ref saveOption, ref missing, ref missing); //关闭当前文档，如果有多个模版文件进行操作，则执行完这一步后接着执行打开Word文档的方法即可
saveOption = Microsoft.Office.Interop.Word.WdSaveOptions.wdDoNotSaveChanges;
wApp.Quit(ref saveOption, ref missing, ref missing); //关闭Word进程
DelFile(order.Num);
Response.Redirect("pdy/OrderManage.aspx");

[hello_web1]

saveAs方法那还没问题 能够保存文档成功，就是到了打印那 出不来了。呃 来个高手拯救一下把

[loveyi419]

我也出现这个问题了，怎么解决啊

[phoebuswei]

虚拟空间吧？

[琰盏]

亲，我也出现同样的问题了，VS08下调试一点问题都没有，但是发布后点击了打印按钮后没有反应，进度条一直在走，解决了两天了。。。。各种说法，有人说是IIS调用外部接口需要往系统文件夹下写日志，但是IIS没有访问系统文件夹权限所以卡在那里，关键是现在也不知道在哪个系统文件夹下写。