Le forum (ô combien francophone) des utilisateurs de Powerbuilder.
Bonjour,
Dans le type de script ci-dessous, est-ce que quelqu'un sait s'il est possible de tester la ligne "myoleobject.Application.Workbooks.Open" par exemple histoire d'avoir un return et voir si ça s'est bien exécuté ?
OLEObject myoleobject myoleobject = CREATE OLEObject IF myoleobject.ConnectToNewObject( "excel.application" ) = 0 THEN myoleobject.Application.Workbooks.Open( "c:\Temp\toto.html") myoleobject.Application.DisplayAlerts = FALSE myoleobject.Application.Workbooks(1).Parent.Windows( myoleobject.Application.Workbooks(1).Name).Visible = True myoleobject.Application.Workbooks(1).SaveAs( "c:\Temp\toto.xls", 39) myoleobject.Application.Workbooks(1).CLOSE() FileDelete ( "c:\Temp\toto.html") END IF
Hors ligne
Bonjour,
Sinon, tu peux procéder de cette manière :
lole_excel = CREATE OLEObject IF lole_excel.ConnectToObject( as_filename ) = 0 THEN ....
Hors ligne