Thanks, I'll fix this typo in my next commit.
Until then change line #156 in contrib/hbwin/legacy.prg to:
IF ! Empty( hOle )
Or even better to use the new API which is more efficient:
hb_oleCreateObject("WScript.Shell")
Brgds,
Viktor
On Thu, Jun 25, 2009 at 9:36 PM, Itamar Lins <[email protected]> wrote:
> Hi!
>
> Function mRun(c)
> Local oShell,Ret
> oShell:=CreateObject("WScript.Shell")
> Ret :=oShell:Run("%ComSpec% /c " + c , 0, .t.)
> oShell:=Nil
> Return iif(Ret=0,.t.,.f.)
> -----------------------8<------------
>
> Error TOleAuto/65535 : TOLEAUTO:NEW
> Called from ../../legacy.prg->THROW(0)
> Called from ../../legacy.prg->TOLEAUTO:NEW(0)
> Called from ../../legacy.prg->CREATEOBJECT(0)
>
> Regards,
> Itamar M. Lins Jr.
>
>
>
> _______________________________________________
> Harbour mailing list
> [email protected]
> http://lists.harbour-project.org/mailman/listinfo/harbour
>
_______________________________________________
Harbour mailing list
[email protected]
http://lists.harbour-project.org/mailman/listinfo/harbour
