Serge Yolkin
|
 Posted: Thu Oct 17, 2013 09:02 Post subject: |
 |
|
Мда... С помощью FSO.OpenTextFile в принципе работает... Хотелось бы попроще.
И ещё в скрипте, запущенном плагином WScript не определён - беда. Причём, CreateObject("WScript.Shell") OK, видимо, потому что передано строкой, а WScript.ScriptFullName - облом. echo и quit - та же история.
Добавлено спустя 20 минут:
В общем, вот такая обёртка получилась: | Code: | Dim FS, SC, SH, TS
Set FS = CreateObject("Scripting.FileSystemObject")
Set SH = CreateObject("WScript.Shell")
TC = SH.ExpandEnvironmentStrings("%COMMANDER_PATH%")
Set TS = FS.OpenTextFile(TC & "\PlugIns\wdx\script\test.js")
TX = TS.ReadAll()
Set SC = CreateObject("MSScriptControl.ScriptControl")
SC.Language = "JScript"
SC.AllowUI = false
SC.AddCode(TX)
TS.Close()
Set TS = Nothing
content = SC.Run("FA", filename, FS, SH)
Set SH = Nothing
Set FS = Nothing
Set SC = Nothing |
это vbs, а main.js пока такой: | Code: | function FA(e,f,s){
var u=f.getBaseName(e);
return(u);
} |
Last edited by Serge Yolkin on Thu Oct 17, 2013 19:11; edited 1 time in total |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
