在ASP页中直接打开WORD文档，而不出“打开 保存”提示对话框
在ASP页中直接打开WORD文档，而不出“打开 保存”提示对话框。我的程序是一个超链接<a href="??.doc" target=_blank>????</a>在 网上找了一些方法
一、
<%
server.Execute("name.doc")
%> 这种方法可行吗
二、
将下面的东西存成download.asp
然后你就可以用a herf= "http://xxx. "> download! </a>
来下载了!
------------------------------------------------------------
<%
Response.Buffer = true
Response.Clear
dim url
dim Dname
Dim objStream
'*********************************************调用时传入的下载文件名
Dname=trim(request( "n "))
'******************************************************************
If Dname <> " " Then
'******************************下载文件存放的服务端目录
url=server.MapPath( "/ ")& "\ "&Dname
'***************************************************
End If
%>
<%
Set objStream = Server.CreateObject( "ADODB.Stream ")
objStream.Open
objStream.Type = 1
objStream.LoadFromFile url
response.AddHeader "content-disposition ", "inline; filename= "& Dname
Response.Charset = "UTF-8 "
Response.ContentType = "application/msword "
Response.BinaryWrite objStream.Read
Response.Flush
response.Clear()
objStream.Close
Set objStream = Nothing
%>
运行后，页面出现错误提示：显示Set objStream = Server.CreateObject( "ADODB.Stream ")这一行 不是有效的字符串，请问这是怎么回事？
三、
ASP怎么直接打开WORD文档，而不用提示下载阿？
JScript code
function AllAreaWord()
{
var oWD = new ActiveXObject("Word.Application");
var oDC = oWD.Documents.Add("",0,1);
var oRange =oDC.Range(0,1);
var sel = document.body.createTextRange();
sel.moveToElementText(PrintA);
sel.select();
sel.execCommand("Copy");
oRange.Paste();
oWD.Application.Visible = true;
//window.close();
}
</SCRIPT>
这段代码将如何调用呢，方法是否可行？
请问有没有更好的方法？请大侠们给予帮助
