[ShaddyR]

nsergeip: у меня тоже номер с DeskSaver не прошел.

[denzill]

в дополнение к Замена Boot Screen-на

изменение boot.ini:
boot.cmd

Код:

 bootcfg /addsw /ng /id 1
 bootcfg /raw "/bootlogo" /a /id 1
 bootcfg /default /id 1

[Vadikan]

Тестирование RunOnceEx без перезагрузки системы или завершения сеанса

В конце файла RunOnceEx.cmd добавьте

Код:

rundll32.exe iernonce.dll,RunOnceExProcess

Команда инициирует запуск ключей RunOnceEx. Пожалуй, я добавлю это на сайт

[DmitryOlenin]

Всем известно, что своя тему оформления прописывается в файле *.sif.

Код:

CustomDefaultThemeFile = "%WinDir%\Cursors\theme.theme"

Но тема эта может не примениться, и останетесь вообще со стандартной темой Windows(даже не Luna).

Дело в том, что тема срабатывает при первом входе в систему(чуть раньше отображения ярлыков на раб. столе), после отработки RunOnceEx. Но если у вас последним пунктом стоит перезагрузка и до раб. стола дело не доходит... то вы рискуете получить то, что я описал выше.

Если у вас не применилась тема оформления, то маленький скрипт на AutoIt вам поможет.
В данном случае переменная var3 содержит путь до вашего файла с темой оформления.
Думаю, что надо писать именно в эту тему, т.к. случай необычный...

Код:

$allowed = 20 * 1000
$time = TimerInit()
$var = @SystemDir & '\' & 'rundll32.exe'
$var1 = @SystemDir & '\' & 'shell32.dll' & ',' & 'Control_RunDLL'
$var2 = @SystemDir & '\' & 'desk.cpl  desk'  & ','  &  '@'  & 'Themes ' & '/'  & 'Action'  & ':'  & 'OpenTheme '  & '/'  & 'file' & ':'
$var3 = @WindowsDir & '\' & 'Cursors' & '\' & 'theme.theme'
AutoItSetOption("WinTitleMatchMode", 4)
run($var & ' ' &  $var1 & ' ' &  $var2 & '"' & $var3 & '"')
Blockinput(1)
If TimerDiff($time) > $allowed Then _Abort()
For $k = 1 To 3
sleep(1000)
Send("{ENTER}")
    Next
exit

Func _Abort()
    ; close process if exists then exit.
    Dim $pid
    If ProcessExists($pid) Then
        ProcessClose($pid)
        Exit(2)
    Else
        Exit(3)
    EndIf
EndFunc

[NikLok]

Ну тогда вопрос ко всем!!! Так как amel27B не отвечает!

amel27В вашем комнаднике используется команда findstr.exe Где ея можно взять?

[Vadikan]

NikLok

Где ея можно взять?

В дистрибутиве Windows XP. findstr /?

[NikLok]

После встраивания обновлений в дистрибутив XP с помомощью RVM интегратора в директории I386/svcpack файлы типа kb..........exe заменяются файлами с расширениями ca_ Поэтому я считаю, что нужно добавить также сканирование на файлы
Таким образом сейчас в макросе 2 ЦИКЛА. По идее они должны отлавливать наличие обоих файлов и вносить о них информацию! Может кому и нада?

Код:

echo Line5=Дата установки системы: %date% >> "%D%oeminfo.ini"
echo Line6= >> "%D%oeminfo.ini"
echo Line7=Время установки системы: %time% >> "%D%oeminfo.ini"
echo Line8= >> "%D%oeminfo.ini"
echo Line9=Установленные обновления: >> "%D%oeminfo.ini"
echo Line10= >> "%D%oeminfo.ini"

set i=10
set j=0
set string0= 
set string1= 
set string2= 
set string3= 
set string4= 
set string5= 

FOR %%d IN (c d e f g h i j k l m n o p q r s t u v w x y z) DO IF EXIST %%d\WIN51IP SET CDROM=%%d
For /F "TOKENS=1 delims=.exe"  %%j in ('dir /B %CDROM%\I386\svcpack\KB*.exe') do ((set kbname=%%j) & (call :myprint))
For /F "TOKENS=1 delims=.ca_"  %%j in ('dir /B %CDROM%\I386\svcpack\KB*.ca_') do ((set kbname=%%j) & (call :myprint))

if %j% == 1 echo Line%i%=%string0% >> "%D%oeminfo.ini"
if %j% == 2 echo Line%i%=%string0%  %string1%>> "%D%oeminfo.ini"
if %j% == 3 echo Line%i%=%string0%  %string1%  %string2%>> "%D%oeminfo.ini"
if %j% == 4 echo Line%i%=%string0%  %string1%  %string2%  %string3%>> "%D%oeminfo.ini"
if %j% == 5 echo Line%i%=%string0%  %string1%  %string2%  %string3%  %string4% >> "%D%oeminfo.ini"

GOTO :EOF 
:myprint 
if %j% == 0 set string0=%kbname%
if %j% == 1 set string1=%kbname%
if %j% == 2 set string2=%kbname%
if %j% == 3 set string3=%kbname%
if %j% == 4 set string4=%kbname%
if %j% == 5 set string5=%kbname%

if %j% == 5 echo Line%i%=%string0%  %string1%  %string2%  %string3%  %string4%  %string5%>> "%D%oeminfo.ini"

if %j% == 5 set string0=
if %j% == 5 set string1= 
if %j% == 5 set string2= 
if %j% == 5 set string3= 
if %j% == 5 set string4= 
if %j% == 5 set string5= 

if %j% == 5 set /A i=%i%+1
set /A j=%j%+1
if %j% == 6 set j=0
:EOF

[Boa Soft]

ни путей ничего, откуда система возьмет все остальные данные, помоему это маразм!!!

А вот отсюда:

После настройки на эталонном компьютере запускаем DeskSaver.exe s Копируем утилиту и полученный файл настроек DeskSaver.ini на остальныее компьютеры и запускаем DeskSaver.exe r

Ярлыки настраиваются по именам. Не найденные - пропускаются.

[Porscheman]

Для чтения DVD стандартным WMP9 или WMP10 достаточно добавить в %windir%system32 файл CLVSD.ax и зарегистрировать его командой

Код:

 %windir%\system32\regsvr32 -s %windir%\system32\CLVSD.ax

любым батником и т.п.
Файл прилагаю, правда не могу сказать откуда он (не помню), соответственно про авторские права тоже...
Качество вполне приемлемое.

[amel27]

не могу сказать откуда он (не помню), соответственно про авторские права тоже

CyberLink Video/SP Filter
---
версия: 6.0.1402
производитель: CyberLink Corp.
продукт: CyberLink PowerDVD