Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Rusty on the syntax - how to fix this?
Message
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
Rusty on the syntax - how to fix this?
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows 10
Database:
MS SQL Server
Divers
Thread ID:
01652659
Message ID:
01652659
Vues:
97
Hi everybody,

We had the following code in one of the old program:
if inlist(type("&ImageSource"), "M","Q","W") and len(&ImageSource)>1
			cOFile = GenOFile(".jpg",.t.)
			copy memo &ImageSource to (m.cOFile)
			cOFile = E0Resize(m.cOFile, dpi)
		endif
Please note the line copy memo &ImageSource and check for the type above.

That worked fine when ImageSource was something like 'tableName.photoColumnName'

Now I want to change the above to be

ImageSource = [someDecryptFunction('functionName', 'tableName', columnValue, 'photoColumnName')]

The above code doesn't work anymore :(

I can get the value using

lcValue = evaluate(ImageSource)

But what should I do with this value now? How can I copy that value into the file?

Also, how can I check if the format of my ImageSource is still TableName.ColumnName or it's something more complex like that extra function?

Thanks a lot in advance.
If it's not broken, fix it until it is.


My Blog
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform