出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
[2464] Re:ワードやエクセルをダウンロードするには
投稿者：北岳さん 2002/08/12 10:09:01
サーバでBASP21を使用します。
　
---------/alias/1.htm--------------
<html><body bgcolor="beige">
<p>エクセル:<input type="button" value="OPEN" onClick="JavaScript:location.href='/aspfold/excel.asp'">
<p>ワード:<input type="button" value="OPEN" onClick="JavaScript:location.href='/aspfold/word.asp'">
</body></html>
　
--------/aspfold/excel.asp-----------
<%
filnam="/alias2/123.xls"
Set bobj = Server.CreateObject("basp21")
barray = bobj.BinaryRead(Server.MapPath(filnam))
Response.AddHeader "Content-Disposition" , " attachment; filename=789.xls"
Response.ContentType = "application/x-binary"
Response.BinaryWrite barray
%>
　
--------/aspfold/word.asp-----------
<%
filnam="/alias3/abc.doc"
Set bobj = Server.CreateObject("basp21")
barray = bobj.BinaryRead(Server.MapPath(filnam))
Response.AddHeader "Content-Disposition" , " attachment; filename=xyz.doc"
Response.ContentType = "application/x-binary"
Response.BinaryWrite barray
%>
ワードやエクセルをダウンロードするには 　 NEWさん [2002/08/07 17:02:59] [2436]
　 Re:ワードやエクセルをダウンロードするには 　 北岳さん [2002/08/12 10:09:01] [2464]

TreeBBS For ASP V.0.1.3
Program By ＹａｓＮｅｔ