Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Verify()
Message
 
 
To
21/05/2003 09:27:46
General information
Forum:
Visual FoxPro
Category:
Crystal Reports
Title:
Miscellaneous
Thread ID:
00790987
Message ID:
00792637
Views:
25
Hi Craig,

If you changes the name of fields existing in your view, CR does not change this fields
in your report with the verify method. (Programming).

If you check your database in the IDE, then the change is made.


it is not not possible to avoid this problem?


bernhart




>What kinds of changes were made to the database?
>
>>Hi all,
>>Bonjour tout le monde,
>>
>>We connects our crystal reports with a remote view.(DNS)
>>I want to check the fields Of my views in the report.
>>I indeed wish to check that there no were changes occurred in the fields.
>>
>>When I use this code, I believe the database is updated , but
>>when I open the report and I check the database, he says to me
>>"database is changed".
>>
>>That is it does not function in my code?
>>
>>
>>LOCAL ocrapplication ,;
>>   ocrreport,;
>>   cName,;
>>   fso,;
>>   cdirectory,;
>>   gnNombreDbc,;
>>   SetOldDefault
>>
>>SetOldDefault = SET("DEFAULT()")
>>
>>cdirectory = "C:\cdbk70\amline\ReportsCrystal"
>>
>>SET DEFAULT TO ( cdirectory )
>>
>>gnNombreDbc = ADIR( gaBaseDonnées, '*.Rpt')  && Crée un tableau
>>SET DEFAULT TO (  SetOldDefault )
>>
>>ocrapplication = CREATEOBJECT('CrystalRuntime.Application.8.5')
>>
>>
>>FOR nCompteur = 1 TO gnNombreDbc     && Effectue une boucle pour connaître le nombre de bases de données
>>   cName = "C:\cdbk70\amline\ReportsCrystal\" + PROPER( gaBaseDonnées( nCompteur , 1 ) )
>>    WAIT WIND cName  NOWAIT     && Affiche le nom des bases de données
>>
>>   ocrreport  = ocrapplication.OpenReport( cName , 1 )
>>   ocrreport.DATABASE.verify()
>>   ocrreport.SAVEAS( cName , 2048 )
>>   ocrreport = .NULL.
>>ENDFOR
>>
>>
>>
>>Merci d'avance.
>>Thnk in advance
>>
>>Bernhart MILCENT.
Previous
Reply
Map
View

Click here to load this message in the networking platform