Introduction<o:p>
Well most of u guys already know the basic stuff, so i go from the 'Start Word Application Class'. This code will start Word 2003, create a mailmerge document and will merge the data recieved from a DSN source to this document <o:p>
<o:p>
The start<o:p>
Create a Word template (.dot) file with mergefields like i did. Or use a .doc file, whatever you want. My mergefields are called 'bedrijfsnaam','adres' and so on. Its dutch so forget about the names :) <o:p>
Now create the reference to Office Word 2003 v11.0 object. Now I have the code below to make things easyer.<o:p>
using Word = Microsoft.Office.Interop.Word;
<o:p>
Now create a User-DSN with the name 'dsn_data'. Thats what i dit so you'll be able to find the name back in the code. This connection can be to any datasource you want.<o:p>
<o:p>
The real thing<o:p>
Now lets create the code for our application Create the definitions:<o:p>
Word.Application wrdApp;<o:p>
Word.Document oDataDoc;<o:p>
Word.MailMerge wrdMailMerge;<o:p>
Object oMissing = System.Type.Missing;<o:p>
Object oFalse = false;<o:p>
Object oTrue = true;<o:p>
Object oName = Environment.CurrentDirectory + @"\template.dot";<o:p>
Object oFileName = Environment.CurrentDirectory + @"\saved.rtf";<o:p>
Object oFileFormat = Word.WdSaveFormat.wdFormatRTF;<o:p>
<o:p>
// Starting the Word Application<o:p>
wrdApp = new Word.ApplicationClass();<o:p>
wrdApp.Visible = true;<o:p>
wrdApp.WindowState = Word.WdWindowState.wdWindowStateMaximize;<o:p>
// Open the template<o:p>
oDataDoc = wrdApp.Documents.Add(ref oName, ref oFalse, ref oMissing, ref oMissing);<o:p>
oDataDoc.Activate();<o:p>
// Document 2 mailmerge format<o:p>
wrdMailMerge = oDataDoc.MailMerge;<o:p>
wrdMailMerge.HighlightMergeFields = false;
wrdMailMerge.ViewMailMergeFieldCodes = 0; //this is for showing the data instead of fieldnames
<o:p>
<o:p>
The data part<o:p>
// The data part<o:p>
Object oConnection = "DSN=dsn_data"; //The DSN connection name<o:p>
Object oQuery = "SELECT * FROM some_table"; // The query to get data from the DSN<o:p>
Object oSubType = Word.WdMergeSubType.wdMergeSubTypeWord;<o:p>
//Open the data source and merge the fields<o:p>
wrdMailMerge.OpenDataSource("", ref oFileFormat, ref oMissing, ref oMissing, ref oTrue, ref oMissing,ref oMissing, ref oMissing, ref oFalse, ref oMissing, ref oMissing, ref oConnection, ref oQuery, ref oMissing, ref oMissing, ref oSubType);<o:p>
wrdMailMerge.SuppressBlankLines = true;<o:p>
<o:p>
// Save document<o:p>
oDataDoc.SaveAs(ref oFileName, ref oFileFormat, ref oMissing, ref oMissing, ref oTrue, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing, ref oMissing);<o:p>
oDataDoc.Saved = true;<o:p>
<o:p>
// Unload objects from the memory<o:p>
wrdMailMerge = null;<o:p>
oDataDoc = null;<o:p>
wrdApp = null;
This member has not yet provided a Biography. Assume it's interesting and varied, and probably something to do with programming.