Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
May be Word issue; suppress Confirm Data Source window
Message
 
 
To
04/05/2007 10:12:31
Jay Johengen
Altamahaw-Ossipee, North Carolina, United States
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Environment versions
Visual FoxPro:
VFP 8 SP1
Miscellaneous
Thread ID:
01222455
Message ID:
01222497
Views:
22
Not sure, if this is 100% relevant, but check Re: Automating a mail merge Thread #1193945 Message #1194183

>>This may be a Word (2000) issue, but I need to suppress the Confirm Data Source window in a merge document and default it to use Foxpro. Anyone know how to do this? Thanks!
>>
>>Update:
>>
>>This is the code in Foxpro that is making the call...
>>
>>
>>WITH .ActiveDocument.MailMerge
>>	.OpenDataSource(m_temp_dir+'FeeSlip.dbf')
>>	.Execute()
>>ENDWITH
>>
>>
>>Maybe there is something else I can send with it?
>
>Update: Ran a Word macro and what I want to do is send the Connection string, but the macro is VB code. Is there anything anywhere that shows the syntax for Foxpro? The first section below is the Foxpro code I'm working with, and after that is the result from the Word macro (formatted for readability). Thanks!
>
>
>WITH .ActiveDocument.MailMerge
>	.OpenDataSource(m_temp_dir+'FeeSlip.dbf')
>	.Execute()
>ENDWITH
>
>
>    ActiveDocument.MailMerge.OpenDataSource ;
>    	Name:= "C:\Workarea\temp\feeslip.dbf", ;
>    	ConfirmConversions:=False, ;
>    	ReadOnly:= False, ;
>    	LinkToSource:=True, ;
>    	AddToRecentFiles:=False, ;
>    	PasswordDocument:="", ;
>    	PasswordTemplate:="", ;
>    	WritePasswordDocument:="", ;
>    	WritePasswordTemplate:= "", ;
>    	Revert:=False, ;
>    	Format:=wdOpenFormatAuto, ;
>    	Connection:= "DSN=FoxPro Files - Word;UID=;PWD=;SourceDB=C:\Workarea\temp;SourceType=DBF;Exclusive=No;BackgroundFetch=No;Collate=MACHINE;Null=Yes;Deleted=Yes;";
>    	SQLStatement:="SELECT * FROM feeslip.dbf", ;
>    	SQLStatement1:=""
>
If it's not broken, fix it until it is.


My Blog
Previous
Reply
Map
View

Click here to load this message in the networking platform