Edit Existing Code

[just fix it]

We would like to add an additional field to our txt reports. In looking at
the code I have made what I thought was the correct change but only see the
change in the export delim report not the export fixed report. The current
code is as follows:

Option Compare Database

Private Sub FindButton_Click()
On Error GoTo Err_FindButton_Click


Screen.PreviousControl.SetFocus
DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70

Exit_FindButton_Click:
Exit Sub

Err_FindButton_Click:
MsgBox Err.Description
Resume Exit_FindButton_Click

End Sub

Private Sub Form_AfterUpdate()
DoCmd.TransferText acExportDelim, , "qu-Active Cad", "n:\public\actv-cad.txt"
DoCmd.TransferText acExportDelim, , "qu-Stored Cad", "n:\public\stor-cad.txt"
DoCmd.TransferText acExportDelim, , "qu-Current Job List",
"n:\public\curjob.txt"
DoCmd.TransferText acExportDelim, , "qu-Master Job List",
"n:\public\master.txt"
DoCmd.TransferText acExportFixed, "standard-active", "qu-Active Cad",
"n:\store\file\r-list.txt"
DoCmd.TransferText acExportFixed, "standard-stored", "qu-Stored Cad",
"n:\store\file\stored.txt"

End Sub

The correct information is showing up in the first line for "qu-active Cad"
"C:\public\active-cad.txt", but it does not reflect correctly under line 5
for the r-list portion.

I am a basic access user and the person that created this program has not
worked here in years. I do not know what the portion "standard-active" is.
Have looked at all the qu's and do not see any reference to this nor is their
a file on the network called this. We are attempting to add an additional
field to the txt report. This is not a new table that the data is pulling
from, but rather a new field on the report.

What do I need to do to get the data to reflect on the ExportFixed
"Standard-Active", "qu-active Cad", "N:\store\file\r-list.txt.

Any assistance would be greatly appreciated.

 

[Jeanette Cunningham]

Hi,
you need to make some change to the width of the fields in the export
specifications used in the export with fixed width fields.

Do a manual export using the fixed width specification and the appropriate
query. Use the advanced button, choose standard-active.
The details of standard-active will open.
Check the data in each field - you will need to adjust the field length so
that the data in all fields can be seen.
When you have finished adjusting standard-active, save it.
Do the same process for standard-stored


Jeanette Cunningham -- Melbourne Victoria Australia

 

[Chris O'C via AccessMonster.com]

To add to Jeanette Cunningham's reply, "standard-active" is the name of an
export specification the previous developer created for the db. The easiest
way to modify the existing specification is to try to manually export the
query with the export text wizard, which Jeanette described for you. Use
File > Export to get to the wizard.

Make sure all of the VBA modules in the db have Option Explicit at the top of
the window, not just Option Compare Database. Like this:

Option Compare Database
Option Explicit

And then make sure you compile the code with the menu after making and saving
any VBA code changes. Use Debug > Compile <database name> while in the code
window.

Chris
Microsoft MVP

 

[Jeanette Cunningham]

Chris,
I have filed this extra info for future answers.


Jeanette Cunningham -- Melbourne Victoria Australia