Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
VC++ or VB to VFP Code
Message
From
15/12/2005 17:37:32
 
 
To
15/12/2005 17:35:11
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9
OS:
Windows XP SP2
Network:
Windows 2003 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01078483
Message ID:
01078496
Views:
17
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"
Previous
Reply
Map
View

Click here to load this message in the networking platform