<script>
var emu_lenb;
var emu_stream;
var emu_midb;
var emu_byte;
function lenb(stream){
emu_stream = stream;
execScript('emu_lenb=lenb(emu_stream)','vbscript');
return emu_lenb;
}
function midb(stream,pos,len){
emu_stream = stream;
execScript('emu_midb=midb(emu_stream,'+(pos+1)+','+len+')','vbscript');
return emu_midb;
}
function ascB(b){
emu_byte=b;
execScript('emu_byte=ascB(emu_byte)','vbscript');
return emu_byte;
}
var ado = new ActiveXObject("adodb.Stream");
ado.open();
ado.type=1;
ado.LoadFromFile("test.txt");
var st = ado.Read();
ado.close();
for (i=0;i<lenb(st);i++){
document.write(escape(String.fromCharCode(ascB(midb(st,i,1)))))
}
</script>