Цитата malder72:
|
Ну для меня это не пауза, для меня пауза 2 часа. »
|
Ну, поставьте два часа:
Код:
WScript.Sleep 1000 * 60 * 60 * 2
Цитата malder72:
|
Весь прикол в том, что в не программист и в этой теме у меня знаний мало. Я прямо попросил написать код для меня. »
|
Ну, худо-бедно как-то понадобится ознакомиться хотя бы с основами, дабы примерно представлять, что именно делает код. Я так думаю.
Цитата malder72:
|
Вы там сидите? Инкубатор-горизонтальное перекатывание яиц. »
|
Нормально.
Ну, коль у Вас этот код работате, тогда Вам вот такая болванка примерно:
Код:
Option Explicit
Dim objDiscMaster
Set objDiscMaster = WScript.CreateObject("IMAPI2.MsftDiscMaster2")
If objDiscMaster.IsSupportedEnvironment Then
If objDiscMaster.Count > 0 Then
With WScript.CreateObject("IMAPI2.MsftDiscRecorder2")
.InitializeDiscRecorder objDiscMaster.Item(0)
Do
.EjectMedia
WScript.Sleep 1000 * 60 * 60 * 2
.CloseTray
WScript.Sleep 1000 * 60 * 60 * 2
Loop
End With
End If
End If
Set objDiscMaster = Nothing
WScript.Quit 0
Будет «дёргать» туда-сюда каждые два часа первый по списку накопитель. А вот блокировать — увы, только WinAPI.
Хотя, знаете что… Вы можете об этом попросить в соседнем разделе
AutoIt или в сообществе
Русское сообщество AutoIt - Главная страница, там Вам сделают готовый исполняемый файл с потребным полным функционалом.
