點擊留言
點擊留言
服務热線
  13682786020
  0663-8862290
首頁 | 關於狄顥 | 服務項目 | 線上報價 | 網站優化 | 電腦課程 | 成功案例 | 常見问題 | 網上留言 | 聯系我們
  域名註册 | 網站空間 | 網站建設 | WAP網站 | FLASH動畫 | 商標設計 | VI品牌形象設計 | 產品包裝設計 | 畫册設計 | 名片設計 | 形象海報
您現在的位置是：首頁 > 常見问題 > 網站常識

用ASP读取/写入UTF-8编碼格式的文件

發表日期：2008-10-05 20:35:29 编辑：admin 有31位读者读过此文
  1. <%   
  2. '-------------------------------------------------   
  3. '函數名称:ReadTextFile   
  4. '作用:利用AdoDb.Stream對象来读取UTF-8格式的文本文件   
  5. '----------------------------------------------------   
  6. function ReadFromTextFile (FileUrl,CharSet)   
  7. dim str   
  8. set stm=server.CreateObject("adodb.stream")   
  9. stm.Type=2 '以本模式读取   
  10. stm.mode=3   
  11. stm.charset=CharSet   
  12. stm.open   
  13. stm.loadfromfile server.MapPath(FileUrl)   
  14. str=stm.readtext   
  15. stm.Close   
  16. set stm=nothing   
  17. ReadFromTextFile=str   
  18. end function   
  19. %>   
  1. <%   
  2. '-------------------------------------------------   
  3. '函數名称:WriteToTextFile   
  4. '作用:利用AdoDb.Stream對象来写入UTF-8格式的文本文件   
  5. '----------------------------------------------------   
  6. Sub WriteToTextFile (FileUrl,byval Str,CharSet)   
  7. set stm=server.CreateObject("adodb.stream")   
  8. stm.Type=2 '以本模式读取   
  9. stm.mode=3   
  10. stm.charset=CharSet   
  11. stm.open   
  12. stm.WriteText str   
  13. stm.SaveToFile server.MapPath(FileUrl),2   
  14. stm.flush   
  15. stm.Close   
  16. set stm=nothing   
  17. end Sub  
  18. %>   
  1. <%   
  2. '-------------------------------------------------   
  3. '函數名称:WriteToTextFile   
  4. '作用:利用AdoDb.Stream對象来写入UTF-8格式的文本文件   
  5. '----------------------------------------------------   
  6. Sub WriteToTextFile (FileUrl,byval Str,CharSet)   
  7. set stm=server.CreateObject("adodb.stream")   
  8. stm.Type=2 '以本模式读取   
  9. stm.mode=3   
  10. stm.charset=CharSet   
  11. stm.open   
  12. stm.WriteText str   
  13. stm.SaveToFile server.MapPath(FileUrl),2   
  14. stm.flush   
  15. stm.Close   
  16. set stm=nothing   
  17. end Sub  
  18. %>   
上一条：9月成接甲茂钢铁信息網 改版升級 設計完成 下一条：去掉Ajax缓存解决辦法
【 显示字体： 大 中 小 】 【打印】 【關闭】
相關鏈接：

　　台北狄顥網絡科技有限公司是專註於網站建設，網站設計，網站推廣的公司，提供域名註册、空間租用，動畫制作，網站整体營销SEO優化的專業機構。詳情請访问http://www.web0663.com http://www.web0663.cn
 
公司地址：中國揭陽市榕城区仙桥镇榕华大道槎桥路口向东100米
公司電話：86-663-8862290  手机:86-13682786020
创鑫網絡科技有限公司                                          粤ICP备08036788号