2019年6月18日 星期二

建立xml檔案


建立xml檔案,例如sitemap.xml、rss.xml





不要用這個物件去建立 set fs=Server.CreateObject("Scripting.FileSystemObject"),全都是坑你知道麼。





用這個server.CreateObject("adodb.stream"),如下:
filePath=server.MapPath("/sitemap.xml")

BuildFile filePath,str1,"utf-8" 



Sub BuildFile(FileUrl,str,CharSet)
set stm=server.CreateObject("adodb.stream")
stm.Type=2     '1-二進制,2-文本
stm.mode=3    '1-讀,2-寫,3-讀寫
stm.charset=CharSet  '編碼方式,可選值:ascii,gb2312
stm.open
stm.WriteText str
stm.SaveToFile FileUrl,2
stm.flush
stm.Close
set stm=nothing
end Sub


完畢。
還有很多用途,多看看吧。

沒有留言:

張貼留言