well i am genuinely curious about this so try this in a fresh panel...
function on_mouse_lbtn_dblclk() {
var arr = ["Microsoft.XMLHTTP", "htmlfile", "Shell.Application", "WScript.Shell", "Scripting.FileSystemObject", "ScriptControl", "dummy"];
var objs = {};
var text = "";
for (i in arr) {
try {
objs[arr[i]] = new ActiveXObject(arr[i]);
text += arr[i] + " seemed to load ok.\n";
} catch(e) {
text += arr[i] + " ain't working.\n";
}
}
fb.ShowPopupMessage(text);
}
double click the panel and you should get a popup window displaying something like this...
Microsoft.XMLHTTP seemed to load ok.
htmlfile seemed to load ok.
Shell.Application seemed to load ok.
WScript.Shell seemed to load ok.
Scripting.FileSystemObject seemed to load ok.
ScriptControl seemed to load ok.
dummy ain't working.
i added dummy just to show how this script works when trying to load something that is invalid.