/* 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();
}