
myselfidem
MemberContent Type
Profiles
Forums
Events
Everything posted by myselfidem
-
You can Edit the file ei.cfg an write: HomePremium and delete Ultimate [Channel] can be different (OEM; Retail;...)! Keep the version you have. Save your file! Launch a new time 7Customizer and don't use preset file! Create a new ISO file! How to install any version (or SKU) of Windows 7
-
Thanks! When you open the first time 7Customizer (first window) you see 5 Images or only 3? Do you see also Windows 7 Professionnel and Windows 7 Ultimate (ou Edition Intégrale)? Because 7Customizer see the 5 Images! And inside your "Autounattend.xml" which is the IMAGE/NAME ? However, all seems OK inside the log.txt! *Edit: Check the file ei.cfg because it seems that you have Windows 7 Ultimate! Look inside %systemdrive%\Win7\sources\ei.cfg and open the file with Notepad (Blocs-notes)
-
Thanks for your report! Have you given a new name to the file 7QuickLaunch-INT.exe like 7QuickLaunch.exe? Have you an Windows 7 English version? Maybe a program is running on background when you try to install the 7Quick Launch?
-
The value works also with Windows 7! The value is set to Lock Taskbar inside the script, even if it's not the case (because a reboot is needed to see the changes for TaskbarPinnedList). I need to check the file with the Taskbar Unlocked!! My file works on my desktop and with unattended installation (7QuickLaunch-INT.exe)! What it's really needed. Add a value to check. I think it's not usefull! But I can try to look for that. I've spend many time to have the file working fine. Believe me! The real problem is the Langbar. If the Langbar isn't closed, Quick Launch can't install with my Windows 7 French version! Is it the case for English version? Thanks for your support! *Edit: Tested now on my computer (not silent install)=> If the Taskbar is Unlocked the file doesn't works! The Taskbar need to be Locked first and the file works fine! New challenge *Edit 2: Maybe we can use Select and case with AutoIT to check if the Taskbar is set to Lock and lock this one if it's needed?
-
Weird! Could you attach your "log.txt" made by 7Customizer? Look inside the folder 7customizer_0.4.4\work\log.txt
-
[FIXED] registry entries in posts need to be fixed
myselfidem replied to a topic in Site & Forum Issues
Yes, I think so! Thanks in advance! -
Hello wazer! Also with mine! I think it's made with the first value inside the script (Lock Taskbar): Windows Registry Editor Version 5.00 [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced] "TaskbarSizeMove"=dword:00000000 RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\ Advanced", "TaskbarSizeMove", "REG_DWORD", "0") Lock Taskbar In fact, I've corrected your mistake! I've made also ql_win7_FRENCH_NO_REBOOT.au3 without reboot and TaskbarPinnedList disappear! Have you tested 7QuickLaunch-INT.exe? Works fine for me.
-
Nice! Thanks maxXPsoft I've just made one editing and file is updated: ;Case $Lang = French Case $Lang = "fr-FR" $title = "Nouvelle barre d’outils - Choisir un dossier" $programs = "[CLASS:MSTaskListWClass; TEXT:Applications en cours d’exécution]" Maybe it would be interresting to add this file 7QuickLaunch.exe inside your nice software Se7en_UA - with SP1 Injection But, of course it's needed more tests for Italian, etc... or others languages! Regards
-
Hi all! I've tested a new file for 7QuickLaunch-INT! Works really fine with French language, but it's needed to test for others languages if it's OK! Include: en-US;fr-FR;nl-NL;da-DK;se-SE;nb-NO The TaskbarPinnedList will disappear after the reboot! 7QuickLaunch-INT.au3 ;------------------------------------------------------------------ ;AutoIt Version: 3.3.6.1 ;Author: Andrew Calcutt, wazer ;Last Edited: 23/01/2011 ;Script Function: Adds Quick Launch Toolbar ;------------------------------------------------------------------ Opt('TrayIconDebug', 1) sleep(10) ;Adding Reg Entries. RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarSizeMove", "REG_DWORD", "0") RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarSmallIcons", "REG_DWORD", "1") RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarGlomLevel", "REG_DWORD", "2") RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer", "EnableAutoTray", "REG_DWORD", "0") RegWrite("HKEY_CURRENT_USER\Software\Policies\Microsoft\Windows\Explorer", "TaskbarNoPinnedList", "REG_DWORD", "1") RegWrite('HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2','Settings',"REG_BINARY","28000000ffffffff02000000030000003e0000004e000000feffffffce030000920600001c040000") ;$Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop\MuiCached", "MachinePreferredUILanguages") $Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop\MuiCached", "MachinePreferredUILanguages") $text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]" $path = "%AppData%\Microsoft\Internet Explorer\Quick Launch\" $toolbartext = "{down}{down}{down}{ENTER}" $toolbartitle = "{down}{down}{down}{down}{ENTER}" Select ;Case $Lang = French Case $Lang = "fr-FR" $title = "Nouvelle barre d'outils - Choisir un dossier" $programs = "[CLASS:MSTaskListWClass; TEXT:Applications en cours d'exécution]" ;Case $Lang = English Case $Lang = "en-US" $title = "New Toolbar - Choose a folder" $programs = "[CLASS:MSTaskListWClass; TEXT:Running applications]" ;Case $Lang = Dutch Case $Lang = "nl-NL" $title = "Nieuwe werkbalk - Selecteer een map" $programs = "[CLASS:MSTaskListWClass; TEXT:Actieve toepassingen]" ;Case $Lang = Danish Case $Lang = "da-DK" $title = "Ny værktøjslinje - vælg en mappe" $programs = "[CLASS:MSTaskListWClass; TEXT:Programmer, der kører]" $toolbartext = "v{UP}{ENTER}" $toolbartitle = "v{ENTER}" ;Case $Lang = Swedish Case $Lang = "se-SE" $title = "Nytt verktygsfält - välj en mapp" $programs = "[CLASS:MSTaskListWClass; TEXT:Program som körs]" ;Case $Lang = Norwegian Case $Lang = "nb-NO" $title = "Ny verktøylinje - velg en mappe" $programs = "[CLASS:MSTaskListWClass; TEXT:Kjører programmer]" EndSelect ;Unlock Taskbar _ToggleTaskbarLock() ;Create Quicklaunch Toolbar _TaskToolbarWin7("Shell:Quick Launch") ;Get Quick Launch current postion While 1 Sleep(100) $QUICKLAUNCH = ControlGetPos("[CLASS:Shell_TrayWnd]", "", $text) If Not @error Then ExitLoop WEnd $TaskBar_CenterHeight = @DesktopHeight - ($QUICKLAUNCH[3] / 2) ;Hide "Quick Launch" toolbar text MouseClick("right", $QUICKLAUNCH[0] - 5, $TaskBar_CenterHeight, 1, 0) Send($toolbartext) $TaskBar_CenterHeight = @DesktopHeight - ($QUICKLAUNCH[3] / 2) ;Hide "Quick Launch" toolbar title MouseClick("right", $QUICKLAUNCH[0] - 5, $TaskBar_CenterHeight, 1, 0) Send($toolbartitle) ;Move "Quick Launch" toolbar $QUICKLAUNCH = ControlGetPos("[CLASS:Shell_TrayWnd]", "", $text) $TRAY = ControlGetPos("[CLASS:Shell_TrayWnd]", "", "[CLASS:ReBarWindow32]") MouseClickDrag("left", $QUICKLAUNCH[0] - 5, $TaskBar_CenterHeight, $TRAY[0] + 5, $TaskBar_CenterHeight, 0) ;Move "Current Apps" bar $CURRENTAPPS = ControlGetPos("[CLASS:Shell_TrayWnd]", "", $programs) MouseClickDrag("left", $CURRENTAPPS[0] - 5, $TaskBar_CenterHeight, $TRAY[0] + 120, $TaskBar_CenterHeight, 0) ;Lock Taskbar _ToggleTaskbarLock() Func _TaskToolbarWin7($toolbardir) MouseClick("right", 0, @DesktopHeight) Send("{DOWN}{RIGHT}{UP}{ENTER}") WinWaitActive($title) sleep(1000) ControlSetText($title, "", "Edit1", $path) sleep(1000) ControlClick($title, "", "Button1") EndFunc ;==>_TaskToolbarWin7 Func _ToggleTaskbarLock() MouseClick("right", 0, @DesktopHeight) Send("{UP}{UP}{ENTER}") EndFunc ;==>_ToggleTaskbarLock Downlaod for testing: 7QuickLaunch-INT Thanks to report if it's works for others languages!
-
Hello wazer! Quick Launch classic for Windows 7 French version working fine for me. I can launch the file on my computer or with unattended installation successfuly! 7QuickLaunch-FR.au3 #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Res_Comment=wazer #AutoIt3Wrapper_Res_Description=Quick Launch Classic win7 x86/x64 - FR #AutoIt3Wrapper_Res_LegalCopyright=wazer #AutoIt3Wrapper_Res_Language=1036 #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** ;--------------------------------------------------------------------- ; AutoIt Version: 3.3.6.1 ; Author: wazer ; Quick Launch version classique pour Windows 7 ; Language:1036 - French ; Script Function: Ajouter la barre d'outils "Quick Launch" ;--------------------------------------------------------------------- Opt('TrayIconDebug', 1) sleep(10) ; Modifications des entrées du registre. RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarSizeMove", "REG_DWORD", "0") RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarSmallIcons", "REG_DWORD", "1") RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarGlomLevel", "REG_DWORD", "2") RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer", "EnableAutoTray", "REG_DWORD", "0") RegWrite("HKEY_CURRENT_USER\Software\Policies\Microsoft\Windows\Explorer", "TaskbarNoPinnedList", "REG_DWORD", "1") RegWrite('HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2','Settings',"REG_BINARY","28000000ffffffff02000000030000003e0000004e000000feffffffce030000920600001c040000") $title = "Nouvelle barre d'outils - Choisir un dossier" $path = "%AppData%\Microsoft\Internet Explorer\Quick Launch\" $text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]" $programs = "[CLASS:MSTaskListWClass; TEXT:Applications en cours d'exécution]" $toolbartext = "{down}{down}{down}{ENTER}" $toolbartitle = "{down}{down}{down}{down}{ENTER}" ; Déverrouiller la barre des tâches _ToggleTaskbarLock() ; Création de la barre d'outils "Quick Launch" _TaskToolbarWin7("Shell:Quick Launch") ; Détermination de l'emplacement de la barre d'outils "Quick Launch" While 1 Sleep(100) $QUICKLAUNCH = ControlGetPos("[CLASS:Shell_TrayWnd]", "", $text) If Not @error Then ExitLoop WEnd $TaskBar_CenterHeight = @DesktopHeight - ($QUICKLAUNCH[3] / 2) ; Cacher l'affichage du texte pour "Quick Launch" MouseClick("right", $QUICKLAUNCH[0] - 5, $TaskBar_CenterHeight, 1, 0) Send($toolbartext) $TaskBar_CenterHeight = @DesktopHeight - ($QUICKLAUNCH[3] / 2) ; Cacher l'affichage du titre pour "Quick Launch" MouseClick("right", $QUICKLAUNCH[0] - 5, $TaskBar_CenterHeight, 1, 0) Send($toolbartitle) ; Déplacement de la barre d'outils "Quick Launch" $QUICKLAUNCH = ControlGetPos("[CLASS:Shell_TrayWnd]", "", $text) $TRAY = ControlGetPos("[CLASS:Shell_TrayWnd]", "", "[CLASS:ReBarWindow32]") MouseClickDrag("left", $QUICKLAUNCH[0] - 5, $TaskBar_CenterHeight, $TRAY[0] + 5, $TaskBar_CenterHeight, 0) ; Déplacement des "Applications en cours d'exécution" $CURRENTAPPS = ControlGetPos("[CLASS:Shell_TrayWnd]", "", $programs) MouseClickDrag("left", $CURRENTAPPS[0] - 5, $TaskBar_CenterHeight, $TRAY[0] + 120, $TaskBar_CenterHeight, 0) ; Verrouiller la barre des tâches _ToggleTaskbarLock() Func _TaskToolbarWin7($toolbardir) MouseClick("right", 0, @DesktopHeight) Send("{DOWN}{RIGHT}{UP}{ENTER}") WinActive($title) sleep(1000) ControlSetText($title, "", "Edit1", $path) sleep(1000) ControlClick($title, "", "Button1") EndFunc ;==>_TaskToolbarWin7 [Func _ToggleTaskbarLock() MouseClick("right", 0, @DesktopHeight) Send("{UP}{UP}{ENTER}") EndFunc ;==>_ToggleTaskbarLock Thanks coucou for your support! Many thanks for the code! Download 7QuickLaunch_Classic-FR.zip
-
THX coucou ! Now I've found the solution and works very fine! But it's needed to disable the LangBar before, and I see I must integrate the reg file inside install.wim. Here are the files if you want try = 7Quick_Launch_Multilangues: http://www.mediafire.../?kns27djwvkrj2 However the file is working with FRENCH VERSION and for others languages, it's needed to adapt the file like my example! I don't know how to do without add personnal value manually! Many thanks wazer! ;--------------------------------------------------------------------------- ; AutoIt Version: 3.3.6.1 ; Author: wazer ; Last Edited: 20/01/2011 ; Script Function: Ajouter la barre des tâches "Quick Launch" pour Windows 7 ;--------------------------------------------------------------------------- Opt('TrayIconDebug', 1) sleep(10) ; Adjonction et modifications des entrées du registre. RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarSizeMove", "REG_DWORD", "1") RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarSmallIcons", "REG_DWORD", "1") RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarGlomLevel", "REG_DWORD", "2") RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer", "EnableAutoTray", "REG_DWORD", "0") RegWrite("HKEY_CURRENT_USER\Software\Policies\Microsoft\Windows\Explorer", "TaskbarNoPinnedList", "REG_DWORD", "1") RegWrite('HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2','Settings',"REG_BINARY","28000000ffffffff02000000030000003e0000004e000000feffffffce030000920600001c040000") ; $Lang = RegRead("HKEY_CURRENT_USER\Control Panel\International", "sLanguage") $Lang = RegRead("HKEY_CURRENT_USER\Control Panel\Desktop", "PreferredUILanguages") $title = "Nouvelle barre d’outils - Choisir un dossier" $path = "%AppData%\Microsoft\Internet Explorer\Quick Launch\" $text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]" $programs = "Applications en cours d’exécution" $toolbartext = "{down}{down}{down}{ENTER}" $toolbartitle = "{down}{down}{down}{down}{ENTER}" Select ; Case $Lang = "FRA";French Case $Lang = "fr-FR";French $title = "Nouvelle barre d’outils - Choisir un dossier" $path = "%AppData%\Microsoft\Internet Explorer\Quick Launch\" $text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]" $programs = "Applications en cours d’exécution" $toolbartext = "{down}{down}{down}{ENTER}" $toolbartitle = "{down}{down}{down}{down}{ENTER}" ; Case $Lang = "NL; Dutch Case $Lang = "nl-NL"; Dutch $title = "Nieuwe werkbalk - Selecteer een map" $path = "%AppData%\Microsoft\Internet Explorer\Quick Launch" $text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]" $programs = "[CLASS:MSTaskListWClass; TEXT:Actieve toepassingen]" $toolbartext = "{down}{down}{down}{ENTER}" $toolbartitle = "{down}{down}{down}{down}{ENTER}" ; Case $Lang = "ENU"; English Case $Lang = "en-US"; English $title = "New Toolbar - Choose a folder" $path = "%AppData%\Microsoft\Internet Explorer\Quick Launch" $text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]" $programs = "[CLASS:MSTaskListWClass; TEXT:Running applications]" $toolbartext = "{down}{down}{down}{ENTER}" $toolbartitle = "{down}{down}{down}{down}{ENTER}" ; Case $Lang = "DAN"; Danish Case $Lang = "da-DK"; Danish $title = "Ny værktøjslinje - vælg en mappe" $path = "%AppData%\Microsoft\Internet Explorer\Quick Launch" $text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]" $programs = "[CLASS:MSTaskListWClass; TEXT:Programmer, der kører]" $toolbartext = "v{UP}{ENTER}" $toolbartitle = "v{ENTER}" ; Case $Lang = "SE"; Swedish Case $Lang = "se-SE"; Swedish $title = "Nytt verktygsfält - välj en mapp" $path = "%AppData%\Microsoft\Internet Explorer\Quick Launch" $text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]" $programs = "[CLASS:MSTaskListWClass; TEXT:Program som körs]" $toolbartext = "{down}{down}{down}{ENTER}" $toolbartitle = "{down}{down}{down}{down}{ENTER}" ; Case $Lang = "NO"; Norwegian Case $Lang = "nb-NO"; Norwegian $title = "Ny verktøylinje - velg en mappe" $path = "%AppData%\Roaming\Microsoft\Internet Explorer\Quick Launch" $text = "[CLASS:ToolbarWindow32; TEXT:Quick Launch]" $programs = "[CLASS:MSTaskListWClass; TEXT:Kjører programmer]" $toolbartext = "{down}{down}{down}{ENTER}" $toolbartitle = "{down}{down}{down}{down}{ENTER}" EndSelect ; Déverrouiller la barre des tâches _ToggleTaskbarLock() ; Création de la barre des tâches "Quick Launch" _TaskToolbarWin7("Shell:Quick Launch") ; Obtention de l'emplacement de la barre des tâches "Quick Launch" While 1 Sleep(100) $QUICKLAUNCH = ControlGetPos("[CLASS:Shell_TrayWnd]", "", $text) If Not @error Then ExitLoop WEnd $TaskBar_CenterHeight = @DesktopHeight - ($QUICKLAUNCH[3] / 2) ; Cacher l'affichage du texte pour "Quick Launch" MouseClick("right", $QUICKLAUNCH[0] - 5, $TaskBar_CenterHeight, 1, 0) Send($toolbartext) $TaskBar_CenterHeight = @DesktopHeight - ($QUICKLAUNCH[3] / 2) ; Cacher l'affichage du titre pour "Quick Launch" MouseClick("right", $QUICKLAUNCH[0] - 5, $TaskBar_CenterHeight, 1, 0) Send($toolbartitle) ; Déplacement de la barre des tâches "Quick Launch" $QUICKLAUNCH = ControlGetPos("[CLASS:Shell_TrayWnd]", "", $text) $TRAY = ControlGetPos("[CLASS:Shell_TrayWnd]", "", "[CLASS:ReBarWindow32]") MouseClickDrag("left", $QUICKLAUNCH[0] - 5, $TaskBar_CenterHeight, $TRAY[0] + 5, $TaskBar_CenterHeight, 0) ; Déplacement de la barre des "Applications en cours d'exécution" $CURRENTAPPS = ControlGetPos("[CLASS:Shell_TrayWnd]", "", $programs) MouseClickDrag("left", $CURRENTAPPS[0] - 5, $TaskBar_CenterHeight, $TRAY[0] + 120, $TaskBar_CenterHeight, 0) ; Verrouiller la barre des tâches _ToggleTaskbarLock() Func _TaskToolbarWin7($toolbardir) MouseClick("right", 0, @DesktopHeight) Send("{UP 8}{RIGHT}{DOWN 4}{ENTER}") WinActive($title) sleep(1000) ControlSetText($title, "", "Edit1", $path) sleep(1000) ControlClick($title, "", "Button1") EndFunc ;==>_TaskToolbarWin7 Func _ToggleTaskbarLock() MouseClick("right", 0, @DesktopHeight) Send("{UP}{UP}{ENTER}") EndFunc ;==>_ToggleTaskbarLock Enjoy! *Edit: If you need help to integrate reg files inside your image install.wim, you can read the French guide: Editer le registre dans une image WIM
-
Hello coucou To disable the Langbar we can use this reg file: First I've also read help here (important step: #6 = Delete "Desktop.ini") Quick Launch Tutorial I've injected the reg file inside my image install.wim And I've also add this reg file inside "Tweaks.reg" (But needs a "reboot") I've tried your file "Quick Launch EN-FR", but doesn't works for me! When I use my 7QuickLaunch on my computer works like a charm ! But when I use with my silent installation - the langbar toolbar is really closed - but a Toolbar "Documents" appears... and the installation stucks on "Documents" and the installation fails I'm looking where I've missing something!! Regards
-
Post-RTM Updates for Windows 7 (Discontinued)
myselfidem replied to steven4554's topic in User Contributed Update Lists
Thanks steven! I will waiting if it will be always necessary to add KB976902(xxx).msu after SP1 RTM is released! Regards -
Office 2010 Proofing ToolKit Silent Installation
myselfidem replied to Kazung-Q's topic in Microsoft Office
Thanks! -
@wazer The process is working fine, but at first we need to disable the LangBar (Close), otherwise that doesn't works! I've tried to add a reg file inside the script to desable first the Langbar if needed but whithout success! Just as an example! Here is the file if someone want try it: 7Quick_Launch_Multilangues (English, French, Dutch, Swedish, Danish, Norvegian) After, I can delete the file when you have made the final version! Many thanks! *Edit: Now 7Quick Launch works for FRENCH LANGUAGE
-
Finally I've found Quick Launch working for me! Many thanks wazer and coucou for your help and your support! Here is my file 7QuickLaunch..au3 Like you can see I've made some changes, but works really fine for me! Cheers!
-
I also made some tests with Windows 7 French version. I've an error: MouseClickDrag Line 48 Error:Subscript used with non-Array variable 7QuickLaunch-FR.au3 #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_UseX64=n #AutoIt3Wrapper_Res_Comment=wazer #AutoIt3Wrapper_Res_Description=Quick Launch Classic win7 x86/x64 - FR #AutoIt3Wrapper_Res_LegalCopyright=wazer #AutoIt3Wrapper_Res_Language=1036 #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** ;------------------------------------------------------------------ ; AutoIt Version: 3.3.6.1 ; Author: wazer ; Last Edited: 09/13/2010 ; QuickLaunch Classic Version 1.04 ; Last Edited: 13/09/2010 - EU ; Script Function: Adds Quick Launch Classic Toolbar ;------------------------------------------------------------------ ;Adding Reg Entries. RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarSizeMove", "REG_DWORD", "1") RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarSmallIcons", "REG_DWORD", "1") RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced", "TaskbarGlomLevel", "REG_DWORD", "2") RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer", "EnableAutoTray", "REG_DWORD", "0") RegWrite("HKEY_CURRENT_USER\Software\Policies\Microsoft\Windows\Explorer", "TaskbarNoPinnedList", "REG_DWORD", "1") RegWrite('HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\StuckRects2','Settings',"REG_BINARY","28000000ffffffff02000000030000003e0000004e000000feffffffce030000920600001c040000") ;Déverrouiller la barre des tâches _ToggleTaskbarLock() ;Création de la barre d'outils "Quicklaunch" _TaskToolbarWin7("Shell:Quick Launch") ;Obtention de la position de la barre d'outils "Quick Launch" While 1 Sleep(100) $QUICKLAUNCH = ControlGetPos("[CLASS:Shell_TrayWnd]", "", "[CLASS:ToolbarWindow32; TEXT:Quick Launch]") If Not @error Then ExitLoop WEnd $TaskBar_CenterHeight = @DesktopHeight - ($QUICKLAUNCH[3] / 2) ;Cacher l'affichage du texte pour "Quick Launch" MouseClick("right", $QUICKLAUNCH[0] - 5, $TaskBar_CenterHeight, 1, 0) Send("{UP 11}{enter}") ;Cacher l'affichage du titre pour "Quick Launch" MouseClick("right", $QUICKLAUNCH[0] - 5, $TaskBar_CenterHeight, 1, 0) Send("{UP 10}{enter}") ;Déplacement de la barre d'outils "Quick Launch" $QUICKLAUNCH = ControlGetPos("[CLASS:Shell_TrayWnd]", "", "[CLASS:ToolbarWindow32; TEXT:Quick Launch]") $TRAY = ControlGetPos("[CLASS:Shell_TrayWnd]", "", "[CLASS:ReBarWindow32]") MouseClickDrag("left", $QUICKLAUNCH[0] - 5, $TaskBar_CenterHeight, $TRAY[0] + 5, $TaskBar_CenterHeight, 0) ;Déplacement de la barre des "Applications en cours d'exécution" $CURRENTAPPS = ControlGetPos("[CLASS:Shell_TrayWnd]", "", "[CLASS:MSTaskListWClass; TEXT:Applications en cours d'exécution]") MouseClickDrag("left", $CURRENTAPPS[0] - 5, $TaskBar_CenterHeight, $TRAY[0] + 105, $TaskBar_CenterHeight, 0) ;Verrouiller la barre des tâches _ToggleTaskbarLock() Func _TaskToolbarWin7($toolbardir) MouseClick("right", 0, @DesktopHeight) Send("{UP 8}{RIGHT}{DOWN 4}{ENTER}") WinActive("Nouvelle barre d'outils - Choisir un dossier") ControlCommand("Nouvelle barre d'outils", "Annuler", "Button2", "UnCheck", "") ControlCommand("Nouvelle barre d'outils - Choisir un dossier", "Sélectionner un dossier", "Button1", "Check", "") Send("{ENTER}") EndFunc ;==>_TaskToolbarWin7 Func _ToggleTaskbarLock() MouseClick("right", 0, @DesktopHeight) Send("{UP}{UP}{ENTER}") EndFunc ;==>_ToggleTaskbarLock I'm looking for an issue!
-
Office 2010 Proofing ToolKit Silent Installation
myselfidem replied to Kazung-Q's topic in Microsoft Office
Thanks for your sharing! Btw, do you use the full CD profing tools (with all the files) for your silent installation? -
Office 2010 Proofing ToolKit Silent Installation
myselfidem replied to Kazung-Q's topic in Microsoft Office
I don't have the CD with Proofing tools! But I think that the config.xml must writed like this for an unattended installation: config.xml And the command to launch is like this:setup.exe /config %systemdrive%\Office14\\ProofKit.WW\config.xml Check if the file ProofKitWW.msi is correct because I don't have this program! I hope that can help you! -
1) Make a new fresh copy of your DVD Windows 7 on a folder! 2) Create a folder, named, i.e. C:\SP. And copy/paste KB976932(xxx).exe inside (the one you need: x86 or x64)!. 3) Launch Se7en_UA with SP1 Injection 4) When the dialog box ask you: Do you want to ADD all language files included?... Choose the button: YES
-
Office 2010 Proofing ToolKit Silent Installation
myselfidem replied to Kazung-Q's topic in Microsoft Office
Your file config.xml you give above isn't complete!! -
Integrate KB977074 with DISM fail
myselfidem replied to winfor's topic in Unattended Windows 7/Server 2008R2
If you have installed WAIK for Windows 7 on your computer, you can use this command to integrate updates inside an offline image: Adapt the paths to your needs! Example for Windows 7 Ultimate x86. @echo off Color 0A echo. "C:\Program Files\Windows AIK\Tools\x86\Servicing\Dism.exe" /Mount-Wim /Wimfile:"C:\Win7\sources\install.wim" /index:5 /MountDir:"C:\work" echo. choice /t 5 /c on /cs /d o > nul echo. "C:\Program Files\Windows AIK\Tools\x86\Servicing\Dism.exe" /Image:"C:\work" /Add-Package /PackagePath:"C:\Updates" echo. pause -
Office 2010 Proofing ToolKit Silent Installation
myselfidem replied to Kazung-Q's topic in Microsoft Office
It seems that the temp path isn't correct! Could you please attach your config.xml? -
Ask your Seven xml ? here
myselfidem replied to maxXPsoft's topic in Unattended Windows 7/Server 2008R2
About the batch "Reg_Hive.cmd" you can improve like this: Reg_Hive.cmd @echo off Color 0A echo. "C:\Program Files\Windows AIK\Tools\x86\Servicing\Dism.exe" /Mount-Wim /Wimfile:"C:\Se7en\sources\install.wim" /index:1 /MountDir:"C:\work" echo. choice /t 5 /c on /cs /d o > nul echo. reg.exe load HKLM\WIM_Default "C:\work\Users\Default\NTUSER.DAT" reg.exe load HKLM\WIM_Software "C:\work\Windows\System32\config\SOFTWARE" reg.exe load HKLM\WIM_System "C:\work\Windows\System32\config\SYSTEM" echo. choice /t 5 /c on /cs /d o > nul echo. reg.exe import "C:\DISM_Temp\Services.reg" echo. choice /t 5 /c on /cs /d o > nul echo. reg.exe import "C:\DISM_Temp\RegistryTweaks.reg" echo. reg.exe unload HKLM\WIM_Default reg.exe unload HKLM\WIM_Software reg.exe unload HKLM\WIM_System echo. choice /t 5 /c on /cs /d o > nul echo. "C:\Program Files\Windows AIK\Tools\x86\Servicing\Dism.exe" /Unmount-Wim /MountDir:"C:\work" /Commit echo. echo ==Appuyez sur n'importe qu'elle touche pour quitter==&pause>nul Using: choice /t 5 /c on /cs /d o > nul You don't need to wait and use "Enter" to go to the next step! Set the time you want wait, /t 10 (seconds) Cheers!