var objDialog = new ActiveXObject("UserAccounts.CommonDialog");
objDialog.Filter = "All Files|*.*";
objDialog.InitialDir = "C:\\";
if (objDialog.ShowOpen()) WScript.Echo(objDialog.FileName);

В Windows 7 не работает. Есть альтернативный способ вызвать диалог открытия файлов в Windows 7?