点击留言
点击留言
服务热线
  13534503040
  0663-8862290
首页 | 关于创鑫 | 服务项目 | 报价方案 | 网站优化 | 百度推广 | 电脑培训 | 成功案例 | 常见问题 | 网上留言 | 联系我们
  域名注册 | 网站空间 | 网站建设 | WAP网站 | FLASH动画 | 商标设计 | VI品牌形象设计 | 产品包装设计 | 画册设计 | 名片设计 | 形象海报
您现在的位置是:首页 > 常见问题 > 网站常识

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

发表日期:2008-10-05 20:35:29 编辑:admin 101位读者读过此文
  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.ccom


 
公司地址:揭阳市榕城区仙桥镇榕华大道4号路斗门段
公司电话:0663-8862290  手机:13534503040
揭阳创鑫网络科技                                          粤ICP备08036788号