Information générale
Catégorie:
Gestionnaire de rapports & Rapports
Scott,
Thanks for the help. I don't understand how I should use this code. Is this a one-time fix or does it need to be run everytime I want to programmatically launch the reports control toolbar?
Thanks
>Here is some code I got here a few months back, don't know the origianl author. Hope this helps.
>
>coalias=ALIAS()
>ccurrentrfile = SYS(2005)
>SET RESOURCE OFF
>lok = .T.
>lcoldonerror = ON("error")
>ON ERROR lok = .F.
>USE &ccurrentrfile EXCLUSIVE IN 0
>
>IF lok
> SELECT foxuser
> GO TOP
> LOCATE FOR TYPE = "PREFW" AND ID = "REPORTTOOLS"
> IF FOUND()
> REPLACE ckval WITH 60721,UPDATED WITH DATE()
> ELSE
> INSERT INTO foxuser (TYPE,ID,NAME,READONLY,ckval,DATA,UPDATED) ;
> VALUES ("PREFW","REPORTTOOLS","",.F.,60721,"",DATE())
> ENDIF
> USE IN foxuser
>ENDIF
>
>SET RESOURCE ON
>SET RESOURCE TO &ccurrentrfile
>IF NOT EMPTY(coalias)
> SELECT (coalias)
>ENDIF
>ON ERROR &lcoldonerror
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement