Jump to content
Strawberry Orange Banana Lime Leaf Slate Sky Blueberry Grape Watermelon Chocolate Marble
Strawberry Orange Banana Lime Leaf Slate Sky Blueberry Grape Watermelon Chocolate Marble

MSFN is made available via donations, subscriptions and advertising revenue. The use of ad-blocking software hurts the site. Please disable ad-blocking software or set an exception for MSFN. Alternatively, register and become a site sponsor/subscriber and ads will be disabled automatically. 


SOOPAFLY

Member
  • Content Count

    60
  • Donations

    $0.00 
  • Joined

  • Last visited

Community Reputation

0 Neutral

About SOOPAFLY

  1. WTF is this maybe you should consider posting something more useful
  2. 1.my attempt to install a theme by default has failed for some reason although i think i did all the necessary stuff [shell] DefaultStartPanelOff = No DefaultThemesOff = No CustomDefaultThemeFile = "%WinDir%\Resources\Themes\Watercolor Ergonomic.theme" and put the theme in $OEM$\$$\Resources\Themes\ 2.I need to execute a script upon system reboot after the installation(but it doesn't executes for some reason) so i added the following reg entery to my regtweaks and coppied the script to systemdrive [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\RunOnce] "shortcuts"="%SYSTEMDRIVE%\shortcuts.vbs" ---------------------------script_code------------------------------------ ' Some move,create & delete operations ' This script will delete itself upon complition dim fso,demofile,oShellLink,demofolder Set fso = CreateObject("Scripting.FileSystemObject") set WshShell = WScript.CreateObject("WScript.Shell") WScript.Sleep 60000 Set oShellLink = WshShell.CreateShortcut(WshShell.ExpandEnvironmentStrings("%USERPROFILE%\Start Menu\cmd.lnk")) oShellLink.TargetPath = "cmd.exe" oShellLink.Save Set oShellLink=Nothing Set oShellLink = WshShell.CreateShortcut(WshShell.ExpandEnvironmentStrings("%USERPROFILE%\Start Menu\Text_editor.lnk")) oShellLink.TargetPath = "notepad.exe" oShellLink.Save Set oShellLink=Nothing Set oShellLink = WshShell.CreateShortcut(WshShell.ExpandEnvironmentStrings("%USERPROFILE%\Start Menu\RegEdit.lnk")) oShellLink.TargetPath = "regedit.exe" oShellLink.Save Set demofile = fso.GetFile(WshShell.ExpandEnvironmentStrings("%ALLUSERSPROFILE%\Start Menu\programs\Ahead Nero\Nero - Burning Rom.lnk")) demofile.Move (WshShell.ExpandEnvironmentStrings("%APPDATA%\Microsoft\Internet Explorer\Quick Launch\")) Set demofile = fso.GetFile(WshShell.ExpandEnvironmentStrings("%USERPROFILE%\Desktop\RegCleaner.lnk")) demofile.Move (WshShell.ExpandEnvironmentStrings("%APPDATA%\Microsoft\Internet Explorer\Quick Launch\")) Set demofile = fso.GetFile(WshShell.ExpandEnvironmentStrings("%USERPROFILE%\Desktop\FlashGet.lnk")) demofile.Move (WshShell.ExpandEnvironmentStrings("%APPDATA%\Microsoft\Internet Explorer\Quick Launch\")) Set demofile = fso.GetFile(WshShell.ExpandEnvironmentStrings("%USERPROFILE%\Start Menu\Programs\Windows Media Player.lnk")) demofile.Delete Set demofile = fso.GetFile(WshShell.ExpandEnvironmentStrings("%USERPROFILE%\Start Menu\Programs\Internet Explorer.lnk")) demofile.Delete Set demofolder = fso.GetFolder(WshShell.ExpandEnvironmentStrings("%USERPROFILE%\My Documents\My Music\")) Set demofolder.Attributes = 0 demofolder.Delete Set demofolder = fso.Getfolder(WshShell.ExpandEnvironmentStrings("%USERPROFILE%\My Documents\My Pictures\")) Set demofolder.Attributes = 0 demofolder.Delete Set demofile = fso.GetFile(WshShell.ExpandEnvironmentStrings("%appdata%\IconCache.db")) demofile.Delete Set demofile = fso.GetFile(WshShell.ExpandEnvironmentStrings("%systemdrive%\shortcuts.vbs")) demofile.Delete WScript.Quit (ohh and the script is errorless it's just an execution prob)
  3. could you explain me how exactly do you do this?
  4. I've found a way to change different windows icons through registry but unfortunatlly i can't find a way to rebuild icon cache during the unattended installation. so if you know a way to do this please tell me
  5. first of all you need to edit the winnt.sif [GuiUnattended] AdminPassword=* AutoLogon=Yes EncryptedAdminPassword=NO than you need to add the following registry tweak [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon] "DefaultUserName"="your name" "DefaultPassword"="" "AutoAdminLogon"="1" "ForceAutoLogon"="1" ----===HELL YEH===----
  6. in order for vbs to recognize environment variables you need to use the following method (some object).ExpandEnvironmentStrings("%some_variable%\path")
  7. here's a script for NOD32 Antivirus, change the sleep value according to your machine speed (you know the deal paste in notepad and save with the vbs extension) set WshShell = WScript.CreateObject("WScript.Shell") Wscript.Sleep 9000 WshShell.SendKeys "{DOWN}" Wscript.Sleep 100 WshShell.SendKeys "{DOWN}" Wscript.Sleep 100 WshShell.SendKeys "{ENTER}" Wscript.Sleep 2000 WshShell.SendKeys "{LEFT}" Wscript.Sleep 100 WshShell.SendKeys "{ENTER}" Wscript.Sleep 1000 WshShell.SendKeys "{ENTER}" Wscript.Sleep 1000 WshShell.SendKeys " " Wscript.Sleep 100 WshShell.SendKeys "{ENTER}" Wscript.Sleep 1000 WshShell.SendKeys "{DOWN}" Wscript.Sleep 100 WshShell.SendKeys " " Wscript.Sleep 100 WshShell.SendKeys "{ENTER}" Wscript.Sleep 1000 WshShell.SendKeys "{ENTER}" Wscript.Sleep 1000 WshShell.SendKeys "{UP}" Wscript.Sleep 100 WshShell.SendKeys "{TAB}" Wscript.Sleep 100 WshShell.SendKeys "{TAB}" Wscript.Sleep 100 WshShell.SendKeys "{TAB}" Wscript.Sleep 100 WshShell.SendKeys " " Wscript.Sleep 100 WshShell.SendKeys "{ENTER}" Wscript.Sleep 1000 WshShell.SendKeys " " Wscript.Sleep 100 WshShell.SendKeys "{ENTER}" Wscript.Sleep 1000 WshShell.SendKeys "{ENTER}" Wscript.Sleep 1000 WshShell.SendKeys "{TAB}" Wscript.Sleep 100 WshShell.SendKeys "{TAB}" Wscript.Sleep 100 WshShell.SendKeys "{TAB}" Wscript.Sleep 100 WshShell.SendKeys "{TAB}" Wscript.Sleep 100 WshShell.SendKeys "{ENTER}" Wscript.Sleep 1000 WshShell.SendKeys "{ENTER}" Wscript.Sleep 9000 WshShell.SendKeys "{RIGHT}" Wscript.Sleep 100 WshShell.SendKeys "{ENTER}" Wscript.Sleep 2000 WScript.Quit here's a script for regcleaner (again change the sleep values accordind to your machine speed). Set WshShell = WScript.CreateObject("WScript.Shell") WScript.Sleep 1500 WshShell.SendKeys "{Tab}" WshShell.SendKeys "{Tab}" WshShell.SendKeys "{Tab}" WshShell.SendKeys "{Tab}" WshShell.SendKeys "{ENTER}" WshShell.SendKeys "{ENTER}" WScript.Sleep 1000 WScript.Quit here's a script for winrar 3.2 (context menu without icons and will include only extraxt to,extract here,extract(filename) all file associations are being chosed) Set WshShell = WScript.CreateObject("WScript.Shell") WScript.Sleep 3500 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 500 WshShell.SendKeys " " WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys " " WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys " " WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys " " WScript.Sleep 500 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys " " WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys " " WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys " " WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys " " WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys " " WScript.Sleep 500 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys " " WScript.Sleep 100 WshShell.SendKeys "{TAB}" WScript.Sleep 100 WshShell.SendKeys "{ENTER}" WScript.Sleep 600 WshShell.SendKeys "{ENTER}" WScript.Sleep 3500 WshShell.SendKeys "%{F4}" WScript.Quit
  8. bootfix.bin is a file that causes youe pc to give higher priority to booting from the HD so that it won't boot from the cd every time the installation restarts your pc. this file basically eliminated the hassle of removing the cd before the installation restarts the first time. so after the first restart your hardisk already has a boot information in it's boot section and your pc boots from the hardisk and not the cdrom
  9. If you use sendkeys functions in vbs script like me or you just want to deny the abillity to cancel a specific installation from the user than u must have thought at some point that it will be extremely useful to block user input both from the keyboard and the mouse, aproximately one month ago i started a thread at experts exchange you might want to consider experts i understand that in order to achive this input block you have to deal with the blockinput api but sadly my knowledge of vb equals to zero. unfortunately the exe that the nice guy made for me causes my batch to terminate and also can be overridden with the ctrl+alt+delete combination. so next step will be blocking that combination too. i found a sub routine to achieve this ctr+alt+delete but as i said before i don't know half a thing about vb so it didn't help me. if someone will succeed in making script that will combine the blockinput and the ctrl+alt+del combination block and than another that will reenable them and than of course will be kind enough to post them here or send them to me it will be great here is my email ------->kc_mccloud@yahoo.com
  10. removing bootdix.bin has indeed removed the message but also caused the system to boot into the cd time after time
  11. i just started the virtual pc installation and it didn't show me the message that's for sure i'm now at the stage when setup copies files to the installation folder so i'll have to just wait and see. i myself didn't think that it will be that easy.i relayed on a site that said that in order to have the message displayed you have to place the bootfix file in the i386 directory so i thought that not placing it will diable the message, it's that simple
  12. just deleted the bootfix.bin file fron the i386 directory and there you have it an automatic installation. straight to the inspecting hardware configuration message without tha "press any key.." crap
  13. that's it just finished checking a new image i made with virtual pc
  14. the pe builder has a plugin directory called bootfix it's used to enable the message and it contains only one INI file -------------------------------------------------------------------------------------------- ; bootfix.inf ; PE Builder v3 plug-in INF file for adding bootfix.bin ; Created by Bart Lagerweij [Version] Signature= "$Windows NT$" [PEBuilder] Name="Boot Fix (Enabling ""Press any key to boot from CD"")" Enable=1 Help="bootfix.htm" [sourceDisksFiles] bootfix.bin=1 ---------------------------------------------------------------------------------------------- maybe if i'll change the Enable=1 to Enable=0 it will disable the message that the pe builder will generate a new bootfix.bin and i'll replace with it the default bootfix.bin found in the i386 directory
×
×
  • Create New...