用ASP實現生成網頁輸出Word文件格式
[重要通告]如您遇疑難雜癥,本站支持知識付費業務,掃右邊二維碼加博主微信,可節省您寶貴時間哦!
用ASP實現生成網頁輸出Word文件格式
用ASP實現生成網頁輸出Word文件格式
用ASP實現生成網頁輸出Word文件格式
[code]
< %
const lie=3 '修改列數
const tablewidth="33%" '定義表格的寬度
const tableheight="18%" '定義表格的高度
const imgwidth="15%" '定義表格的寬度
const imgheight="27.5%" '定義表格的高度
const f '定義文字的大小
const txtwidth="120" '圖片右側文字表格寬
const txtheight="18%" '圖片右側文字表格高
const txtalign="left" '圖片右側文字對齊方式:left左,center中,right右
'TOP 強調該文件為Word文件
function doctop()
doctop="
"+chr(13)+chr(10)
end function
function imgtotable(fto,fpar,dext)
imgtotable="
| " imgtotable=imgtotable+"
" |
"+chr(13)+chr(10)
end function
function imagetodoc(fpath,fpar)
set fto=fso.createtextfile(fpath&"/運行結果.doc",True)
fto.writeline doctop()
fto.writeline "
| " '用于排錯 'fto.writeline "123" fto.writeline imgtotable(demo,fpar,dext) fto.writeline " |
"
response.write ""&fpo&fpath&"\運行結果.doc"" 生成完畢。
"
set fto=nothing
end function
set fso=server.createobject("scripting.filesystemobject")
set fpo=fso.getfolder(server.mappath("./"))
for each demo in fpo.subfolders
call imagetodoc(demo,"")
next
set fpo=nothing
set fso=nothing
%>
[/code]
問題未解決？付費解決問題加Q或微信 2589053300 (即Q號又微信號)右上方掃一掃可加博主微信
所寫所說，是心之所感，思之所悟，行之所得；文當無敷衍，落筆求簡潔。 以所舍，求所獲；有所依，方所成！
支付寶贊助
微信贊助免責聲明,若由于商用引起版權糾紛,一切責任均由使用者承擔。
您必須遵守我們的協議，如您下載該資源，行為將被視為對《免責聲明》全部內容的認可->聯系老梁投訴資源
