Advertisement
Guest User

Untitled

a guest
Jun 22nd, 2018
80
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1.         var bat = new File(Folder.temp.fsName + "/gifenc.bat");        
  2.         var vbsFile = new File(Folder.temp.fsName + "/invisible.vbs");
  3.        
  4.         vbsFile.open("w");
  5.         vbsFile.encoding = "UTF-8";
  6.  
  7.         var vbsSrt =  "set args = WScript.Arguments \
  8. num = args.Count\
  9. \
  10. if num = 0 then\
  11.    WScript.Echo \"Usage: [CScript | WScript] invis.vbs gifenc.bat <some script arguments>\" \
  12.    WScript.Quit 1\
  13. end if\
  14. \
  15. sargs = \"\"\
  16. if num > 1 then\
  17.    sargs = \" \"\
  18.    for k = 1 to num - 1\
  19.         anArg = chr(34) & args.Item(k) & chr(34)\
  20.         sargs = sargs & anArg & \" \"\
  21.    next\
  22. end if\
  23. \
  24. Set WshShell = WScript.CreateObject(\"WScript.Shell\")\
  25. \
  26. WshShell.Run \"\"\"\" & WScript.Arguments(0) & \"\"\"\" & sargs, 0, False";
  27.  
  28.  
  29.         vbsFile.write(vbsSrt);
  30.         vbsFile.close();
  31.            
  32.  
  33.         bat.open("w");
  34.         bat.encoding = "UTF-8";
  35.         bat.lineFeed = "Windows";
  36.         bat.writeln("chcp 65001");
  37.        
  38.         bat.write(vbsSrt); // запиши тут чё надо
  39.         bat.close();
  40.            
  41.            
  42.            
  43.            
  44.         var exct = "wscript.exe " + "\"" + vbsFile.fsName + "\" " + "\"" + bat.fsName + "\"";  
  45.         system.callSystem(exct);
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement