Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
VC++ or VB to VFP Code
Message
De
15/12/2005 17:37:32
 
 
À
15/12/2005 17:35:11
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Divers
Thread ID:
01078483
Message ID:
01078496
Vues:
18
Yikes. I guess that'll take alittle more research on my part! Thanks Bruce.

>Take a look at the BSTR section here
>
>http://www.codeproject.com/string/cppstringguide2.asp
>
>you probably need something like the STRUCT class to composr BSTRs in VFP.
>
>HTH
>
>Bruce
>
>>Trying to take help for VC++ and VB code and convert to VFP code.
>>
>>Here is the method help (from Gnostice activex pdf toolkit):
>>
>>
>>The MergeDocs method is used to merge a list of PDF documents into a current document.
>>
>>Syntax
>>   [VC++]
>>        void MergeDocs(const VARIANT& DocList)
>>   [VB]
>>        Sub MergeDocs(DocList)
>>Parameters
>>   DocList
>>   [in] Specifies list of filenames of the PDF documents to be merged. It is a VARIANT that contains a list of BSTRs (each BSTR being absolute pathname of the file to be merged).
>>
>>Here are some examples of my trials:
>>
>>*--Example of usage in my trials
>>firstform = "c:\foxpro\tmp\_abcd.pdf"
>>nextform = "c:\foxpro\tmp\_abcd_2.pdf"
>>
>>*--Trial one results in an OLE error code 0x8000ffff: Castastrophic failure
>>IF FILE(FULLPATH(nextform))
>>   IF nextform <> firstform
>>	IF FILE(FULLPATH(firstform))
>>  	   doclist = FULLPATH(firstform) + " " + FULLPATH(nextform)
>>           *Doclist now equals "c:\foxpro\tmp\_abcd.pdf c:\foxpro\tmp\_abcd_2.pdf"
>>	   WITH ofrmPDFTool.oPDFTool
>>		.MergeDocs(doclist) && results in Castastrophic failure error
>>	   ENDWITH
>>	ENDIF
>>   ENDIF
>>ENDIF
>>
>>*--Trial two results in an OLE error code 0x8000ffff: Castastrophic failure
>>IF FILE(FULLPATH(nextform))
>>   IF nextform <> firstform
>>	IF FILE(FULLPATH(firstform))
>>  	   doclist = FULLPATH(firstform) + "," + FULLPATH(nextform)
>>           *Doclist now equals "c:\foxpro\tmp\_abcd.pdf,c:\foxpro\tmp\_abcd_2.pdf"
>>	   WITH ofrmPDFTool.oPDFTool
>>		.MergeDocs(doclist) && results in Castastrophic failure error
>>	   ENDWITH
>>	ENDIF
>>   ENDIF
>>ENDIF
>>
>>*--Trial 3 results in an OLE error code 0x8000ffff: Castastrophic failure
>>IF FILE(FULLPATH(nextform))
>>   IF nextform <> firstform
>>	IF FILE(FULLPATH(firstform))
>>  	   doclist = FULLPATH(firstform) + ";" + FULLPATH(nextform)
>>           *Doclist now equals "c:\foxpro\tmp\_abcd.pdf;c:\foxpro\tmp\_abcd_2.pdf"
>>	   WITH ofrmPDFTool.oPDFTool
>>		.MergeDocs(doclist) && results in Castastrophic failure error
>>	   ENDWITH
>>	ENDIF
>>   ENDIF
>>ENDIF
>>
>>*--The 4th trial results in an OLE error code 0x8002000e: Invalid number of parameters
>>IF FILE(FULLPATH(nextform))
>>   IF nextform <> firstform
>>	IF FILE(FULLPATH(firstform))
>>	   WITH ofrmPDFTool.oPDFTool
>>		.MergeDocs(firstform,nextform) && results in invalid number of parameters error
>>	   ENDWITH
>>	ENDIF
>>   ENDIF
>>ENDIF
>>
>>
>>Is there something wrong with the syntax in calling the mergedoc method? Should the documents be separated by semicolons, commas, or something else?
>>
>>
.·*´¨)
.·`TCH
(..·*

010000110101001101101000011000010111001001110000010011110111001001000010011101010111001101110100
"When the debate is lost, slander becomes the tool of the loser." - Socrates
Vita contingit, Vive cum eo. (Life Happens, Live With it.)
"Life is not measured by the number of breaths we take, but by the moments that take our breath away." -- author unknown
"De omnibus dubitandum"
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform