FORM to TXT, Query to TXT, current form to text file

[gcoaster]

Hello Access Guru's

After pulling out most of my hair last year getting access to work the way I wanted it to to perform the simplest tasks, I am back at it and aim to not to pull out the rest!

What I am Aiming for
» I have a FORM that has a Query as its source.
» I want to create a cmd button on the form that exports the data on the current form to a txt file and then opens the or a txt file that has certain textbox values from the current form. ( reason for the form data is some of the texbox's have combined info from more then one textbox controls on form... for instance

Me.txtImageUrl = [txtImageHttp] & "" & Left([txtImageId], 3) & "/" & [txtImageId] & "" & [txtJpg]

» data in txt file is formatted in a way where each field value is on a separate line or | delimited.. you know, so it looks nice, nut just a dump seperated by commas,,,,
» More then one solution would be cool..
» and ah yes, Keep it simple.


thanks you guys are great.. M@

[DonRayner]

As a start you could look at the OpenTextFile and OpenAsTextStream methods. Also check out the #write and #print statements.

[gcoaster]

Google.com » site:bytes.com/topic/access/answers/ #print AND #write

yields all sorts of results... im starting to reach for my hair.

Examples anyone?

.

[DonRayner]

@gcoaster
Here is a quick example on how to use #print

Dim stName As String
stName = "c:/test.txt"
Open stName For Output As #1
Print #1, Me.TextBox1
Print #1, Me.TextBox2
Print #1, Me.Textbox3
Close #1

And #Write

Dim stName As String
stName = "c:/test.txt"
Open stName For Output As #1
Write #1, Me.TextBox1
Write #1, Me.TextBox2
Write #1, Me.Textbox3
Close #1

The #write will include quotes around the text and the #print won't. However I believe that with the #print there may be times that you need to do a Ltrim() to remove leading space. Replace the "Output" part with "Append" If you want to append to the end of an existing file.

[gcoaster]

IT WORKS! IT WORKS

Very Cool, Very cool...

one more question,
It worked, but data is dumped and all scrunched together..
How would I add or rather insert a, lets say a return, <p></p>, line space if you may between each line? or a separator like --------------------
like this

contents of TextBox1
------------------------------------------------------
contents of TextBox2

contents of TextBox3



Or better yet, like this

NAME: | contents of TextBox1
------------------------------------------------------
ADDRESS: | contents of TextBox2

EMAIL | contents of TextBox3


AND what line of code would I use to open the Test.txt file after it exports?

thank you so much,
M@

[gcoaster]

Hello All Figured some out on my own by searching this forum this way in google. ► site:http://bytes.com/groups/ms-access/ "Open File"

here is the Code so far

Private Sub cmdToText_Click()
Dim stName As String
Dim stOpenIt As String
    stName = "C:\matt.txt"
    Open stName For Output As #1
    Print #1, "Name | ", Me.txtName
    Print #1, Me.txtAddress
    Print #1, "------------------------"
    Print #1, Me.txtPhone
    Print #1, Me.txtEmail
    Print #1, ""
    Close #1
    OpenIt = Shell("C:\WINDOWS\Notepad.EXE C:\matt.txt", 1)
End Sub

It works!!!

Print #1, "" ( inserts a Line )
Print #1, "------------------------" ( you guess it )
Print #1, "Name | ", ( puts text in front of Me.txtName.. like so» Name | Matt )
Declaring stOpenIt and then this line opens the text file
OpenIt = Shell("C:\WINDOWS\Notepad.EXE C:\matt.txt", 1)

All Right!!!
Hope this helps someone
M@V

[DonRayner]

I'm glad you got it working, Just let us know if we can supply you with any more help.

[ChipR]

This may be helpful also: Print and Display Constants. I just found it and I bookmarked it.

[NeoPa]

You're using Print#. The Help topic gives some helpful techniques for this, and how best to understand what it's doing (limitations etc).

A few very basic tips :

• The outputlist parameter(s) can be separated by a comma (,) or a semi-colon (;).
• The comma will space out to the next tab position before printing the next data.
• The semi-colon ensures no separation.
• Unless there is a trailing semi-colon, a new line (vbCrLf) is always appended (Print #1 on its own simply adds a new line).