vbs轉換成js代碼,vbs與js

本文目錄一覽：

• 1、JS代碼轉換為VBS 的For Each問題
• 2、VBS代碼轉成JS代碼，幫忙下
• 3、求vbs 轉換成JS寫法
• 4、vbs怎麼調用js函數
• 5、vbs 中創建對象 給對象複製 如何轉變成js
• 6、請問這一小段VB代碼，怎麼改成JS？謝謝

JS代碼轉換為VBS 的For Each問題

先排除下語法問題

disp=obj “.” va “=” obj1[va]

取集合或數組的子項應該是用圓括弧，Collection(index)，index值為0到Count-1

VBS代碼轉成JS代碼，幫忙下

SCRIPT LANGUAGE=”JavaScript”

!–

function DecodeAnsi(s){

var i,sTmp,sResult,sTmp1;

sResult = “”;

//alert(s.length);

for(i=0;is.length;i++){

if(s.substr(i,1)==”%”){

sTmp=s.substr(parseInt(i)+1,2);

sTmp=parseInt(sTmp.charCodeAt(0));

if(isNumber(sTmp)){

if(sTmp==0){

i=i+2;

}else if(sTmp0 sTmp128){

sResult = sResult + String.fromCharCode(sTmp);

i=i+2;

}else{

if(s.substr(parseInt(i)+3,1)==”%”){

sTmp1=s.substr(parseInt(i)+4,2);

sTmp1=parseInt(sTmp1.charCodeAt(0));

if(isNumber(sTmp1)){

sResult = sResult + String.fromCharCode((sTmp*16*16 + sTmp1));

i=i+5;

}

}else{

sResult = sResult + String.fromCharCode(sTmp);

i=i+2;

}

}

}else{

sResult = sResult + s.substr(i,1);

}

}else{

sResult = sResult + s.substr(i,1);

}

}

return sResult;

}

function isNumber(str){

str=str+””;

var reg = /\D/;

if(str.match(reg)!=null){

return false;

}

return true;

}

//–

/SCRIPT

有點亂,不太懂VBS,你將就看看,自己改改吧,或者你說下實現什麼功能

求vbs 轉換成JS寫法

這個是在我本機上測試的，已經運行成功，你可以根據這個改var t

var locator = new ActiveXObject (“WbemScripting.SWbemLocator”);

var objWMIService = locator.ConnectServer(“.”);

var colFiles= new Enumerator (objWMIService.ExecQuery(“select * from CIM_DATAFILE where DRIVE=’d:’ and PATH=’\\\\audio\\\\'”));

for (;!colFiles.atEnd(); colFiles.moveNext()) {

t=t + colFiles.item().Name + “\n”;

}

WScript.Echo(t);

第一，js是區分大小寫的，你的代碼沒有注意大小寫第二，獲取集合的對象，js不是vbs的for each ** in ** 而是我寫的那樣第三，你的我的文檔的路徑有問題，桌面上的我的文檔文件夾的名字是My Document，而不是單純的我的文檔，路徑也不一定就在桌面 如果還是不懂，就密我吧，QQ：516890556

vbs怎麼調用js函數

a href=’#none’ onclick=’showmessagebox(」hello「,」zzzzzzzzzzz「);’hello/a

vbs 中創建對象 給對象複製 如何轉變成js

/* 針對於IE的讀取本地文件的方法 */

function getFileSize(file) {

try {

var fso = new ActiveXObject(“Scripting.FileSystemObject”);  

var f1 = fso.GetFile(file);

return f1.size;

}

catch (e) { 

alert(“非常抱歉,讀取文件發生錯誤: \n” + e); 

return -1;

}

}

請問這一小段VB代碼，怎麼改成JS？謝謝

for(var i=1; i=100; i++)

    document.write ‘a href=”photos/’ + i.toString() +’.jpg” rel=”lightbox2[album]”img src=”thumbs/’+ i.toString()  +’.jpg” border=”0″ //a’;