Data from an application created using Visual Basic in Visual studio out to Word Document 2010

Question

1.00/5 (1 vote)

See more:

Ok Now I got the generate my data from my application Now I am having trouble formatting Example:
I want to put a nice graphic as the header
also I would like to get data from my text boxes. right now I can get one textbox entry. when I do two the text appears with no spaces. here is my code

VB

'Insert a paragraph at beginning of the document
oPara1 = oDoc.Content.Paragraphs.Add
oPara1.Range.Text = Customer_Data.CustomerTextBox.Text & Customer_Data.CountyTextBox1.Text
oPara1.Range.Font.Bold = True
oPara1.Format.SpaceAfter = 24 '24 pt spacing after paragraph.
oPara1.Range.InsertParagraphAfter()

Posted 14-Aug-12 17:37pm

icecode

Updated 14-Aug-12 18:07pm

JF2015

v2

Add a Solution

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Kenneth Haugland · Answer 1 · 2012-08-14T23:27:00

Solution 1

This is simular to the example here:
http://support.microsoft.com/kb/316383[^]

So are your textboxes empty?

Posted 14-Aug-12 23:27pm

Kenneth Haugland

Comments

icecode 17-Aug-12 0:15am

Sorry for the delay but yes the text boxes are empty. I am about to check out your link. thank you.

icecode 17-Aug-12 1:57am

Ok now I like the idea to use template but it wont transfer over any other ideas here is a pasting of my code if there are any tips:

'Start word Document template
oWord = CreateObject("Word.Application")
oWord.Visible = True
oDoc = oWord.Documents.Add("C:\Program Files\QC7\Field Quality Report.dotm")

oDoc.Bookmarks.Item("District").Range.Text = Customer_Data.CustomerTextBox.Text