ndog

Member
  • Content count

    9
  • Joined

  • Last visited

Community Reputation

0 Neutral

About ndog

Profile Information

  • OS
    none specified
  1. Hi wonko, nice to see you around still! I have to apologise to you both, turns out I was using an addon for firefox, called redirect cleaner, which was stripping the links. Will use internet explorer next time!
  2. I have been looking all over the internet for this tool! I have been reading the forum - http://www.msfn.org/board/topic/43253-win98se-image-for-multiple-pcs/ which suggests to download the preptool for windows 98 here - http://download.microsoft.com/download/winntwks40/Utility/4.71.1015.0/NT4/EN-US/WIN_DEPLOY.exe Does anyone know where I can obtain it? If could upload a copy I would be most appreciative! ftp://ftp.microsoft.com/MISC1/BUSSYS/WINNT/KB/Q195/4/46.TXT
  3. Never mind figured it out on my own. For those who stumble upond this thread sortlinks.reg Windows Registry Editor Version 5.00 [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Modules\CommonPlaces] "Order"=- [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Modules\CommonPlaces\CFD] "Order"=- Have a good day.
  4. Hi everyone. Heres how to hide updates via script. Please make sure you are connected to internet first and can see microsoft.com. hideKBs.vbs Dim hideupdates(7) hideupdates(0) = "Microsoft Security Essentials - KB2267621" hideupdates(1) = "Microsoft Security Essentials - KB2691894" hideupdates(2) = "Bing Desktop" hideupdates(3) = "Windows Internet Explorer 9 for Windows 7" hideupdates(4) = "Windows Internet Explorer 9 for Windows 7 for x64-based Systems" hideupdates(5) = "KB971033" hideupdates(6) = "Update for Windows 7 for x64-based Systems (KB971033)" hideupdates(7) = "KB2483139" set updateSession = createObject("Microsoft.Update.Session") set updateSearcher = updateSession.CreateupdateSearcher() Set searchResult = updateSearcher.Search("IsInstalled=0 and Type='Software'") For i = 0 To searchResult.Updates.Count-1 set update = searchResult.Updates.Item(i) For j = LBound(hideupdates) To UBound(hideupdates) 'MsgBox hideupdates(j) if instr(1, update.Title, hideupdates(j), vbTextCompare) = 0 then 'Wscript.echo "No match found for " & hideupdates(j) else Wscript.echo "Hiding " & hideupdates(j) update.IsHidden = True end if Next Next Have a good day
  5. Hi everyone. How to "sort by name" the Links (aka Favorites) Folder in windows 7 via script? I need it for unattended windows 7 install. To do manually just right click and chose sort by name from drop down menu. Uploaded with ImageShack.us I am interested if anyone has ever tried this before... I tried googling but every result is talking about windows start menu or internet explorer favorites, not the links folder.
  6. I am in a similar situation as you, so I came up with my own solution and programmed something in autoit. pxeboot client machine. Call ipxe -> pxelinux.0 (ipxe speeds things up a lot) Have a menu choice of either BartPE, WinPE3.1 x86, or WinPE3.1 x64. Depending on the RAM and CPU type you will boot the appropriate PE environment. BartPE requiring 386MB+ RAM, still I would like it to be smaller... the PE environment startup script points to the server and launches the application In the application you choose a preped wim file, select the NT5/NT6 (named to Windows XP and Windows 7 for other techs) and chose the architecture type in the cd keys of windows and office if it is selected type in some admin users and limited users, change the picture if you want select some software to be installed type any wireless settings type a computer name in The GUI runs another program which runs CPUz and determines the manufacturer and model of the machine. If you have previously backed up drivers for that model operating system and architecture the status light will change and give a little popup which says drivers backed up or not etc. These will be used and copied to c:\drivers. If you install windows xp the program uses peimg to pre inject the drivers, otherwise windows 7 it will use dism to inject the drivers. If no drivers are previously backed up or the DP box is ticked then it will use yet another autoit script to scan through the driverpacks repo and either peimg/dism inject ones that correspond to the system. note however this only applies to the current PE environment eg only bartPE can be used to peimg inject xp drivers, winPE3.1 x86 can only be used to dism inject win7 x86 drivers etc. Another option I will include later will be to simply copy the entire driver repository and run a post os install driver install. All driver bases covered.. After pressing OK it does some syntax checking eg properly formatted computer name or user name etc and then generates a batch file which does all the work of prepare the drive, eg format, make active, install a bootloader apply a wim file to that drive copy the drivers to c:\drivers if windows xp use fix_hdc to apply mass storage drivers, if windows 7 use fix_hdc_7.vbs to apply correct mass storage drivers if windows xp use anoter autoit program (CPUZ based) to detect CPU and install correct HAL copy all the install programs and related scripts into place reboot The wim files all need to be prepared in a way that will go and go and run the scripts that get copied into place, this differs with each one. With the windows 7 images I have a code in the unattend.xml which create the admin user and then runs a script which creates something under startup on the startmenu which in turn runs the main script... Same kind of concept with windows xp image. I do not have plans to share code right now as it is messy..., however it may inspire you. Good luck on your project. Feel free to ask any questions runpeWIN7.cmd runpeXP.cmd
  7. This is vbs which works for me. If you can convert to js then share with the rest of the world that would be nice Function WuaVersion 'get current WUA version Dim oAgentInfo, ProductVersion On Error Resume Next Err.Clear Set oAgentInfo = CreateObject("Microsoft.Update.AgentInfo") If ErrNum = 0 Then WuaVersion = oAgentInfo.GetInfo("ProductVersionString") Else Wscript.Echo "Error getting WUA version." WuaVersion = 0 'calling code can interpret 0 as an error. End If On Error Goto 0 End Function msgbox(WuaVersion) if WuaVersion <> "0" then Set ServiceManager = CreateObject("Microsoft.Update.ServiceManager") ServiceManager.ClientApplicationID = "My App" 'add the Microsoft Update Service, GUID Set NewUpdateService = ServiceManager.AddService2("7971f918-a847-4430-9279-4a52d1efe18d",7,"") end if 'ServerSelection values ssDefault = 0 ssManagedServer = 1 ssWindowsUpdate = 2 ssOthers = 3 'InStr values intSearchStartChar = 1 dim strTitle Set updateSession = CreateObject("Microsoft.Update.Session") Set updateSearcher = updateSession.CreateupdateSearcher() updateSearcher.ServerSelection = ssWindowsUpdate Set searchResult = updateSearcher.Search("IsInstalled=0 and Type='Software'") For I = 0 To searchResult.Updates.Count-1 Set update = searchResult.Updates.Item(I) strTitle = update.Title if InStr(intSearchStartChar, strTitle, "KB971033", vbTextCompare) <> "0" then update.IsHidden = True end if Next WScript.Quit
  8. I am trying to 'hide' certain updates in Windows 7 which are important (1) - Update for Windows 7 (KB971033) Optional (34) - Arabic Language Pack - Windows 7 Service Pack 1 (KB2483139) ... Ukrainian Language Pack - Windows 7 Service Pack 1 (KB2483139) I am doing this on about 20 laptops (different models, requires sysprep) this week for a education provider, and I would like to do via automation, eg script As far as I am aware the windows updates database is stored here - c:\windows\softwaredistribution\Datastore\DataStore.edb Editing this file will not be easy via script, unless someone knows how to do via powershell, vbs etc... If I use WSUS server, can it auto hide these updates for me? Regards