Egq f d%/|o5s#4K H<O% CtcActionbUC  T-TInvalid parameter VersionTv1.03 15/11/2006 %#CVersion Library  Zip#TCZip  UnzipWTCUnzip  Send Email!TCSend Dynazip managerTCa T Is DynazipTC  DLL ManagerO&TC TK BdynazipUTCACTIONTVPARM1TVPARM2TVPARM3TVP4TVP5TVP6TVP7LBRETURNMSGBOXWLZIPLMAILDZEASY ISDYNAZIP DLLMANAGERDYNAZIP UUUUUUU%CExist }%CDynaWrapa y@C)Dynazip compression tool is not installedWarningB-BaUDZEASYMSGBOXW CloseDown!RMDIR,PICKLIST3 UTLBAKPATH:REGFNACALLFNH CLEANPATHO IsDynaZipV>rQQ1AAaqeAR4A511111>qqAAq1 <! B" C# D$ E% F& G' U% l?/5.Z4        J(J(!J(   J(  Ja(N%Ct CtcActionbC CtcParmsbC C C 2$TInsufficient parametersB-TCC]C]%CExist (TDZEasy DLL is not installedB- H/ C@zipTZIP  C@unzipTUNZIP 2/ TInvalid action B-%CnT No parameters T-B-TCTC  %7TCC=6%~C@~~pkzip~pkunzip~zip~unzip~3(T~C@~ ~pkzip~zip~TCCTC  %TCC=TCC\TCC@ %wTC  %TCC=TCC\TCC@T C-x %C sTC-x T CC , T  %T C%C C  %C  "TCCC]C]C@ %T C%C C 4TSource folder does not exist:C   T-TCzip%C0 /TZIP file does not exist:C  T- H J   :%CZip Quick Zip*.*  `!T ZIP failedC   T-  7<%CUnzip Quick Zip*.*  %C 3#T UNZIP failedC   T-2J T- BUTCACTIONTCPARMSTCERRORLNATLCINPUTLCACTION LCOUTFILELCSOURCE LCOPTIONS LCERRORTEXT LCEXCLUDE LCCOMMENT LCFOLDER1 LCFOLDER2 LCDEFAULT LBGOAHEADLBZIPDZEASYFILLINGrQAqAsqBaQqqAqAAaqAAAAAAAAAA"Da!ADAAaAAAC4AA1%J,y35E~4 SendEmail  %C Available gB-&C Create cursor vSendMailF vSendMail^    T-T CReplyToaT C ReplyNameaT CSubjectaTC SignatureaTCMessageaTCAddressa TC CarbonCopyaTC BlindCopya!TC AttachmentsaT CSMTPaT C T C T  +T C C C C T T 6T  CC C , 6T r vSendMail  T)TCSend vSendMail % A TC vSendMail C vEmailAuto BU!TCACTIONTCXMLTCOUTXMLTCERROR SENDEMAILLCEMAILSLCBLINDLCBLINDSLNBLINDLCSMTPLCFOLDER LCREPLYTO LCREPLYNAME LCSUBJECT LCSIGNATURE LCMESSAGE LCADDRESS LCCARBONCOPY LCBLINDCOPY LCATTACHMENTS LBSENDCOPYWRAPMREPLYTO MREPLYNAMEMSUBJECTMMESSAGEMTOMCCMBCCMATTACH LCERRORTEXT LBMAILSENTKILL6qqAa1qq1qc1Bbq1#%NWQBQr25^)4 T  PeB T Ct H` Zip.BC   Unzip.BC   GetBC  ! CC@CCDynaWrap@GBC Help BQ'Zip', , <source>, <destination> [, <options> [, <include> [, <exclude>]]]C C E�'Unzip', <title>, <source>, <destination> [, <options> [, <include>]]� ���Install9�BC� ������� �� �Uninstalle�BC� ����� ���Exist�BC� ����� �� �File list �BC�� �� �Available �BC�� �� �Zip start �BC�� �� �Set zip value-�BC�������� �� �Get zip value]�BC������ ���Set zip string�BC�������� ���Get zip string�BC���������� ���Zip easy�BC���� ���Zip end�BC���� �� �Unzip start> �BC� � ���Set unzip valuet�BC������� � ���Get unzip value�BC�����!� ���Set unzip string�BC�������!� ���Get unzip string�BC���������� �� �Unzip easyA�BC�� �� �� �Unzip endi�BC��!�(� CC��@CC�Dynazip Manager@�BC����"���U#� �TCFUNCTION�TVP1�TVP2�TVP3�TVP4�TVP5�TVP6�TVP7�TVP8�_REFOX_�LNPARMS�DZIP�DUNZIP�DGET�DYNAWRAP�DINSTALL �DUNINSTALL�DEXIST �DFILELIST �DAVAILABLE �DZIPSTART �SETZIPVALUE �GETZIPVALUE �SETZIPSTRING �GETZIPSTRING�DZIPEASY�DZIPEND �DUNZSTART �SETUNZVALUE �GETUNZVALUE �SETUNZSTRING �GETUNZSTRING�DUNZEASY�DUNZEND �DZMANAGER>'�4�����������5 � � � � �� �5���5��� �5���5��5��� �5�� �T����%�� �.�T�!�Insufficient parameters in dZip()�B-� �T�� �T�- �T�- �T ��.�T�C� C���"��"�C�6.�T �C� C���"��"�C�6�T �C�� �����6�T �C�� �����6�T�C�� �����6�T��Title:C � �T�C^�T�CC$"�T�C���Time:��;�"�T�C���Date:��;�2�%C �m.p_UserIDb�C�C ��None $�T�C���User: ��;���%�� � I�C�Source: �C �Dest.:  �C  �Options:  �C  �Include:  �C  �Exclude: �C C��;C  �Zip diagnose@ ���%C���!� V�C�Cannot create �C �DynaZIP(TM) is not installed�ERROR: �@ ��B-��T�C"�^�%CC���C�-u ���6$�#��CC�� �%�#� �CC���%�#� ;�%�-q � T�T����C��" �%��C��$��%C�c:\tempa&��T��c:\temp\�C���%��C��$���%C ���C��$��C�� �%���%C�/�`�C��$��C���%���%�-rp ��T���CC��$�'���CC��$�'���C�Zip(��%CC��$�'��C���%�� �%a&�T��@��%�-t ��T�C �� �-t� )��%C�Date�*��%CC��$�'��CC����%�#�����%�-& ��CC�� ���$�'���%���CC��!��$�#���%CC��+�#�7 �T�a���CC��,�#� �T��!�%��C� � � .�C�Source: �C �Dest.:  �C  �Options:  �C  �Include:  �C  �Exclude: �C �Error: �C C��;C  �Zip diagnose@ �� �B��U-��TNPARMS�TCTITLE�TCSOURCE�TCDEST �TCOPTIONS�TCINC�TCEXC�TCERROR �TBDIAGNOSE �LCZIPTITLE �LCZIPFILE �LCZIPDEST�LCZIPOPT�LCZIPINC�LCZIPEXC �LCZIPCOMMENT �LCZIPTEMP�LNID�LNRETURN �LNSUBOPTION�LBRETURN�LBERROR �LCZIPERROR �LCZIPTIME �LCZIPDATE �LCZIPAUTO�LNABC�LCZIPABC �LCZIPITEMS�ADDTEXT�P_USERID �P_DEVELOP�MSGBOXW�DEXIST �DZIPSTART�DZE �SETZIPVALUE �SETZIPSTRING�ISDIRMEN�DUE�DZEASYF�FILLING�VALIDOPT�DZIPEASY�DZIPEND'� �4����BCC ��]gC��� �U��TDDATE�TCTIME�HMSTOS1 �4����5� �H�#!� ���Date ��/� ��%CC�#X��B-���T�CC�#-�T�C�\C�\C�\�Ba�� ���Date�%C���B-�-�T�C�\C�\C�\�Ba��2#�B-��B-�U��TCOPTION�TCSTRING�LCSTRING'�4�����������5 � � � � ���5� �5�� �5�� �T����%�� �$�T��Invalid parameter count�B-��%C���� V�C�Cannot unpack �C �DynaZIP(TM) is not installed�ERROR: �@��B-� �T�- �T�- �T �� �T �� �T ���T �C�� �����6)�T �C�� �C� ��*��6�%�� � @�C�Title: �C �Source:  �C �Dest.:  �C  �Options:  �C  �Include:  � �Zip diagnose@��#�T�C�Comment� �� ���T�C�a�%CC������CC�� ��� �CC�� ��� �CC�� ��� �%CC�����C�� ����C����%�-o �J�CC�����j�CC�������%�-d ��CC�� �����C�Unzip��%CC���� �T�a���CC���� �T�� �B��U��TNPARMS�TCTITLE�TCSOURCE�TCDEST �TCOPTIONS�TCINC �TCCOMMENT�TCERROR �TBDIAGNOSE �LCZIPTITLE �LCZIPFNAME �LCZIPDEST�LCZIPOPT�LCZIPINC �LCZIPCODE �LCZIPERROR�LNID�LNRETURN�LBRETURN�LBERROR�DEXIST�MSGBOXW �P_DEVELOP�DGET �DUNZSTART�DUE �SETUNZVALUE �SETUNZSTRING�DZEASYF�DUNZEASY�DUNZENDD�4�������5����5��5 ��5 � �5 � � �T����%�� m� �B����%C��� � �W�C�Cannot process �C �DynaZIP(TM) is not installed�ERROR: �@� �B��� �T �- �T �- �T�� �T�� �T��� �H4n� ��CommentY �T ����2n �T �����T �C��%CC� �����%CC� ����C� �����C� �� �H� ��Comment,�%CC� ���� �CC� ���  �T�C� � ��%�� �T���T�C�XG�%CC� ���� �CC� ��� �CC� ������ �%C�RC� �T�C�C�>=� �T ��������CC� ��� �T�� �B ��U��TNPARMS�TCMODE�TCTITLE�TCSOURCE�TCERROR �LCZIPTITLE �LCZIPFNAME�LCVALUE �LCZIPERROR�LNID�LVRETURN�LBRETURN�LBERROR�DEXIST�MSGBOXW �DUNZSTART�DUE �SETUNZSTRING �SETUNZVALUE�DUNZEASY�LNSIZE �GETUNZVALUE �GETUNZSTRING�DUNZEND��4���5��5� �T�� �T���,�%CC������ �CC����� ��T�C��� ��%����T���T�C�XG�%CC������ �CC����� �CC�������� ���� �B��U ��TNID�LNSIZE�LCVALUE�LVVALUE�DUE �SETUNZVALUE�DUNZEASY �GETUNZVALUE �GETUNZSTRING  �4��� �5�� �5�� �5�� �5� � �5 � ��5 � �5 ���J��( � � �T��� �T ����T�C��%C�� �B����%C���� � �B��� �T �- �T�-�%C��� �T���� �T���� �T����T�C��%CC�������%CC������%CC���� �T��T�C�X!�%CC��)������T �C������CC���� �T�� �T����T �CC]�.ini�% ��p�C ��Michael Napier �C ��[�C?7��T�C]C]�*.ini!�T�C]�\dzeasymen.zip�%C�0 ����T�C�4�%CC�������CC������ �%CC������%CC���� �T��T�C�X!�%CC��%������T �C������%C�0 ����CC����!�T�C����C C  �!�T �C� �� �C C  � �B ��U!��TCTITLE�TCERROR �LCZIPTITLE�LCVALUE �LCZIPERROR �LCDYNAEXE �LCZIPITEMS �LCZIPFILE�LNID�LNH�LCVZIP�LCVUNZIP�LVRETURN�LBRETURN�LBERROR�DYNAEXE�DEXIST �DUNZSTART�DUE �SETUNZSTRING �SETUNZVALUE�DUNZEASY�LNSIZE �GETUNZSTRING�DUNZEND �DZIPSTART�DZE �SETZIPSTRING �SETZIPVALUE�DZIPEASY �GETZIPSTRING�DZIPEND�ADDTEXT�4�� �5�� �T�- �T��� �H7�� ���g��T��success �T�a� ����T� �can't reenter� ���'�T��unexpected end of zip file� ���%�T��zip file structure error� ��+�T� �out of memory� ��]!�T��internal logic error� ��%�T��entry too large to split� ��#�T��invalid comment format� �� 2�T�%�zip test (-T) failed or out of memory� �� 6�T��user cancelled� �� k$�T��error using a temp file� �� �T��read or seek error� �� �T� �nothing to do� �� &�T��missing or empty zip file� ��2$�T��error writing to a file� ��f#�T��couldn't open to write� ��#�T��bad control parameters� ��)�T��could not complete operation� ��4�T�'�could not open a specified file to read� ��h>�T�1�media error... disk not ready, HW r/w error, etc.� ��0�T�#�bad Multi-Volume control parameters� ��6�T�)�Improper usage of a Multi-Volume Zip File�2$�T��unknown error: CC��Z��%� I�T�C����C ���%��� a��C���ERROR: �@�� �T�a �B��U��TNVALUE�LBOK�LCTEXT �LCZIPERROR�ADDTEXT�LBERROR�MSGBOXW �LCZIPTITLEo�4�� �5�� �T�- �T��� �H7�� ���g��T��success �T�a� ���'�T��unexpected end of zip file� ���(�T��structure error in zip file� ���T� �out of memory� ��.�T� �out of memory� �� `!�T��file not found error� �� �T��nothing to do � �� F�T�9�same volume for src and dest not allowed for multi-volume� �� �T��index out of bounds� ��L'�T��error creating output file� ��&�T��error opening output file� ��'�T� �crc error� ��(,�T��application cancelled operation� ��)$�T��file skipped, encrypted� ��*T'�T��unknown compression method� ��,(�T��bad or missing decrypt code� ��-#�T��re-entry not permitted� ��.&�T��can't unzip a volume item� ��/+"�T��bad command structure� ��0f*�T��user cancelled this operation� ��1(�T��user skipped this operation� ��2�T� �disk full�2�T� �unknown error��%� �T�C����C ���%��� -�T�C���ERROR: �@�� �T�a �B��U��TNVALUE�LBOK�LCTEXT �LCZIPERROR�ADDTEXT�LBERROR�MSGBOXW �LCZIPTITLEV�4���5� �5 ��5� �5��D�C �1:wdynawrap)�Please wait|Installing Dynazip components�?�R,:4�Installing Dynazip components: locate dynazip(v).app �T �- �T�-�%�VISUALCChf��T� �dynazipv.app��T� �dynazip.app� �%��n �T�-�T�C��.app��$�T�C��dynazipv�dynazip��T�C���%C�0��� a@�R,:5�Installing Dynazip components: running dynazip(v).app�%C�p_Launchb�U�T �CC]C]�C�DO &lcCommand WITH 'Install', Addbs( m.p_Launch + 'dynazipq') �K� �%�&A�R,:6�Installing Dynazip components: removing dynazip(v).app�T�C�ERROR �T�-�1 �lbError = .T.� �dynazip.app� �dynazipv.app�ON ERROR &lcOnError ��R �C �-1:wdynawrap� �B ��U � �TBINTEGRAL �LCCOMMAND�PVRETURN �LBUNPACKED �LCONERROR�LBERROR�PWAIT �UNPACKEXE�P_LAUNCH�DYNAZIP�APP�DYNAZIPV �5����5����5��� �5� � �T��� �T�- �T�- �T�- �T�C� �dyna???.exe�%����%C�m.p_Homeb�C�-�T�C� ��master\dyna???.exe �T�a���%C�m.p_Homeb�C~-�T�C � ��master\dyna???.exe�%��z �C ��T�C�� � �T�a����%�� �C�4�T��C�� ��master\���6C����%�����  ����T�� ��master\���%C��0�RUN &lcDynaExe -o �T �CB�+C �dynazip.app0 �C �dynazipv.app0  �C � �C333333? ��C?7� �T�a���CC]C] � �B��U� �LCDYNAEXE�LCMFILE�LNFILES�LNI�LNMFILES �LBUNPACKOK�LBMASTER�LBMFILE �ADYNAFILES �ADYNAMFILE�P_HOME �LNTIMENOW�PAUSE �DUNINSTALLn��5�� �T��C� �dyna???.exe�%���V� �C��BC�����g� �B����U��LNFILES �LADYNAFILE�4���� �5���T�C�� �����6�T�C�� �����6 �C��%C��$�T�CC�System directory���%�VISUALCChfI�C �1:wdInstall*�Please wait|Copying Dynazip components to ���C?7�%C�) �T�����%C �dunzip32.dll������C �dzip32.dll����� �C �dz_ez32.dll����� �C �dzprog32.exe����� l �T �C{�+C� �dunzip32.dll0 �C� �dzip32.dll0 �C� �dz_ez32.dll0 �C� �dzprog32.exe0  �C � H�C333333? ���C �-1:wdInstall��Ba��C �-1:wdInstall��B-���%C� �T����y�%C �dunzip.dll������C�dzip.dll����� �C �dz_easy.dll����� �C �dzprog.exe�����  �T �Cv�+C� �dunzip.dll0 �C��dzip.dll0 �C� �dz_easy.dll0 �C� �dzprog.exe0  �C � �C333333? ���Ba��B-���U ��TNPARMS�TCSOURCE�TCDEST�LCSOURCE�LCDEST �DLOADFTOOLS�FNSYSTEM�PWAIT�DZCOPY �LNTIMENOW�PAUSE �4����5��T�C�� �����6 �C��%C�n�$�T�CC�System directory���%�VISUALCChfu�� �dunzip32.dll�� �dzip32.dll�� �dz_ez32.dll�� �dzprog32.exe�T�CC]C]�� �dunzip32.dll�� �dzip32.dll�� �dz_ez32.dll�� �dzprog32.exe��� �dunzip.dll���dzip.dll�� �dzeasy.dll�� �dzprog.exe��U��TNPARMS �TCINSTALLDIR �LCINSTALLDIR �DLOADFTOOLS�FNSYSTEM��BC������U��DEXISTY �4����5��T�C�� �����6 �C��%C�n�$�T�CC�System directory���%�VISUALCChf�c�BC� �dz_ez32.dll0�C� �dzip32.dll0 �C� �dunzip32.dll0 �C� �dzprog32.exe0 �R]�BC� �dz_easy.dll0�C��dzip.dll0 �C� �dunzip.dll0 �C� �dzprog.exe0 ��U��TNPARMS�TCDIR�LCDIR �DLOADFTOOLS�FNSYSTEM��%�VISUALCChfT�<�B3�dz_ez32.dll, dzip32.dll, dunzip32.dll, dzprog32.exe��6�B-�dz_easy.dll, dzip.dll, dunzip.dll, dzprog.exe��U��g �4��� �5��%�T��Dynazip Compression Tool �T��� �5���T�C�ERROR �T�-�1 �lbError = .T.� �dynazip.app� �dynazipv.app�ON ERROR &lcOnError �H�Y*� ���Dynazip: is it installed?q�%C��� �9(�C�Dynazip is installed��@ ��m,�C�Dynazip is NOT installed��@ ��!� ���Dynazip: installx�%C��� �0�C�Dynazip is already installed��@ ��t6�%C�Do you wish to install Dynazip?��-a �p7�C �1:wdzeasy�Please wait|Installing Dynazip ��C�� ��C �-1:wdzeasy ���� ���Dynazip: setup�%C��� �0�C�Dynazip is already installed��@ ���C�� �� � ���Dynazip: removeC�%C��� � 5�%C�Do you wish to remove Dynazip?��-a ��C�-��%C��� �9�C%�De-installation of Dynazip has FAILED��@ ��B�C.�De-installation of Dynazip has been successful��@ ����?,�C�Dynazip is NOT installed��@ ��!� ���Dynazip: version'�%C��� � �T����T�C����!�C��� �: Version@ ��%C� �C�Error: ���@ ���#,�C�Dynazip is NOT installed��@ ���2Y*�C�WARNING�Unknown option �����Ba�U� �TCOPTIONS �TBINTEGRAL�LCMHEAD�LCERROR �LCONERROR�LBERROR�DYNAZIP�APP�DYNAZIPV�DEXIST�MSGBOXW�APPASK�PWAIT �DZDBLEWRAP �DUNINSTALL �LCVERSION �GETVERSION�APPERROR�4���%C����<�%C����h�;�C'�Dynazip has been successfully installed��@��8$�%C� �dyna???.exe��4�C�WARNING�Dynazip has failed to install��4d�C�WARNING�Dynazip has failed to installC &�File dyna100.exe or similar is missing����+�%C� �dyna???.exe���� 4�C�WARNING�Dynazip has failed to install��d�C�WARNING�Dynazip has failed to installC &�File dyna100.exe or similar is missing����U� �TBINTEGRAL�DYNAWRAP�DEXIST�MSGBOXW�LCMHEAD �ADYNAFILES�APPERROR��C�Set�foxtools���U��SETFLL��4�����5� �5���T�C��T�C� �T�a�%CC���0b����%C���0��C��a�����(����� �T�-�� �B��U��TCFILE�TCFROM�TCTO�LBRETURN�LCFROM�LCTO�ISDIRMEN)��| �dzipstart�dz_ez32 �BC���U� �DZIPSTART�DZ_EZ32K��4����#�| �setzipvalue�dz_ez32�BC���������U��TNID�IVALUE�THEVALUE �SETZIPVALUE�DZ_EZ32A� �4���!�| �getzipvalue�dz_ez32�BC�������U��TNID�IVALUE �GETZIPVALUE�DZ_EZ32M��4����%�| �setzipstring�dz_ez32�BC��������U��TNID�IVALUE �LPTHESTRING �SETZIPSTRING�DZ_EZ32W��4�����'�| �getzipstring�dz_ez32�BC����������U��TNID�IVALUE �LPTHESTRING �STRINGLEN �GETZIPSTRING�DZ_EZ324��4���|�dzipeasy�dz_ez32�BC�����U��TNID�DZIPEASY�DZ_EZ323��4���|�dzipend�dz_ez32�BC�����U��TNID�DZIPEND�DZ_EZ32)��| �dunzstart�dz_ez32 �BC���U� �DUNZSTART�DZ_EZ32K��4����#�| �setunzvalue�dz_ez32�BC���������U��TNID�IVALUE�THEVALUE �SETUNZVALUE�DZ_EZ32A� �4���!�| �getunzvalue�dz_ez32�BC�������U��TNID�IVALUE �GETUNZVALUE�DZ_EZ32M��4����%�| �setunzstring�dz_ez32�BC��������U��TNID�IVALUE �LPTHESTRING �SETUNZSTRING�DZ_EZ32W��4�����'�| �getunzstring�dz_ez32�BC����������U��TNID�IVALUE �LPTHESTRING �STRINGLEN �GETUNZSTRING�DZ_EZ324��4���|�dunzeasy�dz_ez32�BC�����U��TNID�DUNZEASY�DZ_EZ323��4���|�dunzend�dz_ez32�BC�����U��TNID�DUNZEND�DZ_EZ32�dZip'���� �F1timedate&�����ValidOpti�����dUnzip�����dGet���� �GetComment*���� �GetVersion�����dze"�����due(�����dynawrap.���� �UnpackExeo2�����DynaExe5�����dInstallx6���� �dUnInstall:���� �dAvailable<�����dExist=���� �dFileList>���� �dzManagerC?���� �dzDbleWrap\E���� �dLoadFtoolsG�����dzCopyG���� �dzipstartH���� �setzipvalue4I���� �getzipvalueI���� �setzipstringJ���� �getzipstringJ�����dzipeasy5K�����dzipendK���� �dunzstartK���� �setunzvalueL���� �getunzvalueL���� �setunzstringL���� �getunzstringM�����dunzeasyN�����dunzendhN���� ar���AaA�Q a!a!���a!a���a!a��!A�`1�q���q����q�A�������!!!AA�b A�Rbq�A��CB�RCQQAA���AQA���AQA�B�A�QA��A�1A�A�A�1A�A�c�A�A�!� A��2��5��q��q��q�A�Q�q��q�A��q�A�q��1�qq����Aq�A�Qbq�A������a5A�1�QA�B2�A�1A�!b�A�A�!��9�q�q�q�q����A�Qr�A����������A��QA�B�Q�sA��A�A�A�J�A�!��3�q�r�q���Q�sA�A�A��5�������q�������A�Q�A�������A���a���A�A�A�A�!���A�1A���A��Ba���A�A�A�A���A�!�5�q�����A�qQQ1!AaA11Aa�AA��A�A�A���5�q�����A�qaqaaAq1a!a�A��A�A�A���5�q�q��q��A���A���A��A�aA�1R�E��Q�Q1AqA�Q��3����������A���Q�A�A�A��B�A��q�!Q1A��C�A��3�q����A�5�����AA�1��A��QA�q��q�A����A��dQA�q��q�A�A�5��q���AA��qA�5�5��q���AA�4�A�5��aA�5���Q��R�Q1Aq��A�A�A�aq�qA�A�A��A�AQ�A�!A�A��A�A�aA��A��A�q�3�q�!A�AA�BA�A��A�BA�A�6�:��q���a�1���A�A��1��@1��3a01��!01��Ta1�1tP1�q�� 1�q��1��`1��4a 1��!01��Ta 1�1tP1�q�� 1�q��1�����������������;���5��xG��<�����G��H�������H��5N�������HN��W�������W��_��5���� `��b��~��+��c��k����t��k��zt������t��}��.����1}��i��r����������H��������Q��'��I����y��`��Ö��!����ږ��ŗ��>����ؗ����D������$��a����:����l����̧��������Ы�� ��������6���� ��L��H��-����`����w���� ��r��������.���� ��G��|����%��������*��������/��������3������[��8���� ��t��=��%������B��������G��-��\����L��p����������%�������������A�����",3���#�4����������T� ���PeB�5 � �5 � � �5 � �G�%C�tcSecondb�L�C�tcFirstb�L �C�tcStringb�L ��%C�� �B����,�C�FATAL�Insufficient parameters����T �CC����6 �T ��� �%�n �%�M�T �CC�fC��f ��j�T �C��� ��� �%��T �CC�fC��f ���T �C��� ����% ���T � �C�>�T �C�� �\� �B��� �%�/�T �CC�fC �f�I�T �C� ���%�� �� t �5���T�CC C�� �=�% ���T�CC C � �\C � �T���%�T� �� ���T�C����\�+C�=C ;�T�C�\��+C�RC p�T�C�C�>=���% ���BC � �=� �%� �B ��� �B ��U��TCSTRING�TCFIRST�TCSECOND�TBLAST�TNO �TBCASELESS�TBLINE�TCLINE�_REFOX_�LCSTRING�LNFIRST�LNSECOND�LNPARMX�LNO�CHECKAPP�APPERROR�LNLINE1�LNLINE201aq���s���A�A�����QA����QA�A�1!��A��a�!A����A�Q!A�A�A�!���A�A��1��������������������%��� ������r�����J��[5���������� �H ��� �� �AvailableH��BC��� �� �Create cursort��BC���� ���Send��BC������� ���Preview��BC�����U��TCACTION�TVPARM1�TVPARM2�TVPARM3�SNDEXIST �SNDCURSOR �SNDMAILWWW �SNDPREVIEW��4�� ��� �T��� �T���.�%C�Exist� �wwIPStuff.dll��a��Ba��(�T���wwIPStuff.dll not installed�B-��U��TCERROR �LCDLLFOLDER�LCERROR�DLLMNGRW{�����C����\�h����M��M��M��M��M��M��M ��M ��L ��M�Ba�U ��TCCURSOR�KILL�MSUBJECT�MTO�MCC�MBCC�MMESSAGE�MREPLYTO �MREPLYNAME�MATTACH�BSUCCESS�MERROR?������������� �T��� �T����%C���T��mail.cix.co.uk�T��25��)�T�C�Filling �IP address�� �#�T�C�Filling�Port�� ���%C� � ��B-��R,:�Sending e-mail#�G+(�\wwclient\classes\wwUtils)�G~(�\wwclient\classes\wwIPStuff.vcx � � ��T �C �wwIPStuffN�R,:�Sending e-mail�T � ���T ��C�g �F������ �T�-�%��mail.cix.co.uk_�%C�pop3.txt0[�%C �Available�W*�T�C�ConnectC�pop3.txt������R,:�Sending e-mail �T���~�T���T ��� �T ��CC�����6�T ����T ����T ����T ����T ����T � �C!��, �,�T �C �"��R,:�Sending e-mail �F�� �% � �>#�a��T� �$� �>%���T���C C �� �T�� �%��C �Disconnect����<���R �<�wwUtils�BCC��a�-6�U'��TCCURSOR�TCSMTP�TCERROR�LCIP�LCPORT�LCFOLDER�LCERROR�LCE1�LNRECORD�MARKUP�SNDEXIST�O�LLRESULT �CMAILSERVER �NSMTPPORT�LBPOP3�LOPOP3�GETEMAIL �CSENDEREMAIL�MREPLYTO �CSENDERNAME �MREPLYNAME �CRECIPIENT�MTO�CSUBJECT�MSUBJECT�CCCLIST�MCC�CBCCLIST�MBCC�CMESSAGE�MMESSAGE �CATTACHMENT�MATTACH�SENDMAIL�BSUCCESS �CERRORMSG�MERROR�WWUTILS���������� ��� �T���)�T�C�Filling �IP address�� �#�T�C�Filling�Port�� ��T�C]C]�\9�%C� �dbxSMTP.dll0�C� �eReports.dll0  8W�T�F�Required files dbxSMTP.dll and/or eReports.dll are not found in folder��B-� � � �:�T �C �eReportsSMTP �eReports.dll �eReports.dll;�C+�Company Name (DEVELOPER) / YP4C5EYLY219BMDG � ��T � ���T ��C�g �F�� �T���~�T���T ����%�,�{$��(C���,�w#�C��C�����,� �����C���� ����T ����%�,� $��(C���,�#�C��C�����,� ����*�C���� ����T ����T �C �oProgress ���% �� �T�� ��C C �� �T���BCC��a�-6�U��TCCURSOR�TCSMTP�TCERROR�LCIP�LCPORT�LCFOLDER�LCERROR�LNRECORD�LNI�MARKUP�OSMTP�LNRESULT�UNLOCK �SMTPSERVER�SMTPPORT �FROMADDRESS�MREPLYTO�MTO�OCCASION �ADDRECIPIENT�SUBJECT�MSUBJECT�MCC �MESSAGEBODY�MMESSAGE�SENDMAIL �SMPTERRORt�����%C��)� �F���t&� �m�<�C�Alias ��� does not exist�Preview e-mails���U��TCCURSOR�MSGBOXW�sndExistG���� �sndCursor���� �sndMailwww���� �sndMailesmtp���� �sndPreview\ ����>���Qa�A�4�q����r��q�A�4�q��q�;��rq������1A�2q�A�1�!�s�q��qB�A�A��������A�A���q�A�Q��Q9��2��1rq�A��!���!A1A��qA�!A1A��qA�A�A��R4�q���Q�A��A�1����������������� �����\��������r�� ��,������ ��5��E���^���N��F��������]�����������%������������� ������肮.�����4�����%C�'� �B���� �%�e�)�BC����<��>�</��>���&�B�<��>���</��>���U� �TCCONTENT �TCKEYWORD�TBUNWRAP�FILLING������aA�A�1���������������������%�������������&���e��)M0��!�4 �� � � � ��T� ���PeB �5 �� �T �- �T�-�%C �� �%C ���"�%C �Buffering ����Ca ��� �Q �� �T �a��% ��%C ��.dbf0� ��.dbf �T�a���% �n�%C ��.cdx0j� ��.cdx �T�a���% ��%C ��.fpt0� ��.fpt �T�a�� �%� �C��� �B ��U ��CALIAS�CFILE�BDELDBF�BDELCDX�BDELFPT�_REFOX_�BRETURN�LBFLUSH�FLUSHXa���!"�A���A��Q�C�A��Q�C�A��Q�C�A���A�A��1���������������������%�������������&�����\,3'�� �4���������T� ���PeB�� �T�Ct �5 � ��%� ��%C �|� �B�����C�Step date 20050826 �'�C�FATAL�Too few parameters ����%� ��T�C � �%�1�T �C���T �CCC������6�c �T ����T �CC������6��%C ���  �B ���%C � �B ���%�� � �  �B �� �%��B �� ���B �� ���U��TCSTRING�TCTEXT�TCSEP�TBBEFORE�TBFORCE�TBTRIM �TBNOREPEAT�_REFOX_�LNPARMS�LCSTRING�LCTEXT�CHECKAPP�DEBUGX�APPERRORar������qA�A��A�����A�s�A���A��A���A�1�������������������%���a3��5��:����5��-5Q�� �4���� �5���5����5� � �#�5 � � ������)�J��( � � �������T� ���PeB�� �T�Ct�T�CC��������6�T�CC������6!�%�VISUALCChf�C� �T��Message��T�CC�����6 �%C �m.p_nTimeoutb�Un�T ���T�C�G�T �C���G !�T �C�� �� 8 �T���T�CC��|C �T�C�MEMOv�T�C� �G$(� �B��U��TCTEXT�TCTITLE�TNMODE �LNSETMEMO�LNRETURN�LCTEXT�LCTITLE�LNMODE �LNBUTTONS�LNICON �LNDEFAULT�JCOK�JCCANCEL�JCABORT�JCRETRY�JCIGNORE�JCYES�JCNO�JCQUIT�_REFOX_�LNPARMS �P_NTIMEOUT �XMSGBOXWIN^ �5 �� � � ��5 � � ��5 � � � ��5 � � �� �5���T��msgboxwq7�T�CC��� ��TITLE "C��"���"6 �%- �T �� �255,255,0�T ��0,0,128�T ��0,0,128�T ��0,0,128��T ���0,0,0�T � �255,255,255�T � �128,128,128�T � �192,192,192��T��Arial �T� �T��B,�T �CC%C � ��$ z �G$( ��T �C��T ��� �( �^/�T �C �CC� � � � �#D� �Ho/� �� �T� �T�� C� �T��T�C����6� C�� �T� �2/ �T� �T� �T���T � ��T �C ��C�>D�T ��T �������?�5�����5� �T�� �T�� �T�� �T�� �T�-�5� �T�-�%CCChg8 �BC���DEFINE WINDOW &lcWname AT 0, 0 SIZE m.lnHeight, m.lnWidth IN SCREEN NOCLOSE FLOAT NOGROW NOZOOM NOMINIMIZE SYSTEM COLOR RGB(,,,&rgb_bckgrd) FONT m.lcF, m.lnP STYLE m.lcS &lcWtitle �H?� C �gcSDIWindowb�C�C� �C��� �C� @�T�C���$�)�T�C���$�C %�T�9��T�� ��T��!��%�� �T� ����%�� �T�!���3�ACTIVATE WINDOW &lcWname IN WINDOW &gcSDIWindow �MOVE WINDOW &lcWname CENTER #� �VISUALCChf�9"�- z�T�C���$�)�T�C���$�C % �T�9�T�� ��T��!��%�� �T� ����%�� #�T�!��� �T9"�a �T�a�MOVE WINDOW &lcWname CENTER �ACTIVATE WINDOW &lcWname �2�MOVE WINDOW &lcWname CENTER �ACTIVATE WINDOW &lcWname � �H � �� �C�#�� ��� #�C#� �C$�� ��� g�C%� �C�&� �C'�� ��� �C(� �C�)� �C$�� ��� �C(� �C)�� ���  �C&� �C$�� ��� P �C$��C#�� ���  �C�&� �C'��C%�� ���  �C�)� �C$��C(�� ���  �C)��C(�� ��� F �C$��C&�� ���  �C'��C%� �C�&�� ���  �C$��C(� �C�)��2 �T��Application error �C�*��� �( �` @�@ m.lnI,2 SAY MLINE( lcText,m.lnI) COLOR RGB( &rgb_text,,,) ��%C �silent.txt0  �C�Chord+���9�RELEASE WINDOW &lcWname �%�� ��� �  �T� ����%�� ���!�  �T�!��� �%�5 �T9"�-��%,� N �8� �B,��U-��RGB_TEXT �RGB_BRIGHT �RGB_SHADOW �RGB_BCKGRD�LCF�LNP�LCS�LNWIDTH�LNHEIGHT�LNX�LNY�LNI�LNCHARS �LNMAXWIDTH �LNWBUTTONS�LCWNAME�LCWTITLE�LCTITLE�LNLINES�LCTEXT �LNBUTTONS �LNDEFAULT�LNPH�LNPW�LNFH�LNFW�LOFRAME�LBHIDE �VMSGBOXWIN �GCSDIWINDOW �ISNULLFP2 �ACTIVEFORM�WIDTH�HEIGHT�VISIBLE�SETOK �SETCANCEL�SETABORT�SETRETRY �SETIGNORE�SETYES�SETNO�SETQUIT�DING�LNRETURN��4�� �T�����U��TN�LNRETURNs �4��� �H�l� ���Buttons1 �H=�-� ��Y� �B�OK� �|��B �OK Cancel� ���B�Abort Retry Ignore� ���B �Yes No Cancel� ���B�Yes No� ��B �Retry Cancel�2-�B�Illegal�� ���Iconl �HSh� ��m �B��� C�"�B�White cross on red circle� C� &�B�Blue question on white speach� C� #�B�Black ! on yellow triangle� C�@K�B�Blue i on white speach�2h�B �Illegal icon���U��TCMODE�TNVALUE��4�� �H��� ���7��B�  $� ���C� m��B�  #� ���C� ��B� � ����B�  � ����B� ��U��TNPOS�LNWIDTH �LNBUTTONSu��4��k��C�����@�Arial A�B ������?�@*HN OK*C��U��TNPOS�LNHEIGHT�GETLEFT�JCOK�VBUTTONy��4��o��C�����@�Arial A�B ������? �@*HN Cancel*C��U��TNPOS�LNHEIGHT�GETLEFT�JCCANCEL�VBUTTONz��4��p��C�����@�Arial A�B ������? �@*HN \<Abort*C��U��TNPOS�LNHEIGHT�GETLEFT�JCABORT�VBUTTONz��4��p��C�����@�Arial A�B ������? �@*HN \<Retry*C��U��TNPOS�LNHEIGHT�GETLEFT�JCRETRY�VBUTTON{��4��q��C�����@�Arial A�B ������? �@*HN \<Ignore*C��U��TNPOS�LNHEIGHT�GETLEFT�JCIGNORE�VBUTTONx��4��n��C�����@�Arial A�B ������? �@*HN \<Yes*C��U��TNPOS�LNHEIGHT�GETLEFT�JCYES�VBUTTONw��4��m��C�����@�Arial A�B ������? �@*HN \<No*C��U��TNPOS�LNHEIGHT�GETLEFT�JCNO�VBUTTONy��4��o��C�����@�Arial A�B ������? �@*HN \<Quit*C ��U��TNPOS�LNHEIGHT�GETLEFT�JCQUIT�VBUTTON��4�� �BC���U��TVVALUE<�4���T�CC�������6�T�C�G�T�C���G !�T�C���� 8�G)( �\libs\common3�T�&�lnR1 = msgbox( 'Test', 'test', tnMode)�&lcCommand �T�C�Test�test�������C�CC�Return�� �C C�Return�� � �Return values��U ��TNMODE�LNMODE �LNBUTTONS�LNICON �LNDEFAULT �LCCOMMAND�LNR2�MSGBOXW�LNR1�WHATMODE �4��� �H�� ���Buttons1 �H=�-� ��Y� �B�OK� �|��B �OK Cancel� ���B�Abort Retry Ignore� ���B �Yes No Cancel� ���B�Yes No� ��B �Retry Cancel�2-�B�Illegal�� ���Iconl �HSh� ��m �B��� C�"�B�White cross on red circle� C� &�B�Blue question on white speach� C� #�B�Black ! on yellow triangle� C�@K�B�Blue i on white speach�2h�B �Illegal icon�� ���Return �H{� � �B�OK� ��B�Cancel� ��B�Abort� � �B�Retry� �*�B�Ignore� �G �B�Yes� �c �B�No�2{�B�Unknown���U��TCMODE�TNVALUE ������ �5���T�C � � �$�T�C � � �$�T��C�formN ���{ �T�-�T � ���T � ���T � ��T� ��T��B ��T��I ��T�CC������6�T� �T�- �T�a�T��T�C^ �T�- �T�-� �H>D� C �gcSDIWindowb�C�C� �C��� �C� �- �T�C���$ �)�T�C���$ �C %�T�9��T �� ��T!�� ��% �� j�T� ����%!�� �T� ���3�ACTIVATE WINDOW &lcWname IN WINDOW &gcSDIWindow �MOVE WINDOW &lcWname CENTER (� �VISUALCChf�9�- �- (�T�C���$ �)�T�C���$ �C % �T�9�T �� ��T!�� ��% �� �T� ����%!�� �T� ��� �T9�a �T"�a�MOVE WINDOW &lcWname CENTER �ACTIVATE WINDOW &lcWname �2>�T��#�a� �HO� $��r�C����a%�� $��&� �C���%��C���a'�� $��&� �C���a(��C����)��C���*�� $��&� T�C���+��C����,��C���a'�� $��&� �C���+��C���a,�� $��&� �C���)��C���a'�� $��&� �C���a'��C���%�� $��&� e�C����)��C���*��C���a(�� $��&� �C����,��C���a'��C���+�� $��&� �C���a,��C���+�� $��&� 6�C���a'��C���)�� $��&� �C���*��C���a(��C����)�� $��&� �C���a'��C���+��C����,��2�T-��Application error�C����a.��� /�( 0�* 1�C�lblLineCC /�Z �lblTextMsgBox��1�'�T�C�loForm.lblLineCC /�Z�T�C-� /� ��& �T2���T3� /���T���T � ��T� ��T��B ��T��I ����<��%C �silent.txt0 a �C�Chord4���T���a �C��5��<�� �%"� �T9�-��%6�  �8� �B6��U7��LOFORM�LOLABEL�LCLINE�LNHF�LNVF�LCF�LNP�LCS�VISIBLE�HEIGHT�LNHEIGHT�WIDTH�LNWIDTH�FONTNAME�FONTSIZE�FONTBOLD �FONTITALIC�CAPTION�LCTITLE �WINDOWTYPE �MINBUTTON �ALWAYSONTOP �BORDERSTYLE �BACKCOLOR �CONTROLBOX�CLOSABLE �GCSDIWINDOW �ISNULLFP2�LNPW�LNPH�LOFRAME �ACTIVEFORM�LNFW�LNFH�LBHIDE �AUTOCENTER �LNBUTTONS�VSETOK �LNDEFAULT �VSETCANCEL �VSETABORT �VSETRETRY �VSETIGNORE�VSETYES�VSETNO�LCTEXT�VSETQUIT�LNI�LNLINES �ADDOBJECT�LEFT�TOP�DING�SHOW�LNRETURNo��4����'�C�cmdOk�cmdButtonMsgBox���6�C����\<OK��C��� �����U ��TOFORM�TNPOS�TBESCAPE �ADDOBJECT �VSETBUTTON�CMDOK�LNHEIGHT�LNVF�GETLEFT�LNHF��4������� �����T���T���T���T ���T � ��T � ��T�� �T�a �T�a�T��Arial�T� ��U��TOBUTTON �TCCAPTION�TNTOP�TNLEFT�TNRETURN�TBESCAPE�NRETURN�CAPTION�TOP�LEFT�HEIGHT�LNVF�WIDTH�LNHF�CANCEL�VISIBLE�FONTBOLD�FONTNAME�FONTSIZEw��4����+�C �cmdCancel�cmdButtonMsgBox���:�C����\<Cancel��C��� �����U ��TOFORM�TNPOS�TBESCAPE �ADDOBJECT �VSETBUTTON �CMDCANCEL�LNHEIGHT�LNVF�GETLEFT�LNHFu��4����*�C�cmdAbort�cmdButtonMsgBox���9�C����\<Abort��C��� �����U ��TOFORM�TNPOS�TBESCAPE �ADDOBJECT �VSETBUTTON�CMDABORT�LNHEIGHT�LNVF�GETLEFT�LNHFu��4����*�C�cmdRetry�cmdButtonMsgBox���9�C����\<Retry��C��� �����U ��TOFORM�TNPOS�TBESCAPE �ADDOBJECT �VSETBUTTON�CMDRETRY�LNHEIGHT�LNVF�GETLEFT�LNHFw��4����+�C �cmdIgnore�cmdButtonMsgBox���:�C����\<Ignore��C��� �����U ��TOFORM�TNPOS�TBESCAPE �ADDOBJECT �VSETBUTTON �CMDIGNORE�LNHEIGHT�LNVF�GETLEFT�LNHFq��4����(�C�cmdYes�cmdButtonMsgBox���7�C����\<Yes��C��� �����U ��TOFORM�TNPOS�TBESCAPE �ADDOBJECT �VSETBUTTON�CMDYES�LNHEIGHT�LNVF�GETLEFT�LNHFo��4����'�C�cmdNo�cmdButtonMsgBox���6�C����\<No��C��� �����U ��TOFORM�TNPOS�TBESCAPE �ADDOBJECT �VSETBUTTON�CMDNO�LNHEIGHT�LNVF�GETLEFT�LNHFs��4����)�C�cmdQuit�cmdButtonMsgBox���8�C����\<Quit��C��� � ����U ��TOFORM�TNPOS�TBESCAPE �ADDOBJECT �VSETBUTTON�CMDQUIT�LNHEIGHT�LNVF�GETLEFT�LNHF ��T���� �C���U��LNRETURN�THIS�NRETURN�THISFORM�RELEASE �xmsgboxwin�����vButton�����WhatMode6�����getLeft�����setOk���� �setCancels�����setAbort�����setRetry���� �setIgnoreq�����setYes�����setNo�����setQuitg���� �isnullfp2���� �ttmsgboxw1�����WhatMode���� �vMsgBoxWind�����vSetOk!+���� �vSetButton+���� �vSetCancel_-���� �vSetAbort4.���� �vSetRetry/���� �vSetIgnore/�����vSetYes0�����vSetNoy1�����vSetQuitB2�����Click3������ �T��� ������U��NRETURN&� �T��a �T�a �T���U��AUTOSIZE�VISIBLE �BACKSTYLE�cmdButtonMsgBox �CommandButton25���� �lblTextMsgBox�LabelY5��������1br���AA�A�"�2���5�Q�Qq�aaa�AA�(����A�����Q�����A��q6q������r��s�A� ��AA�AA�41�AA�AA����A�����������������������������������A�A�!A�a�A�A���B�A�A��1�q��Q�4�����!a�Q�A�Q��Q!QaQ1Q�QA�A�@1�q��!A!1!!!aA�4�q�4�q�4�q�4�q�4�q�4�q�4�q�4�q�4�q��;�q�!S3��24�����!a�Q�A�Q��Q!QaQ1Q�QA�q���������A�J�4��q��A��AAQQ����q��A��A�AA�AA�1�AA�AA�����C��!!!1!!!!!!!!1!!!!!!1!!�!A�qA�!A�QQA�A�q�!A���q���B�A�A��6��qa<������!!���1�A�4��4��4��4��4��q4��qa4��8��<���4����1��������������������9 ��j.��a������~.��B/�������W/��4�������&4��5�������6��g7�������}7��8�� ����8��R:��-����g:��;��:�� ��;��?=��G�� ��R=��>��T����>��@��a����+@��A��n����A��B��{����B��G����%��G��wM����\��M��a������a��c������c��e������e���g������g��fh������|h��i������i��6k������Jk��l���� ��l��m������n��Ro������o��p������o��p�� ����p��q�������%��� ������ �����2 ��Va5{���4�� ��� �5 ��T ����%C �E��B-��%C �b��Ba��% �� � ��%C ���Ba���B-�%C�\ �C �>��T �C �C �>=��%C �=�\�T �C] ���%� U�%CC �=�B�Q�B-���%C� ��t�Ba��% � �B-��BC� ���U��TCPATH �BMAKEDIRS �TBNOCHECK�TBQUIET�CPATH�ISDISKX�DIREXIST�MADEPATH �4 ���5� ����� �5�� �T�- �T �-�T�C�ERROR�T�C��f�T��C]�T���C:7�T����  � � �C�CheckC�= � �%�e�%CC ��`>&8�C �1:wDirExist�Checking for folderC �� ��a3�C �1:wDirExist�Checking for folder �� ����1 �lbError = .T.5�T �C� ���DH���DC� �ON ERROR &lcOnError �%� �%��C �-1:wDirExist ���B-��% � X+�%C ��>�C ��\�: T �T �a�� �%��C �-1:wDirExist �� �B ��U ��TCP �ADIREXISTS�BDIR�LBERROR �LBDEFAULT�LBC�LBPWAIT �LCONERROR�LCFOLDER�TBQUIET�ISMAPPED�PWAIT� �4 ���5 � � ��T �C�\ ��� �( ��0�T �C ��C�\ ���\ �=$�%C� �� �C� �� ��B-���BC� ����U��CP�NSLASH�CPX�NI�DIREXIST�MAKE_DIR��4���5��5��%� �� ��"�� K��T��"���"�`� �T�����MKDIR &lcPath �Ba�U��TCPATH�LNRETURN�LCPATH�4���5��5������T�CC��=f �T�a�T��C]�T���C:�T����  �� �T�- �%��%C�Check��� >�C �1:wIsDiskIn�Checking drive C�=� exists� �T�a���%C�� � ,�%��aAbB�%��Cw�%��� s�C �-1:wIsDiskIn����C�Remove����B-�(�%C�� ���$�%��C�%��� �C �-1:wIsDiskIn����C�Remove����B-����%C�� ��F��%��C�%��� �C �-1:wIsDiskIn����C�Remove����B-��%��C�%��� �C �-1:wIsDiskIn����C�Add����Ba�U ��TCPATH�LCDRIVE �LBDEFAULT�LBC�LBPWAIT �LBISPWAIT�LBQUIET�ISMAPPED�PWAIT�DOCHECK3�CLUSTERw�4���5� �5�� �5�� �T�- �T�-"�T�C��= �:\a~b~c~.men�T��T�C�ERROR�1 �lbError = .T.�T�C�0�%� ��T�C���ON ERROR &lcOnError !�%���� �� Z�%�� �C���1 �lbError = .T. ���ON ERROR &lcOnError �Ba�i�B-��B-�U��TCDRIVE�LNH�LBFILE�LBERROR �LCONERROR�LCFILE�DirExist�����MadePath�����Make_dir �����IsDiskx�����DoCheck3, ����R��q�A�-q�A���!q�A�A�q�A�qA���q�A�A�Cq�A�q�A�3�����Q�11q�q�1A�A�QQq��A�q�A��A�A��A��3��QqBq�A�A�5�q�q�q�q��A�q�9�r�v�qA�11���A�A�1Q!AA�A�qq��a�!AA�A�qq�A�A�A�b�!AA�A�qq�A�!AA�A�Aq�4�q�q�����!�QQ���A�q�A�Q�qq��q�A�q�1�����������������$����� ��F���H��� �� ��n���S��� �� �����^��� ��6��������K��P���������%�������������>�����W}-���4���%���Zip �H(�� �-S+�U4�T�C�String�/auto��CCC���#�����T�C���@=�%C�>�Q�CC� � � ��CC� �� � � �T ��'�+C �AZ �C �az  �T �CC@8@��T�C � &�T�C�� �Status:Locked�;��� �-s��T�C���-s� ��%C�>� �T���CC� � � ��CC� �� � �����5��������5��T�C�C�Date:�\ �T�C���Status:�;��T�C���Key:�;� �Hp� C� R�T�C���Time:�;��T�C���Date:�;�4�T�C�String�/auto��CCC���#�����T�C���@=�%C�>�N�CC� �� ��CC� ��� ��� C� W�T�C���Time:�;��T�C���Date:�;��T�C�\�T�C�=�T�C�$�T�C�Decode�/a������T�C���@=�%C�>�S�CC� �� ��CC� ��� ��� �-s��T�C���-s� ��%C�>� �T���CC� �� ��CC� ��� �����U��TCMODE�LCZIPOPT �LCZIPAUTO�FLOATING �F1TIMEDATE�DSTODATE �LCZIPDATE �LCZIPTIME �LCZIPCODE�DUE �SETZIPVALUE�LNID �SETZIPSTRING�LNABC�LCZIPABC �LCZIPCOMMENT�ADDTEXT�FILLING�LCZIPKEY�LCCODE�LNSEED �LCZIPSTATUS �TCCOMMENT �SETUNZVALUE �SETUNZSTRINGw�A�AA1�qaA��aA�21�A�E��q��A1A�!!�A2A�11�A�A�A�1���������������������%�����������*�������c}+��� �4 ���5 � � �&�T ��C ���;.,�:::�:::$�T �CC ��C�: ��=g$�T �CC ��C�: ��\g'�T �CC ��C�: ��\g �B �< �< ��U��CTIME�NHRS�NMINS�NSECS�QaAAq1��������������������%��������������J��,3��%�4 �� � � � ���T� ���PeB�� �T�Ct�5��5 ��5 � �T���% � ��T ����% � ��T �����% � ��T ����% �  �T �-��T ��wPWait�%C�tnSwitchb�NC �T �����T �C��g�%�:���T �CC��C�:��\�� �H� ���C � "�HIDE WINDOW &lcWname IN SCREEN � ��C � �SHOW WINDOW &lcWname !� C � �C � L� ��C?7� �� �C � �RELEASE WINDOW &lcWname &�%C �gbPwaitHideb�L� �  �T9 �-���Ba�U��TNSWITCH�TCSTRING�TCMODE�TNPOINTS�TLBRIGHT �TNSECONDS�_REFOX_�LNPARMS�LNPARMZ�LNSWITCH�LCWNAME�NEWPWAIT �GBPWAITHIDE�VISIBLEJ�5 �� � ��T ��C�T �C �MEMOWIDTHv�% � �C � u��T � �Please Wait���T �CC ��|C ��%�WINDOWSCChf���������%�(�%C �� "�ACTIVATE WINDOW &lcWindow SAME �$�t&��5�t&��G$( ��U ��LCWINDOW�LNLINES �LNMEMOWDTH�LNPARMZ�TCSTRING�CTEXT �XPWAITWIN �XPWAITDOS�LNSWITCHS�5 �� � ��G$(C�T �C ��T ��� ��( ��!�T �C �CC � ��>D��DEFINE WINDOW &lcWname FROM 0, 0 TO m.lnLines+1, m.lnChars + 3 IN SCREEN SHADOW NOCLOSE NOFLOAT NOGROW NOZOOM COLOR SCHEME 7 �MOVE WINDOW &lcWname CENTER �ACTIVATE WINDOW &lcWname )�T ��COLOR CC�/�*/� ��( �H �HD� ��NOBLINK$� ��C � ��� C � $� ��C � ���2D6�@ m.lnI - 1,1 SAY MLINE( m.cText, m.lnI) &lcColour ���B�U��LNI�LNCHARS�LCCOLOUR�LNLINES�CTEXT�TCMODEP�5 �� � � ��5 � � ��5 � � � ��5 � � ��% ���T �� �255,255,0�T ��0,0,128�T ��0,0,128�T ��0,0,128�3�T ���0,0,0�T � �255,255,255�T � �128,128,128�T � �192,192,192�0�T �CC �� �MS SANS SERIF� �6#�T �CC �� � �6�T ��B,�T �CC%C � ��$ z �G$( ��T �C ��T ��� �( �A1�T �C �CC � � � � �#D��T � ��T � ��T ��T �������?�DEFINE WINDOW &lcWname AT 0, 0 SIZE m.lnHeight, m.lnWidth IN SCREEN NOCLOSE NOFLOAT NOGROW NOZOOM NOMINIMIZE COLOR RGB(,,,&rgb_bckgrd) FONT m.lcF, m.lnP STYLE m.lcS �5� �T�- �H_?� C �gcSDIWindowb�C�C� �C��� �C� 3�ACTIVATE WINDOW &lcWname IN WINDOW &gcSDIWindow �MOVE WINDOW &lcWname CENTER #� �VISUALCChf�9�- �%C �gbPwaitHideb�UD�7� �T�a� �T9�a �T�a�MOVE WINDOW &lcWname CENTER �ACTIVATE WINDOW &lcWname �2�MOVE WINDOW &lcWname CENTER �ACTIVATE WINDOW &lcWname �W�@ m.lnHeight, 0.000 TO m.lnHeight, m.lnWidth PEN 1,8 COLOR RGB(&rgb_shadow,,,) V�@ 0.000, m.lnWidth TO m.lnHeight, m.lnWidth PEN 1,8 COLOR RGB(&rgb_shadow,,,) M�@ 0.000, 0.000 TO 0.000, m.lnWidth PEN 1,8 COLOR RGB(&rgb_bright,,,) N�@ 0.000, 0.000 TO m.lnHeight, 0.000 PEN 1,8 COLOR RGB(&rgb_bright,,,) l�@ m.lnHeight - m.lnY, m.lnX TO m.lnHeight -m.lnY, m.lnWidth -m.lnX PEN 1,8 COLOR RGB(&rgb_bright,,,) h�@ m.lnY, m.lnWidth-m.lnX TO m.lnHeight-m.lnY, m.lnWidth-m.lnX PEN 1,8 COLOR RGB(&rgb_bright,,,) S�@ m.lnY, m.lnX TO m.lnY, m.lnWidth-m.lnX PEN 1,8 COLOR RGB(&rgb_shadow,,,) T�@ m.lnY, m.lnX TO m.lnHeight-m.lnY, m.lnX PEN 1,8 COLOR RGB(&rgb_shadow,,,) � �( ��@�@ m.lnI,2 SAY MLINE(m.cText,m.lnI) COLOR RGB( &rgb_text,,,) ��%C� E�G] �9��G] �RELEASE WINDOW &lcWname ��B�U��RGB_TEXT �RGB_BRIGHT �RGB_SHADOW �RGB_BCKGRD�LCF�LNP�LCS�LNWIDTH�LNHEIGHT�LNX�LNY�LNI�LNCHARS �LNMAXWIDTH�TLBRIGHT�TCMODE�TNPOINTS�LNLINES�CTEXT�LBHIDE �GCSDIWINDOW �ISNULLFP2�VISIBLE �GBPWAITHIDE �TNSECONDS��4�� �BC���U��TVVALUE�Newpwaitz���� �xpwaitdos!���� �xpwaitwin���� �isnullfp2����@Qar��v�q�q��1�A�1�A�1�A�1�A�1���!A�A��!q�1b�A�B�q�5�Q��A�q��q�A�!!�Q�A��Q�A��5�Q�1�A��A!A�aA�A�A�5�QQ�aaa�AA�1�4�A�TQ�q q���11q��A����A�qb2BA�a��a�A�C�4�q��3�����������������.���6����p���F����������]�����-,��������C,��,��K������%������������� ������b,3 ����4 �� ��T� ���PeB�� �T�Ct�%� Y��T ����T �C�3� ���+C�3� � ���Ba�U��NTIME�NEND�_REFOX_�LNPARMS�TIMESTMP�ar���A�A�q�1��������������������%���y��������'�����+f5F��o�4�������T� ���PeB�� �T�Ct �HN�h� C�� ����? ���Windows version��Windows directory��System directory�� � ���Windows version %�BCCCJCCJ �01234567890.����g"� ���Windows directory9�BC����!� ���System directoryh�BC������U� �TCFUNCTION�TVP1�TVP2�TVP3�TVP4�_REFOX_�LNPARMS�WINAPIL�4�� ����T�C�X �T�� �H<��"� ���Windows directory�+�|�GetWindowsDirectory�Win32API�T�C���!� ���System directory�*�|�GetSystemDirectory�Win32API�T�C�����%��'�T�C��=�< �T���� �B��U� �TCFUNCTION �LCLOCATION�LNSIZE�GETWINDOWSDIRECTORY�WIN32API�GETSYSTEMDIRECTORY�winApi����qbr���q�R%��A�1�q����!aaA�!��A��1�������������������� ����c�������%����������������x��AM4r���4������T� ���PeB�%C�F��T�� �[� �T��� �%�� �%���BC�����$����BC�����$���  �%���BC�����$���BC�����$����U��TCTEXT�TCTITLE�TBYES�TBLARGE�_REFOX_�LCTITLE�MSGBOXW1b����A����A����A�A�1��������������������%��� ������ ��w��� ��\,3��R�4������T� ���PeB�� �T�Ct�5��� ��5 � � ��5 � �T �- �H~�@� ���T�C��f �T���T�C� �T ��� �T ���� �3�T�C��f �T �a �T�� �T ���T�C� �T ���#� ��C��f�SORRY �T�C��f �T �a �T�� �T �� �T�� �T ���� ��T�C��f �T ���T�C� �T�� �T ����2@�T�C��f�T �� CC�Z �T �� �T��� �% �1�T ��Please inform C�AuthorC ��T � �C C +�T �C �C C C C C �O1�T ��Please inform C�AuthorC �%�T �C C  �C C +�T �C �C C C C C � �H`D� � ���SORRY O�C � �C C �quoting FATAL ERROR in program ��Sorry��%C�m.p_Appb�C�� ��� �B-� � ���FATAL O�C � �C C �quoting FATAL ERROR in program ��Sorry��%C�m.p_Appb�C�� ��� �B-� ����WARNING K�C � �C C �quoting WARNING in program ��Sorry��Ba� ����INFORM d"�C � � �Please note@��Ba� ����NOTIFY Y�C �C � �Please inform&�If the problem persists please contact�Problem@��Ba� ����CONTACT IA�C �C � �Please inform�Please contact�Problem@��Ba� C�m.p_Appb�U8�C� � � in program � � ��Sorry�� ��FATAL/C�C �FATAL ERROR � � in program � � ��Sorry��%C�m.p_Appb�C �� ��� �B-� ��WARNING?�C�WARNING � � in program � � ��Sorry@��Ba� ��SORRY�C � ��Sorry@��2DC�C �FATAL ERROR � � in program � � ��Ooops��%C�m.p_Appb�C5�� ��� �B-��Ba�U��TCTYPE�TCVALUE1�TVVALUE2�TCVALUE3�_REFOX_�LNPARMS�LCTYPE �LCFUNCTION�LNERROR �LCMESSAGE�LCREPORT�LCTEXT�LCERROR�LBPARM2 �GETFUNCTION�APPINFO�MSGBOXW �CLOSEDOWN�P_APP �5��� �T��+CC�t <��T��� �T����,�T��C���C���..���6���1�T��C���C� �C�t���6�.�1�T��C���C� �C�t���6�.�1�T��C���C� �C�t���6�.�1�T��C���C� �C�t���6�.��%C��W �BC�t�-�BC�tC  �in function C��@�()��U� �LCPROGRAM�LNCOUNT�ADDTEXT �GetFunction0 ����1ar��6�q��������������1�������������a��A���QA��A�A�q�A�A�q�q�!q�q�q�b2A�B�q�q�a�2A�B�q�A�q�5���1A�����A�8�����������������f���k����������%���$������)����%��u4��T�4�����5��5��5��T�C�W �T����%C�gcSetFllb�Uq��7��T�C�� �H�� C�tcActionb�C � �T�-� ���Set��T�CCC�f���� �� �Refresh all�T�C �� �� �Release all3�T�C���� �� ���Release`�T�CCC�f �� ���Tidy�T�C ��C � � ���Is set�T�CCC�f�� ���List libraries �B�� ���Quit �C ��8�2 �T�-��%C �setlibrary:�Q�� �F� �B��U��TCACTION �TCLIBRARY �TBKEEPTIDY �LCERRORTEXT �LBSUCCESS�LNSELECT�GCSETFLL �FLLWHATSET�FLLSET �FLLREFALL �FLLRELALL �FLLRELEASE �FLLDELETE �FLLREMOVE�FLLISSET �SETLIBRARY �4����5����5���� � � �5 � ��%�-���- �b��Ba� �T�- �T �-�T����.FLL�T�C�� ���T�C� �C�0 �T�C��T�C���� �H�G � � �T�a� �  �T�-� ��� �-C��C� �%C4�C �setlibraryS �T �C �setlibraryO �>������C$�2 �T ���+ ��.2�r �setlibrary������C$�%C �setlibraryS*�T �C �setlibraryO��� �T �a�+ ��T�C] �#� � �>��%�-���C �setlibraryO � �T �C4��T�C]��.FLX �#� � �>����(��[�C?7 �T �C�+C�0 �C � c,�R,:!�Waiting for copied file to appear��%C�0 �Gb(��%C ��T ��-��T � ����- �T�a� �#� � �C���Z��2G �Gb(��%C �"�T ��-��T � ����- �T�a��%�� � �C�0 v�C���� �B��U� �TCLIBRARY �TBKEEPTIDY �LCLIBNAME �LCSETNAME �LCSETFULL �LBSUCCESS�LBISSET�LBISFILE�LBISOPEN�LBFOUND �LBEXTRACT�LNRECORD �LNTIMEOUT�GCSETFLL �LCLIBFULL�FLLNAME�FLLOPEN�FLLISSET �FLLLIBNAME�FLLDATE �FLLLIBFULL �SETLIBRARY �FLLSETNAME �FLLSETFULL�FLLBLANK�FDELETE�5����� �5�� �5�� �T�a �T�� �C � �T����%C�=�-o����T��-���T��C�-���(���T �C�-���T �C�-��!�T�C� � � �\�T�C�� ��%C �115415.1060 �%�X��Set ��~��Unable to set ����T���� � �B��U ��LNLIBS�LNLIB�LNMINUS1�LNMINUS2 �LCLIBLIST�LCLIB �LBSUCCESS�LBSET�GCSETFLL �FLLRELALL �LNATMINUS1 �LNATMINUS2�FLLSET( �4����5�����5��� �5 � � �T��� �T �a �T� ��T�C�-���(�V�T �C�-���T �C�-��!�T�C� � � �\�T �C��� �H�>!� C �115415.1060��  �% �e#�T���Release �C � �Released ��-�T���Unable to release �C "��Unable to release ��� ���� > �% �#�T���Release �C �:-�T���Unable to release �C ���T � �� � ��%��� � �C�fll.txt��G(�fll.txt�G �G  ��"� �lcLibList = "��""� �gcSetFll = " ��"�C�LIBRARYv�+�G �G�G(� �B ��U��TBSHOW�TBNOOUT�LNLIBS�LNLIB�LNMINUS1�LNMINUS2 �LCLIBLIST�LCLIB�LCERROR �LBSUCCESS �LBRELEASED�GCSETFLL �LNATMINUS1 �LNATMINUS2 �FLLRELEASE�FDELETE�FLL�TXTv�4���5� �5�� �T�-�T�C�LIBRARYv�%C���-�C����� �%C4� �T�� �<� �T�C��-���-�-�C����%C �setlibraryS� �C ��Z �� �T�a��(�%� �C]���.FLL� f�<C]���.FLL�T�C��-���-�� �T�a� �B��U � �TCLIBRARY �LBSUCCESS �LCSETLIBRARY �LCSETFULL�FLLOPEN �FLLLIBNAME �FLLSETFULL�GCSETFLL �FLLDELFILE�FLLBLANK �SETLIBRARY��%C �setlibrary!��Q����%Ca���C�����3�%C �setlibraryN�v��Q�����Q���CC]�fll.dbf��CC]�fll.fpt����Ba�U� �SETLIBRARY�FLLOPEN �FLLLIBNAME �FLLLIBFULL �FLLSETNAME �FLLSETFULL �FLLDELFILE�5�� �5���5����T�C�LIBRARYv�%C�s!�T�C��C]�*.flx��(�o�T�C����!�T�CC�C�.�=�-�� �H�k� C4 �� �� �� C4�C �setlibraryS C&�% �C$ �CC]� � 7 �C ���Z� � C4O�2k�CC]� �����Ba�U ��LAFLX�LNFLXS�LNFLX �LCSETFILE �LCSETNAME �LCSETLIBRARY�FLLOPEN �FLLSETNAME �SETLIBRARY �FLLSETFULL�FLLDATE �FLLDELFILE�FLLBLANKM�J�>��������������������������������U� �SETLIBRARY �FLLLIBNAME �FLLLIBFULL �FLLSETNAME �FLLSETFULL�FLLDATE`��4���5��T�C�ERROR �1�*�C�����ON ERROR &lcOnError �BC��0 �U� �TCFILENAME �LCONERROR�FDELETE*�4���5��� �5���%C�gcSetFllb�Cc��%�-���-�_��Ba���T�C�LIBRARYv�T����.FLL�T�C]��T�C� �T�- �%��- �C��� �� �T�C4��� ��T���� �B��U � �TCLIBRARY �LCSETLIBRARY �LCLIBNAME �LCLIBFULL �LBFLLOPEN �LBSUCCESS�GCSETFLL�FLLOPEN�LBSUCCES �FLLLIBNAME �FLLSETFULLt�5���5���� �5���T�C�LIBRARYv �HH�d� C��C� 2�T���-'�T�C�,�CC����6��(�. �T�C�,�,��,�$�T�C�,�,��,�'�T�C�,��,���\�T����C����� C�O�T���-�2d �T���� �B���U ��LCNOWSET�LNLIBS�LNLIB�LNAT1�LNAT2�LCLIB �LCSETLIBRARY�GCSETFLL �FLLWHATLIBl��4���%C�T��-��� �%C4?��BC��-�P� �B����e� �B����U� �TCSETFULL�FLLOPEN �FLLSETFULL �FLLSETNAME�4�� �5���5��T��%C �setlibraryG��Ba��%CC]�fll.dbf0  �T�C�+�3�%C��#�R,:�Trying to create fll.dbf��%C�7�T�� �Timeout trying to create fll.dbfC �B-��T�C �flllock.txt�}��\libs\common\createtbC]�fll.dbfG�fllLibName C(8), fllLibFull M, fllSetName C(8), fllSetFull M, fllDate D�Q� �C��C �flllock.txt���T�C�ERROR �1�* �%��D�CC]�fll��Q��C]�fll���CC]�fll��Q��C]�fll���ON ERROR &lcOnError �%C �setlibrary�F���BC �setlibrary�U � �TBEXCLUSIVE�LNH �LNTIMEOUT �LCONERROR �LCERRORTEXT�FLL�FDELETE�CPCHECK �SETLIBRARY �4����5����5����5� �5 � ��%�� �FOXTOOLS.FLL� �T�a�T �C ��T�CC] �0�T�C �0�%��� � �T�-���T�C� � ��� �T�- �T ��� �T�- �T�- �T�-��T�CC]��0�T�C��0�%��� \ �T�-�v�T�C��� �� �Hf � ��T �C] � � � �T � � � ��T �C� � � �T�a � � �T �C]�� � �' �T ��� � �Q�T �C��� � �T�a�2f �T �����%C �fllInclude�Q �� �B ��U� �TCLIBNAME �TBEXTRACTED�LBISLIB1�LBISLIB2�LBISLIB3�LBISLIB4�LBISLIB5�LBISLIB6 �LBFOXTOOLS �LCFOXTOOLS�LCSOURCE �FLLFOXTOOL �FLLINCLUDE �FLLEXTRACTP�5���� �5���5� �T��Ch�T��Visual���T�� *�T�CC��C�� �0123456789.����g �H�@ � ���T� �FOXTOOLW.FL~� ��� �'�T��FOXTOOLCC�8Z�.FLL � �$�T��FOXTLCCC�8Z�.FLL�2@�T� �FOXTOOLS.FLL� �B��U� �LCVERSION�LCFILE�LCVISUAL �LBWINDOWS�LBVISUAL�LNVISUAL �LNVERSION$�4���5� �T�-�%�VISUALCChf�>�%C�include\include.dbf0�C�include\include.fpt0 ��%C �fllInclude �!�Q���include\include���F��-C�fCC��C��>f �T�C4��+�T�C�include\C���.FLL�.FL~0� �B��U��TCFILE �LBINCLUDED�INCLUDE �FLLINCLUDE�INCNAME�4���5��5� �T����%�VISUALCChf*�T�CC]C]�\���\\�\�%C�0��C�����%C�0� �T���>�%C�include\include.dbf0�C�include\include.fpt0 �%C �fllInclude "!�Q���include\include���F��-C�fCC��C��>f �%C4��(��%C�0 �T��������%C�include\��02�T�CC]C] �\INCLUDE\���\\�\�� �B��U��TCFILE�LCFILE �LCEXTRACT�FDELETE�INCLUDE �FLLINCLUDE�INCNAME�INCFILE�fllSet,���� �fllRefAll���� �fllRelAll ���� �fllRelease���� �fllRemove���� �fllDelete�����fllBlank���� �fllDelFile�����fllIsSet���� �fllWhatSet���� �fllWhatLibu�����fllOpen�����fllNameF���� �fllFoxTool���� �fllInclude!���� �fllExtractt"���� �q�q�q���q��A���A�bQQaqQ�Q�A���A��A���4����q�A���Qa�!�����AR��!!A�A�A������Q�A���#A�1�A�����A�a����A������A�a�A��A��4�1������q�!A�qqa!�A�A�A�AA��4��1�����qqa!��1�!A�Q�1�A�A�AA�QBa�a��!!QA�a�a�a�A��4�q�q���a�������A��A�A��A��4��A��A����A�A�q�5�q���a�qQ��d�A����CA�A�K�q�4�4�q�q�Q��q�4�q���q�A�A�aQA���q�A��4�q�1�a��qqAqgA�����A��4�q������A���A�3�q��q��q�A��1A1A�Arq�A�A���A�Q��q�qA�tq�A�Q4����q����a�A��!A�������A�a�A��!A���A���!��A���!���A��A��4���q��q���q�A�A��5�q�q��A�q��A��A��5�q�q�q����A����A�q�����A�A�A�A��!A�A��1�����������������(����� ��A���t���"���������������������� �������� ��"�������"��(��$����(��T*��S����k*��+��\�� ��+��.��h��!��.��f2����6��}2��3����B��3��8;����i��L;��@������@��C������C��F��8����F��HN��O������%�����������a������]���'W1��-�*�BC�m.p_Appb�C�C ���OCOMM �U��P_APP1��������������������%���������D!��E����s|o5��n������������ � � �� �� �������:�T �CCC �m.p_Masterb�C� � �C]C]6&�T�CC�� ��Install�C��6�%��Function��Ba�)�T�CC� ���* �����6 �T�CC�� ��C�64�T �CC��CC�System directory���6)�T �CC�� ��dllIndex��6 �T ����%��Match�BC��� �������-�%��Exist�C� ��,�  �T� ��BC �C�`0��C�dllIndex��C� ���T �C� �T����T�C��� ���e�%��Unpack�C� �C�dllIndex  .�� ��C � �C� �C�dllIndex  �C����� ���C�dllIndex��C� ���T �C���C����F��T�C �vDllManagerN��~7�T��'�C��CC��@��� � �C��� ��%��Check.�%C �vDllCheck�C �vDllCheckN� �F� �C �� �C�Nothing to check!����%� Q�T � �CC �6�$�File dll0611.zip or later is missingC C ���6P�T � �CC�dllIndex ,��There is no dllIndex tableC C ���6K�T � �CC �vDllManagerN�!��No list of DLLsC C ���6� �T� ��C �vDllCheck��C�dllIndex��C �vDllManager� �B��U"��TCACTION �TCDLLLIST�TCFOLDER�TCSOURCE �TCVERSION�TCERROR�LCACTION �LCDLLLIST�LCSOURCE�LCFOLDER �LCVERSION�LCERROR�LCMASTER �LCZIPLATEST �LCZIPNAME �LCZIPFOLDER�LBRETURN�LNSELECT�P_MASTER�FNSYSTEM�DLLMATCH�KILL �GETDLLINDEX �GETZIPLATEST �GETZIPNAME �UNPACKZIP �DLLCURSOR �VDLLMANAGER �DLLACTION�FILENAME�VERSION �VDLLCHECK�APPBROW�MSGBOXW�4�� ����� �%C���C�dllIndex }�D�o�dllIndex-Q�C� = �dllManager �vDllManager�I�h �vDllManager��C2��C ��C2��L�T�C����, ���(��T�CCC������, �@�T ���T ����T ��� �T �-�%C��F��-CC�@� �%C4�T ����T �� ����r �vDllManager���Ba�U � �TCDLLLIST�LNFILES�LNI�LCFILE�COMPLETE�DLLINDEX�FILENAME �VDLLMANAGER�VERSION�ORIGINAL�OCCASIONp�4����������� � � �� � � ���� �T���T����T����T �C�0�T �C�0�J��( � � �% ���T �C���� �% ���T �C���� �T�� �H `� C���Check�%C �vdllCheck u8�h �vDllCheck��C2��C��M�7�r �vDllCheck���� �C��� �T�a+� C���Install�Update�Unpack�%���Update?(�% �� � �C� �� �� ; �� �T �-���% �� � j��(���T�C�0 �%��C������/�T��Unable to install �� in ��� ���Remove �% � ����T�C�0 � ���Exist` �T� � �%�\�C������� �B��U��TCACTION�TCFILE�TCSOURCE�TCFOLDER�TCERROR �TCVMANAGER�LCFILE�LCSFILE�LCFFILE�LBSOURCE�LBFOLDER �LCVSOURCE �LCVFOLDER �LCXMLSOURCE �LCXMLFOLDER�LBOK �GETVERSION �LCVMANAGER �VDLLCHECK�FILENAME�VERSION�DETAIL �XMLVERSION�COMPVER �REMOVELOCALu� �4������T�CCC]C]@�%C��@�@��n��%C��0j�������U��TCFOLDER�TCFILE�LCLOCALY��4�����T�C����%��A� �BC��R� �B����U��TCFILE�LNRETURN �LAGETVERSION��4�� ����� �T����T�C�����(�|�*�T��CC�Z�: C���C � �B��U��TCFILE�LNRETURN�LNI�LCOUT �LAGETVERSIONy �4��� ����������T�C���, �.�T�C��, �.�T�C�g�T�C�.��..�T�CC��..�\g�T�C�g�T�C�.��..�T�CC��..�\g �H�r� ����� ! �B�� ��; �B� ����� ` �B�2r �B��U ��TCV1�TCV2�LCV1�LCV2�LNV11�LNV12�LNV21�LNV22�LN2NDDOT�4������������ � ��T�C ���*.dll�T�C ���*.dllo�h �vDllMatch��C2��L��L��L��L��C��C��M��M��(�p�T�C�� ��%C��0l�C����C���?�T�C�C��C�C� �C�C� �T �C�C� �% ��T �C������ �T �-��F ��r �vDllMatch���������� � �C���C���C���C������F ��>���5�C�TITLE "DLL Match: �� and ��"��%C�  �(���C �vDllMatch��U � �TCDLLLIST�TCDIRONE�TCDIRTWO�TCTABLE�LNONE�LNTWO�LNI�LNJ�LBSAME�LBSIZE�LBIDENT�LAONE�LATWO �VDLLMATCH�FILENAME�DT_MATCH�DS_MATCH�DI_MATCH�D_MATCH �VERSION_1 �VERSION_2�DETAIL_1�DETAIL_2�LCFILE�LAFONE�LAFTWO�FCOMPARE �GETVERSION �XMLVERSION�ALL�APPBROW�KILLb� �4��������T�C���T�C��T��� �<�� �B��U��TCFILE1�TCFILE2�LCF1�LCF2 �LBIDENTICAL��4��I�%C�� �C���.dbf0 %�C��@CCC]C]�dllIndex@ �� �dllIndex.dbf&����.dbf( �dllIndex.dbf��U� �TCVERSION���� �T�����C�dllIndex��%C �dllIndex.dbf0��Q���dllIndex��F�"�-��dllManager: Zip file �%C4��T��C���� �B���U� �LCZIPORIGINAL�KILL�DLLINDEX�FILENAME�ORIGINALQ�4���������T�CC]C]�T�C����%C�� ��T�C�����%���C� � �T�� �T������%C� ����  �T�C����%���C�  �T�� �T�����%C�, �T����A �T��� �B��U��TCSOURCE�TCMASTER�TCFOLDER �LCMAXNAME�LCNAME�LCFOLDER �GETZIPNAME2��4�� ��� ��$�T�C��� �dll????.zip�%����C��BCCC�@�� �B����U��TCFOLDER�LNFILES�LNI�LAFILES��4�����%C���0 *��B-��%C��a� I��B-��%C�������� �<�C�Failed to unpack DLL archive �� �dll Manager���Ba�U� �TCZIPNAME �TCZIPFOLDER�TCMASTER�ISDIRMEN �ACTIONUNZIP�MSGBOXW%�4������ �T�-=�C �1:wDllManagr!�Please wait|Unpacking DLL archive�'�C�Deltree�c:\temp\dllneper�4�C�Init �DLL files�Unpack �DLL archive��%C �Check dzEasy�2�%C�Make workspace�c:\temp\dllneper�7�%C�Copy specific zip to workspace�������%C �Unzip archive�)�%C�Check OKC��temp\��%�%C�*.*��temp\��a � �T�a������C�Clear workspace-���C �-1:wDllManagr��C�Release� �B��U � �TCARCHIVE�TCFOLDER�TCMASTER �LBSUCCESS�PWAIT�DIRLIST�UZIP �ISDLLDATA �PCUZIPDIR�FILECOPY%��4���BC�� �dllIndex.dbf0�U��TCFOLDER �dllCursor���� �dllActionH ���� �RemoveLocal ���� �GetVersionO���� �XmlVersion�����CompVer�����DllMatchC�����Fcompare]���� �GetDllIndex���� �GetZipLatest���� �GetZipName���� �GetZipName2 ���� �UnpackZip���� �ActionUnZip���� �IsDllData`����0q��q�q�aq�A�A�bA��A�S���XaQ��A��s��qA�dq���A�A��A��aQ�4�q��q�D�q�����q�!�!!A�A�QA�A�q�4���1q�����!A��!A���qA�r�q��A�A�Q!A���!�A�q��A�a��!A�A��4��q�1�1�A�A�4�q�q�R���A�4�q��q��QqA��`1���q��������A�4�12�sQ1QQ���A�q�DA�A�q�!Q�A�a4�����4�q�qaA�4�r��Qq�!�!A�A��4���!!��A�A�!��A�A�����A��4�q���AA��A�4��Aq�A�Aq�A�A�q�4��q��qA"qR�A�A�A�A�A�A�A�4�q�2�����������������<�������g���W�����q��������������������W��������n��#��������#��~&�� �����&��,��*�����-��X.��V�����p.��/��a�����0��#2��j�����:2��T5��{����l5��6������7��8����*��8��=����B��*=��j=�������%���J)������r.����*��/g,3J���4�������� �T�Ct �5���5��T�C����: ��T�C����: � �T��� �H�p� ��Update��T�C�������� �� ��Fill�"�T�C���� �C C � ��FillingZ-�T�C���<��>�</��> � �%�V�T�C��� � �Filling/U2�T�C���<��>�</��>-�a � �%��T�C��� ��Value1�%�<��>���</��>� -�T�C���<��>�</��> � �HG� C�tvParm3b�Cb� C�tvParm3b�NY�T�C�g� C�tvParm3b�D�5 ��T �C �STRICTDATEv �G(��T�C�# �G( �� C�tvParm3b�TI�T �C �STRICTDATEv �G(��T�C� �G( �� C�tvParm3b�L4�T�C�f�T �C�f�.T. �C�@�yes � C�tvParm3b�U�2�� �T���� ��Wrap�C� &�T�CC���� �C���� �6&� ��Expand ���href T�T�C���*� � �Expand all ���href �T�C���� ��Collapse�T�C������ � �Breakdown�T�C�������� � �Remove open%�T�C������ � �Remove allR�T�C���� � �Remove tag�T�C������ ��Is mark�T�C����@� ��Are tags matched���Are tags all matched �T�C���� � �Swop value8�T�C�������&� ��Remove unmatched tagsp�T�C���� �B��U� �TCCOMMAND�TVVALUE�TVPARM2�TVPARM3�TVPARM4�LNPARMS �LCCOMMAND �LCMODIFIER�LVRETURN�OCCASION�UPDXML�WRAPX�FILLING�LNSETSTRICTDATE �EXPANDHREF�ALLHREF�COLLAPSE �BREAKDOWN �REMOVEOPEN �REMOVEALL �REMOVETAG�ISMARKUP �ISTAGMATCH �SWOPVALUE �REMOVESOLO��4�����5�-�T�C����<��>�</��>�K�BC���<��>��</��>�<��>��</��>�U��TCHTML�TCTAG�TCVALUE�LCVALUE�FILLINGS��4����A�B�<�CC���� �� C�A6�>���</��>�U��TCT�TCC�TCMw� �4��� �5�� �T����T��~�+�� g� �T���T�C������ �B��U��TCS�TCA�LCOUT�LCLAST �COLLAPSE2  �4����5���� �5���5��T��<��>�T��</��>�T�C����T�C����T�C��� �H�'� ����� ��� � �T���� ���T�C������ ��+�T�C������ �� f�T�C������T�C����� �� ��� �T�C������T�C�����2�T��C�>'�T�C���=CC���\�� �� �B��U ��TCT�TCK�LNF1�LNF2�LNT1�LNCUT�LCHEAD�LCTAIL�LCR�COLLAPSE��4���� �5�� �T� ����T����+C�V���DECLARE &tcArray[ lnRows] ��(��#�&tcArray[ lnI] = c_markup[ lnI] � �B��U��TCSTRING�TCMARK�TCARRAY�LNROWS�LNI�C_MARKUP�BREAK�5������5��5�����J��(���� �T�- �T��� �T� ���(�|�T�����T�C��� �"�%C��� ���� �x�T � � � � �"�� �(��"�T ��C� ���T �����T �����T �����T������ �B ���U ��LNSOURCE�LNI�LNR�LNJ�LBBROKEN�LCT�LCSTART�LCMIDDLE�LCEND�LNROWS�C_MARKUP �BREAKTEXT�TCMARKc�4�������5����5� � � � � � �5���5��T��<��>�T��</��>�T�C����T �C����T �C��� �H�'� ��� �� � �� � �T�-� �� �T�-� ��8 �T�-� �� T �T�-(� �� �C�>C��>  �T�-� � � � �� �T�C���=�T�C��� �C�>�\�T�C�� �C�>\ �T�a�2�T �C��� �T�-� �( ��T �C��� ��T �C�C�� �=�% � �(�%�� �C�>C��>  �T�-�!��T�C���=�T�C��� �C�>�\�T�C�� �C�>\ �T�a�!���� �%�S �T�� �T�� �T��� �B��U��TCT�TCK�TCSTART�TCMIDDLE�TCEND�LCS�LCM�LCE�LNF1�LNF2�LNT1�LNCUT�LNHEADS�LNB�LCHEAD�LCTAIL�LBRZ�4�� �5�� �T���+�+�mailto:���MAILTO:� u�+�T�CC��mailto:���MAILTO:���+�+�http://���HTTP://� �+�T�CC��http://���HTTP://����T�C�� ���%�@���T��mailto:�+�T��http://�(�BC���a�href="���"��U��TCSTRING�LCTEMP1�LCTEMP2�WRAPX��4�� �5�� �5�� �� �T���!�T�C����a�laPackup� �T�����(���T�C����%�<a>���T��CC���a�����T������<� �B��U ��TCSTRING�LNR�LNI�LCOUT�LCROW�LAPACKUP �BREAKDOWN �EXPANDHREF�COLLAPSEw� �4��� �5�� �T����T��~�+�� g� �T���T�C������ �B��U��TCSTRING�TCTAG�LCOUT�LCLAST �REMOVEOPN2 �4����5�����5��� ��T�C��@�T ��<C�@�T��>�T�C ���T�C ���%���#�T��C�>C��\�� �T��� �H�'� ����� ���  �T���� ��8 �T���� ��V �T���� �� t �T���� � ��C��>  �T���� �� ��� #�T�C���=C���\�2 �T���� �B��U ��TCS�TCT �LCLSTRING�LCLTAG�LCR�LCTAIL�LNTAG1�LNTAG2�LNCLOSE�LNHEADS�LCTAG��4���5��� �T��� �T����T��~#�+C���� ��� � �T���T�C������ �B��U��TCSTRING�LCOUT�LCTAG�LCLAST�ISMARKUP �REMOVETAG �4����5����5�����T�C�<���%��X��B-��T�C���\�T�C� ��T�C�>��T�C�/� �H�t'� ����� ��� ��B-� ���B-� ����� 7�T�C��=�Ba� ��e�T�C��=�Ba�2t�B-��B-�U ��TCS�TCTAG�LCTAG�LCTAIL�LCREST�LNOPEN�LNCLOSE�LNSLASH�LNSPACE �4����5�����5��� ��T�C��@�T �C����� ��T��</C�@�>�T�C ���T�C ���%����T�C�C��\�%����T����� �T��� �H'� ����� ��� I �T���� ��g �T���� ����� %�T�C���=C���C �>\� ��  �T���(� ���C�>C��> %�T�C���C �>��C �>\� �� ��� pA�T�C���=C���C �>��C �>\C���C�>\�2 �5 � ��T �C �� �T���� �( ��T�C�� ��T�C �C��=�%� �(�%���C�>C��> C%�T�C���C �>��C �>\�A�T�C���=C���C �>��C �>\C���C�>\��!��%�T�C���=C���C �>\� �B��U ��TCS�TCT �LCLSTRING�LCLTAG�LCR�LCTAIL�LNTAG1�LNTAG2�LNTAIL�LNHEADS�LCTAG�FULLTAG�LNB� �4����5� �5���T�C��@�T�C�<C�@��T�C�>C��\�%�� ��C�> ��BC���\���B�<��>��U��TCSTRING�TCTAG�LCLS�LNATTAG �LNATCLOSE�LNATTAIL�4���5��%�<�� ��>�� �T�C�W�h �istagmatch��N��M��M��M��N��N ��N ��L ��L ��LI�r �istagmatch�� � �C �istagmatchN��a- �T �a�+ �m�F��- �T �-�~i�T � �� � �% �e �C���� �T�-�~ � �T�a��F��Q �istagmatch �F� �B� ��Ba��U��TCTEXT�LNSELECT �ISTAGMATCH�TAGID�TAGTEXT�TAGTAG �TAGATTRIB�TAGPRE �TAGCONTENT�TAGPOST �TAGPROCESS�TAGDONE�TAGERROR �LBPROCESS�TAGSPLIT�LBERROR�5���5�����5�����5 � � � �T� ��%�<� ��>� �T��C �istagmatchO�T�C���<�> �#�T�C�<�� �<� �$�%��/�C� �C� ��>�-�a�a��T�C�<��>��T�C�<��>>�T��</C�@�>�T�C�>�T�C�C�@+�%����� ���� �T�C��=!�T�C������\�T�C���\�J�( � � ��%C� uI�r �istagmatch� ���C �istagmatchN�a-�T �C �istagmatchO��%C� I�r �istagmatch� ���C �istagmatchN�a-�T �C �istagmatchO��%C� aI�r �istagmatch� ���C �istagmatchN�a-�T �C �istagmatchO��# �istagmatch��E�>����� �� �� ��-�a��>�-�a�a��� �>�-�a��U��LNRECORD�LCTAG�LCATTRIB�LCTEXT�LCTAIL�LNTAG�LNTAIL�LNLENTAG �LNLENTAIL�LNPRE �LNCONTENT�LNPOST�TAGTEXT�FILLING �TAGPROCESS�TAGDONE�TAGERROR�LCPRE �LCCONTENT�LCPOST�TAGID�TAGTAG �TAGATTRIB�TAGPRE �TAGCONTENT�TAGPOST��4������%�<��>��f� �%�D� �B���b��BC�����������"�B��C�����C C ��U��TCXML�TCTAG�TCVALUE�TBNOSWOP �SWOPVALUE�WRAPX��4�� �5���5� �T�� �T����T�C���<�>��+C� ��C�> ��T�C�>�T�C��<��>���T�C���<�>�� �B��U��TCTEXT�LCTEXT�LCTAG�LNTEXT�FILLING �SwopValue�����Wrapxm�����Collapse���� �Collapse2r ���� �BreakDown �����Break ���� �BreakText���� �ExpandHref�����AllHref���� �RemoveOpenW���� �RemoveOpn2���� �RemoveAllX�����IsMarkup%���� �RemoveTag�����FullTag&���� �IsTagMatch �����TagSplit"�����updXml'���� �RemoveSoloZ(����qr���q���qQ$��A�"��A�a��q������A�B���A�aa!!ba!aa!b!A��5��q�6��5�����1�aA��3��1�q�qQQQ�q�RRRQ�2qA��5�����1�A�q1A��3�1q�1���q!!�"A�2qqA�A��3�q��q�qQQQ�q�����b��"�qQq�A��a�A�A�A�A�A�����A��5�q���A�A�a!A�AA�5�q������q!A�A�A�q��7�����1�aA��5��11�A�QQ1��A��q�����2��A��6�q�����1�aA��7���11q�A�a111�qq�r�aq�aq��q�A�q�6��11�cQQA���A��q��T�R��!�qQqQ�A�A�A�A�TB��5��q����1A�4�q�q����q�A���A��A�A�A����A�q�Q���q�A�5�q�11��1A��AcaQA�A�A�W�A�A��2A�4�1���aA��"A�4�q��q����A��1�����������������M�������|���R����������U����������_���0�������{��� ������������f ��������| ��'��������'��*��A�����*��n-��X�����-��/��q����/��&3����!��<3��4����,��5��"8����G��88��A����x��A��rC��)����C��GH��8����\H��Q��_����Q��S������S��U����5��%���LE��M��T��H��<N��Rx,r����G+(�wwUtils�U��WWUTILS#� �����C��������U� �TCSETTING �TVNEWVALUE�THIS�SET� �����T�����T��C��v4�%C �tvNewValueb�C�CC�f�ON�OFF ��SET &tcSetting &tvNewValue ��%�SET &tcSetting TO (tvNewValue) ��U� �TCSETTING �TVNEWVALUE�THIS�CSETTING �VOLDVALUE� �����T�����T���1�%C�lvValueb�C�CC�f�ON�OFF w��SET &lcSetting &lvValue ��"�SET &lcSetting TO (lvValue) ��U� �LCSETTING�LVVALUE�THIS�CSETTING �VOLDVALUEx �4��������T��CC��������6 �T�CC� �C����6�%C��m��B-��T�C�wwEvalN�%C� �<�C,�USE (lcTable) EXCLUSIVE IN 0 ALIAS (lcAlias)��� �F�8�C(�USE (lcTable) EXCLUSIVE ALIAS (lcAlias)����T��� �%� V�Q������h �F�� �B��U��LCTABLE�LCALIAS �LCOLDERROR�LLRETVAL�LOEVAL�EXECUTECOMMAND�LERRORE ���������T��CC��������6�%C��C� �T����T�C����%���T�C���C����T�C�� �C���5�T�CC������6�T�C���%��B-��C�� �C��Ba� �B��U� �TCFILENAME�TCSTRING�LCRETVAL�LNHANDLE�LNSIZEo���-��������� �!�%C �loInput.Classb�Ch��T�C�� �N���T�C�RelationN��T�C���b��(�_�T�CC���@�%C�,��,�'1�,classlibrary,baseclass,comment,controls,objects,)�class,name,helpcontextid,whatsthishelpid,,�tag,picture,onetomany,childalias,childorder,/�parent,parentclass,relationalexpr,controlcount,��.��T�C�loInput.�b �H[*� C �ALEN(loInput.��)b�Nf!�%C �loObject.�b�UD�C��[1]� ��%�lnLength = ALEN(loInput.&lcField) )�DIMENSION loObject.&lcField[lnLength] ��( �b'�%C�loInput.��[z]b�O L�loObject.&lcField[z] = CopyObject(EVAL( "loInput." + lcField + "[z]")) �^6�loObject.&lcField[z] = EVAL("loInput." + lcField) ��� ��O!�%C �loObject.�b�U�C��� ��=�loObject.&lcField = CopyObject(EVAL("loInput."+lcField)) �2[!�%C �loObject.�b�U%�C��� ��2�loObject.&lcField = EVAL("loInput." + lcField) �� �B��U ��LOINPUT�LOOBJECT�LAFIELDS�X�LCFIELD�LCTYPE�LLCLASS�LNCOUNT�Z�LNLENGTH�CLASS �ADDPROPERTY��������%C�� A��T�C �lcObjNameN���T�C�RELATIONN�C�nCount���C�aRows(1)��� �T���~��T�������^J�����T��� �B��U� �LCOBJNAME�X�LALITEMS�LORESULT �ADDPROPERTY�AROWS�NCOUNTl ���� ��� �T�C�%C �wwFileCacheC��F��~�3�h �wwFileCache��Cx��T��M��-�C��@ �%C4�#�%�����C� ��>�C��� ��C� �T���>�T�C��� �6�r �wwFileCache���C��@C���%C� \ �F�� �B��U � �LCFILENAME�LNREFRESHSECONDS�LCOUTPUT�LNHANDLE�LCALIAS �WWFILECACHE�FILENAME�TIMEREAD�CONTENT�FILE2VAR��4���5� �T�C �F��T�C�&�%C��M� �Q����Q����� �Q� �F���B�U� �PCNEWNAME �LCOLDALIAS�LCDBF�4�������5���� � ��%C�k�*�BC����C����6�"�T�CC�>���,��6$�T�CC�>� ��z!x��6 �T�CC� ��z!x��6�T�C����%�� �B����T��C�>�T �C���\�T �C� ��% ��b�BC � �\��T �C� ��% ���BC � �\� �%��BC �\� �B���U ��LCSTRING�LCDELIM1�LCDELIM2�LCDELIM3�LLENDOK�X �LNLOCATION�LCRETVAL�LCCHAR �LNNEWSTRING�LNEND �LCNEWSTRINGS��������T�C�������a�!�BC���������U��LCSOURCE�LCSTART�LCEND �LCREPLACE �LCEXTRACT�EXTRACT �4������%C��C7��T��ADD��%C��N��B��T��CCC��`@�T�CC�PATHv@�%��ADD�%C���C�� � �B���*�%C�;���;�;��;�� �B����T���;���*�%C�;���;�;��; > �B���%�T�C��;�;���;�;�T�C�C�>\��SET PATH TO &lcOldPath �B��U��PCPATH�PCMETHOD �LCOLDPATHp� ����)�T�CCC��@�//�/� ��/���%� [��T�C��www.����BC�2�U��LCURL �LLNOSTRIPWWW�LCTEXT�EXTRACT��������T�C���b �T�����(�!�T�C �loObject.C���b�%C��UO�!�T�C �loObject.C����%��C �C�>P ��T�C�P=�6�T��C C CC���@� = CC���_�|`�T��C C CC���@� = CC �loObject.C���b�O ��Object��NULL6�� �B��U��LOOBJECT�X�LNCOUNT�LCOUTPUT�LAFIELDS�LCTYPE�LVVALUE. ���������� �T� �+a�T�C�<pre����T�C�/pre>����%����� ��!��T�C�����\,�T�C��<p>C C C C !�T�C��<br>C C �T��C�����T��� �B���U��LCHTML �LNCOLWIDTH�LCPRE�LCFIXED �LCPRECOUNT�LNAT1�LNAT2 �LNPRECOUNT����'�lcHTML = STRTRAN(lcHTML,"<","<") '�lcHTML = STRTRAN(lcHTML,">",">") )�lcHTML = STRTRAN(lcHTML,["],""") �B���U��LCHTMLy�����T��C��C C C �T��C��C C �T��C��C C �<p>�BC��C �<br>�U��LCHTML�����@�T��CC�tcUrlb�C�����http://www.west-wind.com/6.�T�CC�tcActionb�C����OPEN6 �T�CC� �C]��6.�| �ShellExecute �SHELL32.dll!�| �FindWindow�WIN32API(�BCC�9�������������U ��TCURL�TCACTION �TCDIRECTORY �SHELLEXECUTE�SHELL32�DLL �FINDWINDOW�WIN32API�CAPTION�������T��CC��������64�T�CC��C]�\ww_HTMLView.htm��6�C������ �%C �loWebBrowserb�O��C�������%C �_oscreenxb�O��C������C�����B�U��LCHTML�LCFILE �LOWEBBROWSER�FILE2VAR�NAVIGATE �_OSCREENX�GOURLy�������%C�R�4�T�CC��C]�\ww_HTMLView.xml��6� � ��BC���������U��LCHTML�LCFILE �LOWEBBROWSER�SHOWHTML�������%C�R�4�T�CC��C]�\ww_HTMLView.txt��6�$�%C��C ���MODI ��C������ �/��B��BC���������U��LCHTML�LCFILE �LOWEBBROWSER�FILE2VAR�SHOWHTML�����T�C�wwAPINW�T�C ��,�SOFTWARE\Microsoft\Windows NT\CurrentVersion�CurrentVersion���%�� ��%C���B-���Ba���%C�� �B� �BC�g�U��LLRETURNVERSIONNUMBER�LOAPI �LCVERSION�READREGISTRYSTRING,������T�CC���<��6�T�CC���>��6�%C����j� �B���'�T��C����BR�C C 2�T��C����P�C C C C '�T��C����br�C C 2�T��C����p�C C C C 1�lcHTMLText = STRTRAN(lcHTMLText," "," ") �T��x�+C� �T�C���������%C��!��T��C��������/�lcHTMLText = STRTRAN(lcHTMLText,"<","<") /�lcHTMLText = STRTRAN(lcHTMLText,">",">") �B���U� �LCHTMLTEXT�LCLTAG�LCRTAG �LCEXTRACT�EXTRACTN�����T�CC���@0_R+�B�#C�\C�\C�=�U� �LNRGBCOLOR�LCCOLORw���� ��� �T����(C��>g�/�T��CC���\�� �B��U��TCWORD�I�LNWORD-�������BC�����U��LCSTRING�LCSOURCE �LCREPLACE� �����T�C�CENTURYv�T�C�DATEv�G �G (�YMD �%�m��T��'C���'���T��{^C���}��SET DATE TO &lcDateMode �SET CENTURY &lcCentury �B��U��LTTIME�LLSQL �LCCENTURY �LCDATEMODE�YMD�LCDATE1�����%C��� �B��� �BC��*�U��LDDATE�����%C��� �B����%C���DTI��T�C���^� �T����0�BC�\�/C� \CC�\@�U��LTTIME �LCTIMESTAMP �H ��� C���;��T�C���� ����b��T�C]C� C�.APPC�]���T�CC�]�2��T�CC�]�%C �PROCEDURE����T�C�C�:�\�� �BC��U� �APPLICATION �STARTMODE�LCPATH �SERVERNAME����+�|�GetShortPathName�Win32API �T�����T�CX�T�C�>�T�C�������%��� �B����BC��=�U��LCPATH�GETSHORTPATHNAME�WIN32API �LCSHORTNAME�LNLENGTH�LNRESULT� �4����5����T�CC��,��6�T�C�����(��+�T�CCC���*� C����%��C �� CC��C������Ba�U� �LCFILESPEC �LNTIMEOUT�X�LNFILES�LOAPI�LAFILES�LDTIMEG���� ���%C����DH 9��B-��Ba�U��LCPATH�LATEMPm���� ����T�C���%�=� �B��T�C�� �C� �B��U� �LCFILENAME�LH�LNSIZE� ����+�T�CC�lcStyleb�C�C�f���6�%��WEBa��T��C���\�/���T��C���/�\� �B���U��LCPATH�LCSTYLEG����(3��%CC��]/��!�� �B���U��X�����������T�C�� ���� �T���(���%�� �'�T���C��C����\���T���C��\��T�C���C�>� �B��U��LARESULT�LCSTRING �LCDELIMITER �LNLASTPOS �LNITEMCOUNT�I���������%C��>�1�| �URLDecode �WWIPSTUFFQ �API_URLDecode�T�C����%����T��C���\�� �T����� �B����T��C���+� �T��� �+a�T�C�%��"�%�C��>�� 6�T�����!��T�C���\(�T��C���=CC�0x� �%C��>��T��C���\��!�� �B��U��LCTEXT�LNSIZE�LNLOC�LCHEX�LCRETVAL �URLDECODE �WWIPSTUFF �API_URLDECODE� ����������"�T�CC�������&��6�T�CC��� ��6�T�C�� �+'�T�C��&��=�&�BC����U� �TCURLSTRING�LCKEY�LNLOC�C2�CSTR �LCURLSTRING�LCRETVAL �URLDECODE���������%C��>��T�C��>�T��C���%�| �VFPURLEncode �WWIPSTUFF�T�C������%����BCC��`�\� �B��� �T�����(C��>�T�C���\:�%C�$�ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789�L�T����.��%�� x�T���+�.�$�T���%CCC��@0_R� �B��U��TCVALUE�LCRESULT�LCCHAR�LNSIZE�X �VFPURLENCODE �WWIPSTUFFP����������T�C�wwEvalN�BC�����������U��TCSTRING �TCDELIMITER �TCDELIMITER2 �LLNOASPSYNTAX�__LOEVAL �MERGETEXT�������%C��%��B-��T�C�wwAPIN,�T�C ����������\CLSID�����%C�� �T��� �T����B-�#�T�C ���������������%C�� �T�����Ba�U��LCPROGID �LCCLASSID�LCCLASSDESCRIPT�LOAPI�READREGISTRYSTRING�LCCLASSDESCRIPTION����������%C��0 5��B-� �T�-�%� 8�T�C]C�T�C�� �� �|�DllRegisterServer���%C����%� �&�R,:��� has been registered...� �T�a�*/�R,��� could not be registered...� ���"�|�DllUnregisterServer���%C���%� (�R,:��� has been unregistered...� �T�a�� �B��U� �LCSERVERPATH �LLUNREGISTER�LLSILENT�LLRETVAL�LCPATH �LCOLDPATH�DLLREGISTERSERVER�DLLUNREGISTERSERVER�����������9�T�CC�lcRunAsb�C����Interactive User6*�T��CC�lcProgIdb�C������6�T�CC������6�T�C�wwAPIN,�T�C ����������\CLSID����&�T�C ����������������%C��C� C�R,:�Invalid Class Id...�B�K�R,: �Configuring server security for C C ��C C ��%C� &#�%C�dcompermissions.exe0 4�R,$�Couldn't find dcompermissions.exe...�B�"�T�C�dcompermissions.exe�T�C���F�T ��RUN �� -runas �� �� � � > dcom.txt �&lcCMD �T �C�DCOM.TXT� �DCOM.TXT&�%C � �C�ERROR: �� "I�C��C  �Account:  �C C  �0�DCOM Permissionsx�B-��eC�%C ���SOFTWARE\Classes\CLSID\��AppId��a�� )�R,:�Unable to write AppID value...�B�5�%C ��������AppID\�C� C� a�� '�R,:�Unable to write AppID key...�B�-�C ��������AppID\�����a��2�C ��������AppID\��RunAs��a���-�R,:�DCOM security context set to: ��B�U��LCPROGID�LCRUNAS �LCPASSWORD�LOAPI �LCCLASSID �LCSERVERNAME�READREGISTRYSTRING�LCPATH �SHORTPATH�LCCMD�LCRESULT�DCOM�TXT �LCUSERNAME�WRITEREGISTRYSTRING������%C�� u� �T����T�C������%C�q��R,�Invalid Prog ID�B-��� �T����"�T�C�dcompermissions.exe�T�C����%C�"E�T��RUN �� -da �� set �� permit > dcom.txt �T��{E�T��RUN �� -aa �� set �� permit > dcom.txt �T�� �&lcCMD �T �C�DCOM.TXT� �DCOM.TXT&�%C � �C�ERROR: �� &I�C��C  �Account: �C C  �0�DCOM Permissionsx�B-��%C�E�T��RUN �� -dl �� set �� permit > dcom.txt �T��E�T��RUN �� -al �� set �� permit > dcom.txt �T�� �&lcCMD �T �C�DCOM.TXT� �DCOM.TXT&�%C � �C�ERROR: �� I�C��C  �Account: �C C  �0�DCOM Permissionsx�B-��B�U ��LCPROGID �LCUSERNAME �LCERRORMSG �LCCLASSID�LLRESULT �ISCOMOBJECT�LCPATH �SHORTPATH�LCCMD�LCRESULT�DCOM�TXTK ������������ �T�X �T�Z�T�#�|�GetActiveWindow�win32api#�|�GetActiveWindow�win32api�|�GetDC�win32api$�| �GetDeviceCaps�win32api�T�C ��T�C�� ��T�C���� ��T�C���� ��T���� �T��� �B�U � �LNXFACTOR �LNYFACTOR �LN_X_PIXELS �LN_Y_PIXELS�LN_TWIPS �LN_PARTIAL_X �LN_PARTIAL_Y�LN_HWND�LN_HDC�GETACTIVEWINDOW�WIN32API�GETDC �GETDEVICECAPS"����T�C�wwAPIN�%�� �b�T�C�HKLM5�SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon�DefaultPassword����b�T�C�HKLM5�SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon�DefaultUserName����%C� �B��� �B��U� �LLUSERNAME�LOAPI�LCPASS�READREGISTRYSTRINGT����J�BCCX�Please enter your password�Password Entry�PASSWORD��U� �LCMESSAGE �INPUTFORMJ����������5����%CtK� �T ���^� �T ���T��CC��������6)�T�CC�� �Please enter��6�T�CC��9 ���6�T�CC��,��6!�T�CC� ����6�T�CC���@K��6�T �C� �T����T�C�frmInputN�T� ���T� ���T� ���T����T����%��PASSWORD�T���@K�T����*� �C���%C�pcResultb�C%�T��C�`�: �T���� �B���U��LCVALUE �LCMESSAGE �LCCAPTION �LNFORMWIDTH �LNFIELDWIDTH�LCFORMAT �LCCANCELVALUE�PCRESULT�O �PCCANCELVALUE�CAPTION�LCTYPE�WIDTH �NFIELDWIDTH�CMESSAGE�CFORMAT�TXTINPUT �PASSWORDCHAR�SHOW��T���9��T��������T��������T��� � ��U�T�� � � ���%C�� � ��%C�@�� ����T��� ��� ����T������ ����U��THIS�ICON�TXTINPUT�WIDTH �NFIELDWIDTH �LBLMESSAGE�CAPTION�CMESSAGE �CMDCANCEL�LEFT�THISFORM�CMDOK�CFORMAT�FORMAT �INPUTMASK ��<���U��THISFORM�����%C���T��C�pcResultb �H:��� ���CMZ� �T���� ���NIBY��T�  � ���DT��T���������� ���L� �T�-��� �T����<��U��LCTYPE �PCCANCELVALUE�PCRESULT�THISFORM*�������C�������B�U��LNBYTESDOWNLOADED �LNBUFFERREADS�LCCURRENTCHUNK�THIS�PARENT �VPROGRESS�InitF�������Set�������Destroyx����� �OpenExclusiveS�����File2Var���� �CopyObject�����CursorToObjectArrayi ���� �CacheFile �����WrCursor �����Extract.���� �ReplaceTextr�����Path���� �DomainName���� �PropertyDumpi���� �FixPreTags8�����FixHTMLForDisplay���� �DisplayMemoJ�����GoUrl�����ShowHTMLC�����ShowXML�����ShowText&�����IsWinnt���� �StripHTML.���� �HTMLColor���� �CharToBin�����StrTranC ���� �TimeToCStrict �����DateToC!�����TimeToC"�����GetAppStartPath"���� �ShortPath#���� �DeleteFiles$�����IsDir�&�����FileSize[&�����Slash&���� �ProgLevel'���� �AParseString'���� �URLDecode)�����GetURLEncodedKey+���� �URLEncode,���� �MergeText .���� �IsCOMObject.�����RegisterOleServer/�����DCOMCnfgServer)2�����DCOMLaunchPermissionsm7���� �TwipsFactor};�����GetSystemPasswordd=���� �GetPassword>���� �InputForm'?�����Show:B���� �cmdOk.ClickC�����cmdCancel.ClickC�����OnFTPBufferUpdateD����,� ���� ����� ����� ������U��CSETTING �VOLDVALUE �T���T� �Please enter: �T��� �T�� �T�� �T�Z�T�, �T�-�T��frmInput �T � �T �a �T � �T � �T �- �T � �T�-�.�Q��a� �Message Text:��� �Q� �lblMessage��Tahoma�{�.�Q���pcResult����u��txtInput��Tahoma�a��.�Q��7�����F��OK�a��Tahoma��-��cmdOK�.�Q��7���K��F��\<Cancel��Tahoma��a� �cmdCancel ��2��� ��3��� ��4����U� �NFIELDWIDTH�CMESSAGE�CFORMAT�TOP�LEFT�HEIGHT�WIDTH �CONTROLBOX�NAME �WINDOWTYPE �AUTOCENTER �SHOWWINDOW �BORDERSTYLE �MINBUTTON �MAXBUTTON �LBLMESSAGE�LABEL�AUTOSIZE�CAPTION�FONT�FONTSIZE�TXTINPUT�TEXTBOX �CONTROLSOURCE�DEFAULT�CMDOK �COMMANDBUTTON�THISFORM�FONTNAME�CANCEL �CMDCANCEL � ��5����U���wwEnv�CustomuI�����frminput�formI�����myFtp�wwFTPM����`1��Q7��"C�QA�7���!A�@1����q�A�b��A��a��A��5���R�#!Q!�A���!q�A���q�A��4�|�2�A�SqAdA�A��qA�Tqq�bA�A�#A��A�#A�A��4�{��aA���!A��4����q��4B��4A���!bB��A��5�}�q������A�r��B�3�}�A�#A"�A�2#"QA�&QA���A���1�15��q�RA��A�A�BQB�A��A�a��A�QA��5���A��4�x��R�q!A�a�A�A��5��q��A�A�RA��4�0q�rq�3�v�r`1�`�4��A"�A��B�B�4���AA��a3���AA�B!�A�A�b4�u�Rs��q��q�A�A���A��6��b�A�s!q!��A�A�A��3�w�5�w���A��3�� 1��b1a����A��3�w���A��6�w���A�b��A�4��1S!Q�QA�A��5�w����A��4���RrQA�A�r�5�w��q�A�q�3�v���!�A�R��5��Aq�qA��4�vAA�A�A��4���b��rr�A�A��3�w�13"Q��A��A�s��2#A�A�sa�A�A�A��5��q"qs�5�x�14�aUb1A��A��QA�A�!!A�A�BA��P1�`1q�a6���q�A�R���q�A�4��A�r�3���q�A���!�"�aA���A���""�A��A�A��3��1SbA�A�1AA�A�!!c��bq�A��5A�A�UqA�A�'A�A�1���a�q�A���A�"!�R��R�A���bq�A��R��R�A���bq�A�B�8�����21A�!baA�;�q�R�!�!A���A��<�q�5�q�q����A��!AA�����A��P1�!aa1a�aA�A�2�q�2�q��q�1�Q11!�A���A�q�9��AA�1������1��������Q������� +���01��4��������������������H����%������)��&��.����������@������4 ����`���/���#�������G���0�������q��� ��z$�������$��Q*��8�����*��.��n�����.��7�������7��W8�������8��<�������<��c?�������|?��C��#�����C��H��B�� ��!H��J��d����J��aQ������sQ��W����$��X��Y\����2��m\��_�� ��9��_��Vc����D��jc��)f��7��S��?f�� l��U��j�� l��|n����n��n��p����v��p��s����z��s��u������/u��w������3w��y������z��d~������z~��4��%����L��]��=����Ƅ��q��X������\��g����n����~������p��������h������~������ ����̙������)������1��������7��������H��ٴ��Ϻ����g������ ��������������D������b��������$��������"���� �������������������� ������"��������&���������-�� ����J��F��u������0 ���m�������������������PLATFORM���C������������������UNIQUEID���C ��� ���������������TIMESTAMP��N��� ���������������CLASS������M������������������CLASSLOC���M!������������������BASECLASS��M%������������������OBJNAME����M)������������������PARENT�����M-������������������PROPERTIES�M1������������������PROTECTED��M5������������������METHODS����M9������������������OBJCODE����M=�����������������OLE��������MA������������������OLE2�������ME������������������RESERVED1��MI������������������RESERVED2��MM������������������RESERVED3��MQ������������������RESERVED4��MU������������������RESERVED5��MY������������������RESERVED6��M]������������������RESERVED7��Ma������������������RESERVED8��Me������������������USER�������Mi������������������ ����������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������� COMMENT Class ������������������������������������������������������������������������������� WINDOWS _RSF1BV09P 661345687��a��S��������������+�������������������������*��8���������� COMMENT RESERVED ������������������������������������������������������������������������������ WINDOWS _S4V1AH8YO 675178905 ��J�� ��)������ ������2�� �����������t��"����������������/ ������ COMMENT RESERVED ������������N������������������������������.���������������������������������� WINDOWS _RRH1DWTNG 690648672������3��"������ ������Q������������ �������������������� COMMENT RESERVED ������������v������������������������������������������������������������������ WINDOWS _RVI03274G 729423083�������������� ����dK��U(���������������������� ���������� COMMENT RESERVED ������������������������������������������������������������������������������ WINDOWS _RRH1DWTNG 742112186 �� �� �� ������/������B����������� ��}������������ ������������ COMMENT RESERVED ������������������������������������������6(���������������������������������� WINDOWS _RZW1FBE3Y 742369059 �� ��! �� ������0������Q=�o��������� ����V���������� ��["�� ������ COMMENT RESERVED ������������ ������������������������������(���������������������������������� WINDOWS _0FJ1DT3YH 742564038������ ��{ �����������up��7a������������p��HR���������������������� COMMENT RESERVED ������������:������������������������������'���������������������������������� WINDOWS _RSF1BV09P 749124300������ �� ������%^��D ���@����������A��y����������1��_������ COMMENT RESERVED ������������_������������������������������'�����������������������������������}���������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������������VERSION = 3.00������ wwhttpfile������Pixels������HTTP File transfer class. Allows sending of files from a VFP client to a Web Connection back end server. Both client and server methods are provided.������Class������1������ ahttpdata������ wwhttpfile������=chttplink = wc.wcs?wwHTTPData~SendFile Name = "wwhttpfile" ������custom������ wwipstuff.vcx������ ahttpdata������ authorize ������Pixels������Pixels������ ..\qj\������ ..\qj\������Abstract HTTP transfer class������Class������1������custom������ ahttpdata������custom������Class������ wwhttpcom������ wwipstuff������1������1������1������ wwhttpasync������cpollfile nstartseconds ������Pixels������ wwipstuff.bmp������ wwipstuff.bmp������Class������1������timer������custom������ wwhttpcom������wwsocket������ wwipstuff.vcx������ ..\wconnect.h������1������1������Pixels������ ..\wconnect.h������clog ������ wwipstuff.bmp������Class������ wwipstuff.bmp������ wwhttpasync������timer�����cforcedsavepath Directory (physical or relative) used to save an uploaded file to. If specified this directory is used to save files, otherwise the client may determine where to save the file with filespeck. RECOMMEND YOU SET THIS VALUE! ctargetfile Filename to save to on the server only. If cForceSavePath is not set the client may specify a full path. Otherwise, only the file portion will be used and appended to the forced path. csourcefile Filename used on the client to send file. Physical (DOS) path on disk. *sendfile Method called by client to upload a file to the server. *s_sendfile Server Request Method that is can handle a file send with SendFile. Fully self-contained as a WC process method. ������Pixels������Class������custom������ wwipstuff������ZAllows downloading of HTTP data in the background. Event notifcation occurs on completion.������wwsocket������custom������custom������wwftp������Pixels������ ahttpdata������ ..\wconnect.h������Class������custom������ wwipstuff������wwftp������custom������ ..\wconnect.h������Hcdllpath hhttpsession hipsession lhttpcanceldownload setproxylogin ������ wwipstuff.vcx������custom������ wwipstuff.vcx������ohttp = .NULL. cservername = lsecure = .F. cusername = cpassword = cerrormsg = nerror = 0 lerror = .F. chttplink = wc.wcs?wwHTTPData~Execute nmaxbuffersize = 0 liszipped = .F. Name = "ahttpdata" ������Height = 16 Width = 100 cprogid = cmethod = clocation = cresultbuffer = crequestid = cexcludedobjects = scripting.filesystemobject,scripting.file, crequestbuffer = chttplink = wc.wc?wwHTTPData~HTTPCom Name = "wwhttpcom" ������ wwhttpdata������ ahttpdata������Class������Pixels�����Height = 23 Width = 23 Enabled = .F. Interval = 1000 oip = .NULL. cserver = clink = cusername = cpassword = lsecure = .F. lbusy = .F. cpollfile = ntimeout = 30 cresultbuffer = lerror = .F. cerrormsg = nstartseconds = 0 nbuffersize = 65535 Name = "wwhttpasync" ������ntimeout = 10 nerror = 0 cerrormsg = lstripnulls = .T. llogsession = .F. clogtext = olog = .NULL. nbuffersize = 512 nlastreadsize = 0 Name = "wwsocket" ������ wwhttpdata������ ..\wconnect.h�����CPROCEDURE authorize LPARAMETER lcAuthUser, loProcess lcAuthUser=UPPER(IIF(EMPTY(lcAuthUser),"",lcAuthUser)) lcUserName=UPPER(Request.GetAuthenticatedUser()) IF !EMPTY(lcAuthUser) IF (lcAuthUser = "ANY" AND EMPTY(lcUserName)) AND lcUserName # lcAuthUser loHeader = CREATE("wwHTTPHeader") loHeader.DefaultHeader() loHeader.Authenticate(Request.GetServername(),"Error: Authentication failed...") Response.Write(loHeader.Getoutput()) RETURN .F. ENDIF ENDIF ENDPROC PROCEDURE Init THIS.oHTTP=CREATE("wwIPStuff") ENDPROC �����oip wwIPStuff object used to create connection and file access cserver clink cusername cpassword lsecure lbusy cpollfile The temporary result file that holds the HTTP result before returning it to you. ntimeout The timeout for the request in seconds. When timeout is up CancelRequest() is called. cresultbuffer lerror cerrormsg nstartseconds nbuffersize Size of the result buffer. Set this to 0 to allow any size buffer to be returned. *navigatecomplete *startrequest *addpostkey *cancelrequest ����� vPROCEDURE sendfile LPARAMETER lcFileName LOCAL lcFileName, lcZipname, lcFileText, lnResult, lcbuffer, lnSize THIS.lError = .F. lcFileName=IIF(EMPTY(lcFileName),THIS.cSourceFile,lcFileName) IF THIS.lIsZipped lcZipname = SYS(2023) + "\WWZ_" + SYS(3) + ".zip" IF THIS.oHTTP.ZipFiles(lcZipName,; lcFileName) # 0 THIS.cErrorMsg = "Error: unable to zip the file or file not found." THIS.lError = .T. THIS.nError = 0 RETURN .F. ENDIF lcFileText = THIS.oHTTP.EncodeDBF( lcZipName ) ERASE (lcZipName) ELSE lcFileText=THIS.oHTTP.EncodeDBF(lcFileName,.T.) ENDIF IF EMPTY(lcFileText) THIS.cErrorMsg= "Error: Couldn't find the file..." THIS.nError = 0 THIS.lError = .T. RETURN .F. ENDIF lnResult = THIS.oHTTP.HTTPConnect(THIS.cServerName,THIS.cUsername,THIS.cPassWord,THIS.lSecure) IF lnResult # 0 THIS.cErrorMsg = THIS.oHTTP.cErrorMsg THIS.nError = lnResult THIS.lError = .T. RETURN .F. ENDIF THIS.oHTTP.nHTTPPostMode = 2 && Send Multipart form THIS.oHTTP.AddPostKey("txtFileBuffer",lcFileText) THIS.oHTTP.AddPostKey("txtFileName",THIS.cTargetFile) THIS.oHTTP.AddPostKey("txtMaxBufferSize",LTRIM(STR(THIS.nMaxBufferSize))) IF THIS.lIsZipped THIS.oHTTP.AddPostKey("IsZipped","True") ENDIF lcbuffer = SPACE(THIS.nMaxBufferSize) lnSize = THIS.nMaxBufferSize lnResult = THIS.oHTTP.HTTPGetEx(THIS.cHTTPLink,@lcBUffer,@lnSize) IF lnResult # 0 THIS.cErrorMsg = THIS.oHTTP.cErrorMsg THIS.nError = lnResult THIS.lError = .T. RETURN .F. ENDIF IF lcBuffer # "OK" THIS.cErrorMsg = lcBuffer THIS.lError = .T. THIS.nError = 0 RETURN .F. ENDIF RETURN .T. ENDPROC PROCEDURE s_sendfile LPARAMETER loProcess, lcAuthUser *** Check for Authorization - if it fails sends Authentication request *** or failure message IF !THIS.Authorize(lcAuthUser, loProcess) RETURN .f. ENDIF THIS.lError = .f. lcFileText = Request.GetMultiPartFormVar("txtFileBuffer") llIsZipped = IIF(EMPTY(Request.GetMultiPartFormVar("IsZipped")),.F.,.T.) lcTargetFile = Request.GetMultiPartFormVar("txtFileName") IF EMPTY(lcTargetFile) OR llIsZipped *** Retrieve the filename from the encode header lcTargetFile = TRIM(SUBSTR(lcFileText,6,40)) ENDIF *** Override the save path explicitly *** NOTE: always overridden in FULL - no relative o