geezery
MemberContent Type
Profiles
Forums
Events
Everything posted by geezery
-
I'll tried also on Windows XP, but same error occurs also there.
-
Wow, very nice indeed. I tried to regsvr32 gimagex_com.dll, but I'm getting error in Finnish version of Vista. The error message is in finnish, so I assume you don't need it. I will try it tomorrow with Windows XP. Here is the error message from event log: Lokinimi: Application Lähde: SideBySide Päivä: 18.12.2007 19:51:26 Tapahtumatunnus:33 Tehtäväluokka: Ei mitään Taso: Virhe Avainsanat: Klassinen Käyttäjä: - Tietokone: HOSTNAME Kuvaus: Aktivointikontekstin luonti epäonnistui (C:\Users\user\Desktop\com\x86\gimagex_com.dll). Riippuvaista kokoonpanoa Microsoft.VC90.CRT,processorArchitecture="x86",publicKeyToken="1fc8b3b9a1e18e3b",type="win32",version="9.0.21022.8" ei löytynyt. Yksityiskohtaisen vianmäärityksen voi tehdä ohjelmalla sxstrace.exe. Tapahtuman Xml: <Event xmlns="http://schemas.microsoft.com/win/2004/08/events/event"> <System> <Provider Name="SideBySide" /> <EventID Qualifiers="49409">33</EventID> <Level>2</Level> <Task>0</Task> <Keywords>0x80000000000000</Keywords> <TimeCreated SystemTime="2007-12-18T17:51:26.000Z" /> <EventRecordID>400</EventRecordID> <Channel>Application</Channel> <Computer>HOSTNAME</Computer> <Security /> </System> <EventData> <Data>Microsoft.VC90.CRT,processorArchitecture="x86",publicKeyToken="1fc8b3b9a1e18e3b",type="win32",version="9.0.21022.8"</Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data>C:\Users\user\Desktop\com\x86\gimagex_com.dll</Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data> </Data> <Data> </Data> </EventData> </Event>
-
I have some experience in AutoIT and I could help you if needed. This kind of program would be very nice. What it needs: - Logging - Better progres bar It didn't work in my Finnish Windows XP at all. I know that I don't have the recent drivers in my laptop, but nothing was changed or downloaded to the Drivers directory. I could help you solve the problems if I would have the source. Also the "Select All" button didn't work at all.
-
Or you can do it also easily with VbScript Set objShell = CreateObject("WScript.Shell") 'Start the program objShell.run "C:\Program Files\Program\Program.exe" Wscript.Sleep 2000 'Send i key objShell.SendKeys "i" Wscript.Sleep 500 'And enter objShell.SendKeys "{ENTER}" Wscript.Quit
-
Nice work you have done. I would have a request. Can you add command line support which also supports that nice progressbar (Imagex.exe doesn't support) It would be so nice to have a full featured command line wim tool.
-
I played for 5 minutes with the css file and the HTA and the result is this. If someone needs advice on how to change their hta to look like this send me an email. You can find the address from the first post. I know this is not the best solution, bu I don't have the time to make the script changes right now.
-
You need basic html/css skills and some knowledge about vbscript/javascript to be able to create hta's. Here is some nice samples: Small tutorial about HTA: http://www.visualbasicscript.com/m_53534/tm.htm Simple ghosting HTA http://www.msfn.org/board/WinPE-20-simple-...HTA-t95507.html ImageX HTA http://www.msfn.org/board/WinPE-20-ImageX-...070-t97512.html
-
Here is a working sample for your needs. You can change the way computers are read in to array if you want, now they are hard coded to the script. 'Define Objects '--------------------------------------------------------------------------------------- Set objShell = CreateObject("WScript.Shell") Set objFSO = CreateObject("Scripting.FileSystemObject")' Set objNetwork = CreateObject("WScript.Network") Const ForAppending = 8 'Create a txt file '--------------------------------------------------------------------------------------- Set objFile = objFSO.OpenTextFile("C:\FalsePing.txt", ForAppending, True) 'List of computers Dim IP_ARRAY() 'Change the size of the array also to here '--------------------------------------------------------------------------------------- Redim IP_ARRAY(10) i=0 'Array of target computers '--------------------------------------------------------------------------------------- IP_ARRAY(0) = "10.13.56.14" IP_ARRAY(1) = "10.13.56.2" IP_ARRAY(2) = "10.13.56.3" IP_ARRAY(3) = "10.13.56.4" IP_ARRAY(4) = "10.13.56.5" IP_ARRAY(5) = "10.13.56.6" IP_ARRAY(6) = "10.13.56.7" IP_ARRAY(7) = "10.13.56.8" IP_ARRAY(8) = "10.13.56.9" IP_ARRAY(9) = "10.13.56.10" IP_ARRAY(10) = "10.13.59.11" For Each Host in IP_ARRAY If Ping(IP_ARRAY(i)) = False Then 'Write the offline computername to FalsePing.txt '--------------------------------------------------------------------------------------- ObjFile.Writeline(IP_ARRAY(i) & " is not online") i=i+1 Else 'Copy the needed file '--------------------------------------------------------------------------------------- 'Uncomment this line if you want to copy a file. Now it only writes that the computer is online 'objFSO.CopyFile "C:\SourceFile.txt" , "C$\", OverwriteExisting ObjFile.Writeline(IP_ARRAY(i) & " is online") i=i+1 End if Next Function objWMI(strComputer, strWQL) Dim wmiNS, objWMIService wmiNS = "\root\cimv2" Set objWMIService = GetObject("winmgmts:\\" & strComputer & wmiNS) 'connect to WMI Set objWMI = objWMIService.ExecQuery(strWQL) 'execute query Set objWMIService = Nothing End Function Function Ping(strRmtPC) Dim wmiQuery, objPing, objStatus, blnStatus wmiQuery = "Select * From Win32_PingStatus Where Address = '" & strRmtPC & "'" Set objPing = objWMI(".", wmiQuery) For Each objStatus in objPing If IsNull(objStatus.StatusCode) Or objStatus.Statuscode<>0 Then blnStatus = False 'Not Reachable Else blnStatus = True 'Reachable End If Next Ping = blnStatus Set objPing = Nothing End Function
-
How to synchronize a 5gb file with 5 servers inside slow network
geezery replied to geezery's topic in Software Hangout
I'll think that I should take a closer look to that xdelta. It looks like a life safer program and it is open source etc. I'll think that it would be nice if someone can write a simple AutoIT gui for it. I will post my testings with it here. Maybe I can use vshadow.exe with it to also transfer locked down files. Tested it a bit and it really rocks, this is what I've been looking for. Here is some usage help. Make patch: xdelta3.exe -e -s old_file new_file delta_file Apply patch: xdelta3.exe -d -s old_file delta_file decoded_new_file -
How to synchronize a 5gb file with 5 servers inside slow network
geezery replied to geezery's topic in Software Hangout
I looked up the PatchOnClick program and it looked kind of nice, but there is no command line support in the freeware version. There was also some nice links behind the link that geek gave. http://www.clickteam.com/eng/patchmaker.php I don't want any adds and the method that this program works is not what i'm looking for. http://xdelta.org/ I must test this one, if there ain't no better ones available. Does the cwRsync need a ssh server installation? -
Very nice, I have also been contacted a other member of this forum, who has some nice features in the hta. I'm currently so busy at my work that I don't have the needed time to implement new features + test new version. The scripts that I have made is totally free to use and modify. But if you get some nice features done, please post those to the msfn community. gc metal keep up the great work, very nice HTA. I will check it when I have time.
-
Would it be possible to make a AutoIt script, that could install any application silently? There is a lot of application installers that uses same dialogs always. Maybe those can be identified with AutoIt script without hard coding for each application. I could start to develop that kind of script, but I need some assistance and professional opinions before I start planning the script. Or would it be completely waste of my time?
-
Tutorials are always nice.
-
I'll think that jcarle has already given you all the tools also for that purpose. You just have to use some of your nLite knowledge and notepad. Just edit the desired WUD .ul file to suite your needs and start nLite and put all the nLite compatible hotfixes to it. Maybe you can write a list of all the nLite compatible hotfixes.
-
I'll think that he meants something similar to this. http://www.smartdeploy.com/products/index.htm
-
There is something missing in WinPE 2. I think there is no solution for the problem. Maybe you can try http://www.dependencywalker.com/ tool to diagnose the problem. If you find the solution please share it:)
-
Of course it works, but the way you are doing it sounds a bit difficult:) Here is one NSIS script that I make. There is also a regwrite to the Run path. ;Sample NSIS silent installation script by Geezery ; ;Name of the program Name "YZShadow" ;Name of the executable file OutFile "YZShadow_setup.exe" ;Installation path InstallDir "$PROGRAMFILES\YZShadow\" ;Silent installation / uninstallation by default. You don't need any installation switches for example "/S" SilentInstall silent SilentUnInstall silent ;Name of the Installation section Section "Installation" ;Select the files you want to include to your installation (Local path = Where the files are in your hard disk) SetOutPath "$INSTDIR" File /r C:\Add\yz\*.* ;We need to add this, if we want to include the uninstaller. WriteUninstaller "uninst.exe" ;Here we add the program to startup WriteRegStr HKEY_LOCAL_MACHINE "SOFTWARE\Microsoft\Windows\CurrentVersion\Run" "YzShadow" "@ProgFiles\YzShadow\YzShadow.exe" ;Here we can specify the shortcuts to create ;Creates a new group in Start Menu / Programs group called S&M CreateDirectory "$SMPROGRAMS\YZShadow" ;Then we create shortcuts for uninstall and the program file. CreateShortCut "$SMPROGRAMS\YZShadow\YZShadow.lnk" "$INSTDIR\YZShadow.exe" CreateShortCut "$SMPROGRAMS\YZShadow\Uninstall.lnk" "$INSTDIR\Uninst.exe" SectionEnd ;Uninstallation Section - Here we specify, what we need to remove Section "Uninstall" DeleteRegValue HKEY_LOCAL_MACHINE "SOFTWARE\Microsoft\Windows\CurrentVersion\Run" "YzShadow" ;Deletes all the files Delete "$INSTDIR\*.*" RMDir "$INSTDIR" ;Remove the links Delete "$SMPROGRAMS\YZShadow\*.*" RMDir "$SMPROGRAMS\YZShadow" SectionEnd
-
Have you changed the MyFilePath attribute in the HTA to suite your needs. i.e. Z:\images\ and remember to add \ to the end of the path. I have hard coded that browse files dialog in the script if the MyFilePath doesn't have any *.wim files. Are you using WinPe or VistaPE?
-
post-build app install script question
geezery replied to laggerific's topic in Unattended Windows 2000/XP/2003
I have used one in my ImageX HTA gui here is a sample code with some comments. [code]Sub ProcessWait 'Define the objects Set objShell = CreateObject("WScript.Shell") Set objWMIService = GetObject ("winmgmts:\\.\root\cimv2") 'Lets run our setup here, in hidden mode ObjShell.Run "cmd /c setup.exe",0 'A small sleep is required here, because the process doesn't exist if we go too fast ahead. Wscript.Sleep 1000 'Here comes the WMI query Dim objWMIService : Set objWMIService = GetObject("winmgmts:\\.\root\cimv2") 'In the end of the line comes the process name Dim colItems : Set colItems = objWMIService.ExecQuery("Select * From Win32_Process Where Name = 'setup.exe'") Dim intCount : intCount = colItems.Count 'Loop until the setup.exe process count is bigger than 0 Do While intCount > 0 Set colItems = objWMIService.ExecQuery("Select * From Win32_Process Where Name = 'setup.exe'") intCount = colItems.Count Wscript.Sleep 3000 Loop Set colItems = Nothing Set intCount = Nothing Set objWMIService = Nothing End Sub[/code] I didn't test the sample code here, but you can get it to work with a little modification. -
Thanks again FredBeagle. I reupped the zip.
-
You have to put a registry value here: HKLM\Software\Microsoft\Windows\Currentversion\Run Add REG_SZ i.e "C:\Program Files\MyApp\myapp.exe"
-
Uploaded new beta 3 version, where is only bug fixes. 'Felix' -> I'll think that those errors are caused by invalid PE image you are using. Do you have WMI component installed properly? You can find Download link from the first post. Thank you FredBeagle for the feedback you gave.
-
Mars Installer 1.5 - automatic software installation
geezery replied to Marsianin's topic in Application Installs
Your program looks very nice and simple, but I have like 200apps to configure and it is a pain in you know where, when writing the ini file. Could it be possible to make a simple gui for the ini creation? Is it possible to use UNC path on the %ROOT% variable i.e. \\server1\share\Applications ? Keep up the good work you have done.