Bytessence Install Maker 5.40 - (09Jan2013) - new release

[OldSkoolGamer]

Inf0Byt3,

Is your site currently down? Cannot get to it form home or work since last week sometime.

Thanks

[LuCiFeR[SD]]

Inf0Byt3,

Is your site currently down? Cannot get to it form home or work since last week sometime.

Thanks

I can access his site just fine.

[Little John]

Thanks for the new BIM version! I'll certainly use it for creating the next installer that I'm going to release.

I can access his site just fine.

Me too. I just downloaded BIM without a problem.

Regards, Little John

[OldSkoolGamer]

Weird, still unable to access the site for some reason, Chrome gives me the following error :

SNIP.


Got the d/l from CNET, but still unable to get to his site for some reason.

[Inf0Byt3]

Weird, still unable to access the site for some reason, Chrome gives me the following error :

Unable to access the network
Google Chrome is having trouble accessing the network.

This one is really strange. I have no idea why you can't access it. Are you using a proxy by any chance? Try this link:

http://www.bytessence.com/index.html

If it doesn't work, maybe it is being blocked by your ISP. I can't see any errors in the website log.

Thanks for the new BIM version! I'll certainly use it for creating the next installer that I'm going to release.

That's great. Let me know how it goes.

[OldSkoolGamer]

SNIP.


Got the d/l from CNET, but still unable to get to his site for some reason.

[Bisonte]

The Download is still ok...

I try it yesterday and today....

[StanDan]

I was wondering, I can't seem to find anywhere in the docs that show command line options for Uninst0.exe, are there any? It seems like arguments cause the program to end abruptly.

I'd like to auto-uninstall the previous version by looking up the installed path and then calling Unist0.exe. Does anyone have some experience doing this?

[Inf0Byt3]

Hi StanDan,

Sorry for the slow answer. Currently, there aren't any command-line switches for silent uninstallation. I hope to be able to add this feature in one of the next versions. The only thing close to uninstalling previous versions of the program is by using the automatic detection for programs ("Product information" page -> "Prompt user to uninstall existing versions of the program" at the bottom). It works by searching for certain keys in the registry (however it will just ask the user to uninstall the detected program). More info on how to work with this option can be found in the help file.

[StanDan]

Hi StanDan,

Sorry for the slow answer. Currently, there aren't any command-line switches for silent uninstallation. I hope to be able to add this feature in one of the next versions. The only thing close to uninstalling previous versions of the program is by using the automatic detection for programs ("Product information" page -> "Prompt user to uninstall existing versions of the program" at the bottom). It works by searching for certain keys in the registry (however it will just ask the user to uninstall the detected program). More info on how to work with this option can be found in the help file.

Thank you! My users turned out to be too thick to use this option unfortunately. Here's what I came up with in case it may help someone else. This is cobbled together from various PB forum posts.

Code: Select all

RunProgram("Uninst0.exe", "", "", #PB_Program_Wait)

#PROCESS_ALL_ACCESS_VISTA_WIN7 = $1FFFFF

Prototype.i PFNCreateToolhelp32Snapshot(dwFlags.i, th32ProcessID.i) ;
Prototype.b PFNProcess32First(hSnapshot.i, *lppe.PROCESSENTRY32) ;
Prototype.b PFNProcess32Next(hSnapshot.i, *lppe.PROCESSENTRY32) ;

Procedure GetPidByName(p_name$) 
    Protected hDLL.i, process_name$ 
    Protected PEntry.PROCESSENTRY32, hTool32.i 
    Protected pCreateToolhelp32Snapshot.PFNCreateToolhelp32Snapshot 
    Protected pProcess32First.PFNProcess32First 
    Protected pProcess32Next.PFNProcess32Next 
    Protected pid.i 
    
    hDLL = OpenLibrary(#PB_Any,"kernel32.dll") 
    
    If hDLL 
        pCreateToolhelp32Snapshot = GetFunction(hDLL,"CreateToolhelp32Snapshot") 
        pProcess32First = GetFunction(hDLL,"Process32First") 
        pProcess32Next = GetFunction(hDLL,"Process32Next") 
    Else 
        ProcedureReturn 0 
    EndIf 
    
    PEntry\dwSize = SizeOf(PROCESSENTRY32) 
    hTool32 = pCreateToolhelp32Snapshot(#TH32CS_SNAPPROCESS, 0) 
    pProcess32First(hTool32, @PEntry) 
    process_name$ = Space(#MAX_PATH) 
    CopyMemory(@PEntry\szExeFile,@process_name$,#MAX_PATH) 
    
    If  UCase(process_name$) = UCase(p_name$) 
        ProcedureReturn PEntry\th32ProcessID 
    EndIf 
    
    While pProcess32Next(hTool32, @PEntry) > 0 
        process_name$ = Space(#MAX_PATH) 
        CopyMemory(@PEntry\szExeFile,@process_name$,#MAX_PATH) 
        
        If  UCase(process_name$) = UCase(p_name$) 
            ProcedureReturn PEntry\th32ProcessID 
        EndIf 
    
    Wend 
    
    CloseLibrary(hDLL) 
    
    ProcedureReturn 0 
EndProcedure

Procedure EnumWindowsProc(hWnd,lParam) 
   GetWindowThreadProcessId_(hWnd,@lpProc) 
   If lpProc=PeekL(lParam) ; process passed to EnumWindows is process found at this hwnd 
      PokeL(lParam,hWnd) ; set ptr to hwnd 
      ProcedureReturn 0 
   EndIf 
   ProcedureReturn 1 
EndProcedure

Procedure GetProcessId_(hProcess) ; for windows Vista, Windows XP SP1, Windows 7 
  Protected hThread 
  Protected Pid 
  Protected GCPI 
  
  GCPI    = GetProcAddress_(GetModuleHandle_("Kernel32"),"GetCurrentProcessId");    
  hThread = CreateRemoteThread_(hProcess,0,0,GCPI,0,0,0) 
  
  If Not hThread 
    ProcedureReturn 0 
  EndIf 
  
  WaitForSingleObject_(hThread,#INFINITE)  
  GetExitCodeThread_(hThread,@Pid) 
  CloseHandle_(hThread) 
  
  ProcedureReturn Pid  
EndProcedure

Procedure GetProcHwnd(lpProc) 
   Protected pid = GetProcessId_(lpProc) 
   ptr=pid 
   Repeat : Until EnumWindows_(@EnumWindowsProc(),@ptr) 
   If ptr=pid ; if no handle is returned no matching process was found 
      ProcedureReturn 0 
   EndIf 
   ; some form of GetWindow_() here for top-level window.. 
   ProcedureReturn ptr 
EndProcedure

Global YesButton = 0

Procedure ListWindows(Window, Parameter)
  WindowTitle.s = Space(255)
  GetWindowText_(Window, WindowTitle, 255)
  If WindowTitle = "&Yes"
    YesButton = Window
    ProcedureReturn #False
  Else
    ProcedureReturn #True
  EndIf
EndProcedure

OpenConsole()

Pid.i = GetPidByName("_Uninstall_0.exe")
hproc.i = OpenProcess_(#PROCESS_ALL_ACCESS,0,Pid)
hWnd  = GetProcHwnd(hproc)
EnumChildWindows_(hWnd,@ListWindows(), 0)
If YesButton
  SendMessage_(YesButton,#WM_LBUTTONDOWN ,#MK_LBUTTON, 0)
  Delay(300) 
  SendMessage_(YesButton,#WM_LBUTTONUP ,#MK_LBUTTON, 0)
Else
  MessageRequester("Error", "Uninstallation failed, could not find uninstaller.")
EndIf

[Joubarbe]

That's an old post, but I'm searching for an installer that can install fonts (put them into the fonts folder, then install them). Can this application do that ?

[Joakim Christiansen]

How's life Inf0Byt3? I see you don't own the domain any more

[Inf0Byt3]

Still alive... Couldn't find the time to update the programs anymore so I had to let it go. The fact that M$ dropped support for Windows XP also helped me switch to another OS (one of the best decisions I made, mind you).

[Joakim Christiansen]

Still alive... Couldn't find the time to update the programs anymore so I had to let it go. The fact that M$ dropped support for Windows XP also helped me switch to another OS (one of the best decisions I made, mind you).

Well, I have also let my Internet TV software go after my health problems hindered me from maintaining it. With the disappointment of Windows 8 and their high prices I also switched away from Windows... Now I am using Debian and I'm also moving from PB to C++11 and SDL2, I must say that I really enjoy the open source movement!

[Inf0Byt3]

Good move with Debian, that is great news. For me the main turnoff with windoze is that they kind of changed the philosophy. The OS is not something that most people want to change like socks especially if it gets the job done. But yes, it does feel great to be free again.