ActiveXObject ADODB.Stream封装

为什么80%的码农都做不了架构师？>>>

/* StreamTypeEnum Values*/
var adTypeBinary = 1;
var adTypeText = 2;/* LineSeparatorEnum Values*/
var adLF = 10;
var adCR = 13;
var adCRLF = -1;/* StreamWriteEnum Values*/
var adWriteChar = 0;
var adWriteLine = 1;/* SaveOptionsEnum Values*/
var adSaveCreateNotExist = 1;
var adSaveCreateOverWrite = 2;/* StreamReadEnum Values*/
var adReadAll = -1;
var adReadLine = -2;/* charset の値の例:*  _autodetect, euc-jp, iso-2022-jp, shift_jis, unicode, utf-8,...*//* filename: 読み込むファイルのパス* charset:  文字コード* 戻り値:   文字列*/
function adoLoadText(filename, charset) {var stream, text;stream = new ActiveXObject("ADODB.Stream");stream.type = adTypeText;stream.charset = charset;stream.open();stream.loadFromFile(filename);text = stream.readText(adReadAll);stream.close();return text;
}/* filename: 読み込むファイルのパス* charset:  文字コード* 戻り値:   行単位の文字列の配列*/
function adoLoadLinesOfText(filename, charset) {var stream;var lines = new Array();stream = new ActiveXObject("ADODB.Stream");stream.type = adTypeText;stream.charset = charset;stream.open();stream.loadFromFile(filename);while (!stream.EOS) {lines.push(stream.readText(adReadLine));}stream.close();return lines;
}/* filename: 書き出すファイルのパス* charset:  文字コード*/
function adoSaveText(filename, text, charset) {var stream;stream = new ActiveXObject("ADODB.Stream");stream.type = adTypeText;stream.charset = charset;stream.open();stream.writeText(text);stream.saveToFile(filename, adSaveCreateOverWrite);stream.close();
}

转载于:https://my.oschina.net/jsan/blog/374703

ActiveXObject ADODB.Stream封装相关推荐

创建ActiveXObject ADODB.Stream时报错：automation服务器不能创建对象
先说句废话:通过解决"automation服务器不能创建"这个问题,总算是见识到了什么叫做"网上文章一大抄,看你会抄不会抄"了,各种解决方案,但都大同小异,且能 ...
javaScript读取txt文档的FSO对象和ADODB.Stream对象
转自:http://blog.163.com/chaosumin@126/blog/static/86387403201092793610651 在使用JavaScript读取txt文档时,一般使用j ...
关于Adodb.Stream的使用说明
组件:"Adodb.Stream" 有下列方法: Cancel 方法使用方法如下 Object.Cancel 说明:取消执行挂起的异步 Execut ...
VB 实现大文件的分割与恢复,引用 ADODB.Stream 提供一个过程代码
'VB 实现大文件的分割与恢复,引用 ADODB.Stream 提供一个过程: '要引用 Microsoft ActiveX Data Objects 2.5 Libary '或 Microsoft ...
adodb.stream文件操作类
<% ''/*******************************二进制文件操作类************************************ ''/*作者:死在水中的鱼(死 ...
ADODB.Stream 错误 '800a0bbc' 写入文件失败
重装更改目录为e盘后,上传文件出现问题.解决方法: 调用adodb.stream的savetofile方法时发生错误, ADODB.Stream 错误 800a0bbc 写入文件失败. 原因可能是: ...
关于Adodb.Stream 的使用说明
组件:"Adodb.Stream" 有下列方法: Cancel 方法使用方法如下 Object.Cancel 说明:取消执行挂起的异步 Execute ...
ADODB.Stream 错误 #x27;800a0bb9#x27; 参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。
代码如下: Function getHTTPPage(Path) t = GetBody(Path) getHTTPPage=BytesToBstr(t,"gb2312") ...
解决：ADODB.Stream 错误 '800a0bbc' 写入文件失败
重装更改目录为e盘后,上传文件出现问题.解决方法: 调用adodb.stream的savetofile方法时发生错误, ADODB.Stream 错误 800a0bbc 写入文件失败.(msxml3. ...
adodb执行查询oracle慢,adodb.stream逐行读写过慢，求优化VBA
需求是这样的:要将EXCEL中的数据转为txt和json,由于泰文直接转出会乱码再手动转为utf-8就没用了,所以需要在VBA中直接转变为utf-8,但是由于文本量过大,所以现在运行一次宏要好久,求各 ...

ActiveXObject ADODB.Stream封装

ActiveXObject ADODB.Stream封装相关推荐

最新文章

热门文章