| CrypStorTest  1.02  10-03-2010
|
| This file will try to create the system variables CrypStorQuery$0URL,
| CrypStorQuery$1User and CrypStorQuery$2Pass from the record with the code
| EmailTestItem in one of the Example databases (the one created by the file
| ImportOwn).
| It asks for a POP3 server url by specifying the pop:// prefix. Omit that and
| CrypStor will return the first part of the contents of the URL field.

Unset CrypStorQuery$*

BASIC -quit <Obey$Dir>.CrypStorQuery "EmailTestItem pop://" 0=CrypStorQuery$0URL 1=CrypStorQuery$1User 2=CrypStorQuery$2Pass

TaskWindow "Show CrypStorQuery$*" -quit -name "CrypStor Query Test"
