На лоре небывалое: люди пишут настоящие программы, вместо того, чтобы просто рассуждать о преимуществах того или иного языка.
> #!/bin/sh
> if [ "$#" != 1 ]; then
> echo -e "Usage:\nDVDbackup <Folder 4 backing up>"
> exit 1
> fi
> name=`echo $1| sed -e "s/^\///" -e "s/\//_/g"`
> bufs=`mkisofs -R -q -print-size $1`
> mkisofs -V $name -A "Backup information: only 4 my PC" -R $1 | > cdrecord -v -dao -eject tsize="$bufs"s -
> И сколько надо промучаться с вашим VBscript, чтобы написать > аналог этих несчастных трех строчек на баше (подсказку по > использованию не считаю)?
intIndex = 0
strPath = "C:\BurnTemp"
Set objDiscMaster = WScript.CreateObject("IMAPI2.MsftDiscMaster2")
Set objRecorder = WScript.CreateObject("IMAPI2.MsftDiscRecorder2")
strDevice = objDiscMaster.Item(intIndex)
objRecorder.InitializeDiscRecorder(strDevice)
Set objImageWriter = CreateObject("IMAPI2.MsftDiscFormat2Data")
objImageWriter.Recorder = objRecorder
objImageWriter.ClientName = "IMAPI Script"
Set objFSI = CreateObject("IMAPI2FS.MsftFileSystemImage")
objFSI.ChooseImageDefaults(objRecorder)
objFSI.FileSystemsToCreate = 1
Set objDir = objFSI.Root
objDir.AddTree strPath, False
Set objImage = objFSI.CreateResultImage()
Stream = objImage.ImageStream
objImageWriter.Write(Stream)
Зато насколько более читаемо.
А сколько надо промучиться на баше, чтобы вызвать конкретное окошко с диалогом из конкретной программы?
(c) http://www.linux.org.ru/jump-message.jsp?msgid=5284101&cid=5296772
Voker57