龙盟编程博客 | 无障碍搜索 | 云盘搜索神器
快速搜索
主页 > web编程 > asp编程 >

数据文件并设置编码

时间:2012-12-31 22:56来源:未知 作者:admin 点击: 次
分享到：

function ReadText(FileName)  '这是一个用于读出文本文件的函数

On Error Resume Next
   
 set adf=server.CreateObject("Ado"&"db.Str"&"eam")
 if instr(filename,":")<>0 then
   path=filename
 else
  
   path=server.MapPath(FileName)
 end if
 
 with adf
 ' response.write  path
  .Type=2
  .LineSeparator=13
  .Open
  .LoadFromFile (path)
  .Charset="GB2312"
  .Position=2
  ReadText=.ReadText
  .Cancel()
  .Close()
 end with
 set adF=nothing
end function


精彩图集
精彩文章

热门标签

udp协议 执行过程 主机管理 wordwrap 策略模 checkbox选中 差异 输汉字 GMap.Net Execl导出 启动失败 Vista 关闭当前页面 循环结构 finally 命令解析 联想笔记本 IIS无法启动 单缓冲 剪切文件 浏览器信息 linux系统防火墙 用户名脚本 cookie插件 1061 pfsockopen bbed js获取属性 编码解码 CSS3 内存泄漏检测 win32com 库日志 apk安装 大类 第K大数 php去掉字符串 音序 linux挂载 安装方法 java移动文件 80004005 字体 函数参数 点击 照相 比较特别的基 PNG透明 选中 modu 归并排 php php检查 php PHP json 四舍 ShellExecute 分片技术 定位 ActiveMQ 报表打印 哈弗曼编码

赞助商链接