1. Restart Library ATTN: CoJaBo

Hey CoJaBo!
Nice idea!
Can't wait to see how you did it!
Except I discovered I have to - because I can't download it. Something about
that domain not existing (xx.xxx.xxx.xxx)

William Heimbigner
icxcnika at hotpop.com
Visit the UBoard - Forceful Signups Removed! -
http://uboard.proboards32.com - Threaded discussion, improved searching,
human moderating, graphical smileys, better formatting abilities (now what
else was there...)
Visit my website: http://www.geocities.com/icxcnika123

new topic     » topic index » view message » categorize

2. Re: Restart Library ATTN: CoJaBo

A cracker broght down the server some time this morning...
(Probably the same one thats been pestering me for
a year now, what did I do to make them mad?)
Its back up now!

William Heimbigner wrote:
> 
> Hey CoJaBo!
> Nice idea!
> Can't wait to see how you did it!
> Except I discovered I have to - because I can't download it. Something about
> that domain not existing (xx.xxx.xxx.xxx)
> 
> William Heimbigner
> icxcnika at hotpop.com
> Visit the UBoard - Forceful Signups Removed! -
> <a href="http://uboard.proboards32.com">http://uboard.proboards32.com</a> -
> Threaded discussion, improved searching,
> human moderating, graphical smileys, better formatting abilities (now what
> else was there...)
> Visit my website: <a
> href="http://www.geocities.com/icxcnika123">http://www.geocities.com/icxcnika123</a>
> 
>

new topic     » goto parent     » topic index » view message » categorize

3. Re: Restart Library ATTN: CoJaBo

I use this to restart a app:

----------------------------------------------------------------------------------------------------------------
--------
-- May 6 2004 - added code from Brian Broker to use his new shellExecute() 
to do restarts.
----------------------------------------------------------------------------------------------------------------
--------

include dll.e
include machine.e

constant
  shell32 = open_dll( "shell32.dll" ),
  xShellExecute  = define_c_proc( shell32, "ShellExecuteA", 
{C_POINTER,C_POINTER,C_POINTER,C_POINTER,C_POINTER,C_INT} )

----------------------------------------------------------------------------------------------------------------
--------
procedure shellExecute( sequence exe, sequence file )

    -- call ShellExecute to display a file
    atom file_string, cmd_string, exe_string

    -- convert to strings
    exe_string = allocate_string( exe )
    file_string = allocate_string( file )
    cmd_string = allocate_string( "open" )

    -- call ShellExecute
    c_proc( xShellExecute, { 0, cmd_string, exe_string, file_string, 0, 10 } )

    -- free the strings
    free( exe_string )
    free( cmd_string )
    free( file_string )

end procedure -- shellExecute( sequence exe, sequence file )

----------------------------------------------------------------------------------------------------------------


if bug then
  shellExecute(current_dir()&"\\"& "filename.exe" ,0)
  sleep(0) -- hand off to taskmgr once so it can do the shellExecute!
-- zero must be re-enabled in misc.e to use 0, else use 1
  abort(0)
end if

Kat

new topic     » goto parent     » topic index » view message » categorize

4. Re: Restart Library ATTN: CoJaBo

Mine is similar, but much simpler to use,
doesn't need the filename,
and works with interpreted and bound programs.
You just use:
restart([number passed to abort()])

The server should be back up now.

Kat wrote:
> 
> I use this to restart a app:
> 
>
> ----------------------------------------------------------------------------------------------------------------
> --------
> -- May 6 2004 - added code from Brian Broker to use his new shellExecute() 
> to do restarts.
>
> ----------------------------------------------------------------------------------------------------------------
> --------
> 
> include dll.e
> include machine.e
> 
> constant
>   shell32 = open_dll( "shell32.dll" ),
>   xShellExecute  = define_c_proc( shell32, "ShellExecuteA", 
> {C_POINTER,C_POINTER,C_POINTER,C_POINTER,C_POINTER,C_INT} )
> 
>
> ----------------------------------------------------------------------------------------------------------------
> --------
> procedure shellExecute( sequence exe, sequence file )
> 
>     -- call ShellExecute to display a file
>     atom file_string, cmd_string, exe_string
> 
>     -- convert to strings
>     exe_string = allocate_string( exe )
>     file_string = allocate_string( file )
>     cmd_string = allocate_string( "open" )
> 
>     -- call ShellExecute
>     c_proc( xShellExecute, { 0, cmd_string, exe_string, file_string, 0, 10 } )
> 
>     -- free the strings
>     free( exe_string )
>     free( cmd_string )
>     free( file_string )
> 
> end procedure -- shellExecute( sequence exe, sequence file )
> 
>
> ----------------------------------------------------------------------------------------------------------------
> 
> 
> if bug then
>   shellExecute(current_dir()&"\\"& "filename.exe" ,0)
>   sleep(0) -- hand off to taskmgr once so it can do the shellExecute!
> -- zero must be re-enabled in misc.e to use 0, else use 1
>   abort(0)
> end if
> 
> Kat
> 
>

new topic     » goto parent     » topic index » view message » categorize

Search



Quick Links

User menu

Not signed in.

Misc Menu