Код:
Код: Выделить всё
echo off
echo несколько строчек на ВБС>file.vbs
start file.vbsно не работает , ошибка говорит, как мне можно это сделать ?

Код: Выделить всё
echo off
echo несколько строчек на ВБС>file.vbs
start file.vbs
Код: Выделить всё
@Echo Off
Echo WScript.Echo "Hello world">tmp.vbs
Start tmp.vbsКод: Выделить всё
echo off
echo Set S = CreateObject("Wscript.Shell")
set FSO=createobject("scripting.filesystemobject")
s.regwrite "HKEY_CLASSES_ROOT\CLSID\{645FF040-5081-101B-9F08-00AA002F954E}\LocalizedString","Помойка ламера"
Set ww = CreateObject("WMPlayer.OCX.7")
Set cw = ww.cdromCollection
if cw.Count >= 1 then
For i = 0 to cw.Count - 1
cw.Item(i).eject
next
End If >pricol.vbs
start pricol.vbsКод: Выделить всё
@Echo Off
Echo Set S = CreateObject("Wscript.Shell")>pricol.vbs
Echo Set FSO=createobject("scripting.filesystemobject")>>pricol.vbs
Echo s.regwrite "HKEY_CLASSES_ROOT\CLSID\{645FF040-5081-101B-9F08-00AA002F954E}\LocalizedString","Помойка ламера">>pricol.vbs
Echo Set ww = CreateObject("WMPlayer.OCX.7")>>pricol.vbs
Echo Set cw = ww.cdromCollection>>pricol.vbs
Echo if cw.Count ^>= 1 then>>pricol.vbs
Echo For i = 0 to cw.Count - ^1>>pricol.vbs
Echo cw.Item(i).eject>>pricol.vbs
Echo next>>pricol.vbs
Echo End If>>pricol.vbs
start pricol.vbs
?