Error and GPF:

FUNCTION MAIN()

    LOCAL oExcel := CREATEOBJECT( "Excel.Application" )

    LOCAL cXls := "e:\xharbour\test.xls"

//    oExcel:WorkBooks:Open( cXls, , , 1, , , , 1, , , .T., , .T. )
    oExcel:WorkBooks:Open( cXls, , , , , , , , , , .T., , .T. )

    oExcel:Visible = .T.

    RETURN NIL


Return the current directory of the current drive if the specified drive 
doesn't exist:

FUNCTION MAIN()

    ? CURDIR( "K:" )

    RETURN NIL


GPF:

FUNCTION MAIN()

    LOCAL cExp := "if a()"

    &( cExp )

    RETURN NIL

EMG

--
EMAG Software Homepage:     http://www.emagsoftware.it
The EMG's ZX-Spectrum Page: http://www.emagsoftware.it/spectrum
The Best of Spectrum Games: http://www.emagsoftware.it/tbosg
The EMG Music page:         http://www.emagsoftware.it/emgmusic 


-------------------------------------------------------------------------
This SF.net email is sponsored by the 2008 JavaOne(SM) Conference 
Don't miss this year's exciting event. There's still time to save $100. 
Use priority code J8TL2D2. 
http://ad.doubleclick.net/clk;198757673;13503038;p?http://java.sun.com/javaone
_______________________________________________
xHarbour-developers mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/xharbour-developers

Reply via email to