Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
May be Word issue; suppress Confirm Data Source window
Message
 
 
À
04/05/2007 10:12:31
Jay Johengen
Altamahaw-Ossipee, Caroline du Nord, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Versions des environnements
Visual FoxPro:
VFP 8 SP1
Divers
Thread ID:
01222455
Message ID:
01222497
Vues:
17
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
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform