Output To Text - Using 3 Tables
Sep 3, 2004
hi
i am trying to build some basic static html files.
i have a 'header' / 'middle' / 'footer'
these tables are linked in the following way.
each header has an id - and this is the link to the middle
same with the footer.
i want to output the files as below:
Sub runOuttoHTML()
Dim hFile As Integer
hFile = FreeFile
for each TITLE in tblMiddle
Open TITLE & ".html" For Output As #hFile
Print #hFile, "<html><head>"
Print #hFile, tblHeader.field1
Print #hFile, "</head><body " & tblMiddle.bodydescription
Print #hFile, tbleMiddle.FreeText1
Print #hFile, tbleMiddle.FreeText2
Print #hFile, tbleMiddle.FreeText3
Print #hFile, tbleMiddle.FreeText4
Print #hFile, tbleMiddle.FreeText5
Print #hFile, tbleMiddle.FreeText6
Print #hFile, tbleMiddle.FreeText7
Print #hFile, tbleMiddle.FreeText8
Print #hFile, tbleMiddle.FreeText9
Print #hFile, tbleMiddle.FreeText10
Print #hFile, tblFooter.field1
Print #hFile, "</body></html>"
Print #hFile,
Close #hFile
and do it again
End Sub
but i cant get my head around it - any help - as always greatfully received.
View Replies
ADVERTISEMENT
Nov 14, 2013
Basically what I'd like to do is to sum the time, and output it in the text box for the valid check box. For instance (in the picture attachment) if the 'Running' check box is ticked, Access will add 15 minutes to the 'Total Running Time' text box. If 'Running' is checked again on the next Record, Access will add an extra 15 minutes (totalling 30 minutes) to the 'Total Running Time'. On the 3rd Record if 'Down' is checked, Access will add 15 minutes to the 'Total Down Time' text box, the same for 'Change Over'.
View 5 Replies
View Related
Oct 14, 2013
I have been using Access 2013 to make a database which outputs values to PowerPoint.
I have two tables with data in which are both brought together in a query which is the recordset my VBA code relates to to output it to Powerpoint. Both tables contain data in 'long text' fields. The data from one outputs into PowerPoint textboxes without any issues regardless of the length of the data but the data from the other one is truncated to 255 characters. It definitely says it is a 'long text' field - is there any reason it would truncate the output?
View 4 Replies
View Related
May 26, 2005
Hi all! I'm not sure if this is the correct area to post this in, but hopefully it is!
I have a Microsoft Access database, and I need to output the content of one of the tables in a specific format-the table contains a Name field, a Description field, a URL field and an Alt Text field, and I need it to end up in a text file in this format:
NAME|DESCRIPTION|URL|ALT|
Where each line of the text field is a different product, and the content of each field is separated by the | symbol (whose name escapes me right now).
Anyone that can help?
Kevin
View 2 Replies
View Related
Nov 19, 2004
Could someone tell me how to put the out put of a query into a textbox in a form.
I have asked this question on a couple of other sites but I still cant figuer this out.
I am a beginner so please make and easy explanation.
thanx
View 4 Replies
View Related
Dec 13, 2004
Could anyone help with a simple answer please ?
I have an Access db that schedules the sending of emails with attachments.
I run a query on the table that returns all active users
I then need to create a separate file for each active user - in the format as shown below.
Each file is called "ddmmXX.epe"
- where dd=day,mm=month,XX=sequential number starting 01.
The file needs to be formatted ascii text file.
The file extension must be .epe
FORMAT:text
TO:{email}
FROM:{from}
CC:{cc}
SUBJECT:{subject}
ATTACHMENT:{attachment}
BODY:{Message}
All the fields within the {} are fields in the Access table
Each file must then be saved to a directory c:mailout
(eg C:mailout141201.epe)
Sample file would look like this:
FORMAT:text
TO:{harry@aol.com}
FROM:{Mat@abcde.com}
CC:{peter@aol.com}
SUBJECT:{Daily Newsletter}
ATTACHMENT:{c:mailews.zip}
BODY:{Please find attached today's newsletter}
Can anyone help - it would be much appreciated, as I am still learning the slightly more advanced methods of VBA.
Thanks
View 9 Replies
View Related
Jul 25, 2005
:confused: I've created a form within our company database which will track hardware/software requests. I'd like to create a macro, or add code to output the data entered into a notepad file. Nothing extraordinary. I'd like for it to be like this:
Ticket: XXXXX
Employee: xxxxx
Reason for Request: xxxxx
Quantity:xxxxx
Part Number:xxxxx
Price:xxxxx
Shipping:xxxxx
Total:xxxxx
Those are the headings of the fields and x's denote entered data. I'd like to keep the headers and have the entered data as well. Is it possible?
Thanks to all for your help
View 1 Replies
View Related
Mar 24, 2014
The user will select two dates. Start and End date. The user will hit the run button and the application will read an excel file with employee data and only display/output the records within that date range selected (employment date).
Code:
Option Compare Database
Function DeleteTable()
'Delete old records from AllEmployeesData table
On Error GoTo DeleteTable_Err
[code]....
I am not getting the query displayed on the datasheet after it is done executing. It's just a blank sheet. Also the output file is just this:
Code:
ssn
last
mi
first
employ
I did a quick query test using SQL in Access and it worked fine there. I am guessing my error is somwhere in this section:
Code:
'--Display query result on Datasheet and Output query to text file
With db
Set qdf = .CreateQueryDef("NewHireQuery", strSQL)
DoCmd.OpenQuery "NewHireQuery"
.QueryDefs.Delete "NewHireQuery"
End With
db.Close
qdf.Close
Set qdf = Nothing
[code]....
View 5 Replies
View Related
Dec 13, 2013
I have researched on here how to print the results of a query to a text file. I put the code in and I get an error on the openrecordset line. The error says "too few parameters, expected 4"
I tried the query in another report I export to excel and the query works.
I tried printing the whole table using "Select * from tbl_Customers" and it works????
Here is the code:
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("qryBell1", dbOpenSnapshot)
Dim fs, TextFile
Set fs = CreateObject("Scripting.FileSystemObject")
Set TextFile = fs.CreateTextFile(pathname, True)
[Code] ....
the query returns 6 fields for printing and can filter based on whether 3 fields are filled or not on the form - Date, Campaign, Status
View 6 Replies
View Related
Jul 20, 2005
It has been a while since I last used Access, recently I've used mySQL and PHP.
First a little description of what I'm trying to accomplish:
I have three tables...
tblImport - has the fields: TestID(PK), i001, i002, i003, i004 ... i025
Note: i00# field contains the multiple choice answer (i.e. 1,2,3,4,5) as imported from a CSV file.
tblStudentAsr - has the fields TestID(PK), StudentID(PK), 001, 002, 003 ... 025.
Note: 00# containes the multiple choice answer (i.e. 1,2,3,4,5) as enterd by the student.
tblResult - TestID(PK), StudentID(PK), a001,a002, a003 ... a025.
Note: the fields a00# have the datatype set to "yes/no"
What I'm trying to do is compare the answers in tblImport to the answers in tblStudentAsr then output the result to tblResult .
Here is some dirty pseudocode:
if i001 = 001 then
INSERT 1 INTO tblResult
else
INSERT 0 INTO tblResult
The above example gets a little repetitive since I would have to do that for each question.
Is it possible to put the answer fields of each table into a recordset then compare them?
(I have heard that using rs's can be a little slow. Although there is only a max of 25 questions the number of students can be quite large)
Alternativly, can I accomplish this using only SQL statements?
What would be the best way to attack this?
Any suggestions (or alternate suggestions) would be greatly appreciated.
Thanks,
salmonman
View 6 Replies
View Related
Jul 14, 2005
Hi everybody. I got a query that displays object name and object type of access 2000 db. Unfortuenly it dose not display the linked tables objects(linked to tables in acccess 2000 db). could an expert tell me how i can fix this query so it displays linked tables object as well.Thanks
SELECT MsysObjects.Name AS ObjectName, IIf([type]=1 Or [type]=6,"Table","Query") AS ObjectType
FROM MsysObjects
WHERE (((Left$([Name],1))<>"~") AND ((Left$([Name],4))<>"Msys") AND ((MsysObjects.Type)=1 Or (MsysObjects.Type)=5 Or (MsysObjects.Type)=6) AND ((MsysObjects.Flags)=2097152 Or (MsysObjects.Flags)=128 Or (MsysObjects.Flags)=0 Or (MsysObjects.Flags)=16))
ORDER BY MsysObjects.Name;
View 3 Replies
View Related
Jul 14, 2005
Hi everybody. I got a query that displays object name and object type of access 2000 db. Unfortuenly it dose not display the linked tables objects(linked to tables in acccess 2000 db). could an expert tell me how i can fix this query so it displays linked tables object as well.Thanks
Code:SELECT MsysObjects.Name AS ObjectName, IIf([type]=1 Or [type]=6,"Table","Query") AS ObjectTypeFROM MsysObjectsWHERE (((Left$([Name],1))<>"~") AND ((Left$([Name],4))<>"Msys") AND ((MsysObjects.Type)=1 Or (MsysObjects.Type)=5 Or (MsysObjects.Type)=6) AND ((MsysObjects.Flags)=2097152 Or (MsysObjects.Flags)=128 Or (MsysObjects.Flags)=0 Or (MsysObjects.Flags)=16))ORDER BY MsysObjects.Name;
View 2 Replies
View Related
Oct 30, 2013
I have created a form with 9 cascading combo boxes. There are 59 total results or scenarios (which are based upon the completion of the form and these 9 combo boxes). Currently, upon completion of the form and the 9 combo boxes, a text box displays the singular result/scenario.
Here's my question: Rather than utilizing a text box to display the result/scenario, is it possible to output a PDF or Word document? If so, is there a general VBA code for this that I could manipulate?
View 1 Replies
View Related
Aug 20, 2013
I'm using Access 2007 SP3.
Whenever I export reports to PDF, the output appears zoomed and clipped. No extra pages are generated as they would be if I'm going over margins, it's just the report is clipped.
The report looks perfect in preview mode, and it looks perfect when going to an actual printer. However, when using OutputTo to save it as a PDF, this is when the report content is clipped.
Here is the code I'm using:
DoCmd.OpenReport MyReport, acViewPreview
DoCmd.OutputTo acOutputReport, "", acFormatPDF, "MyReport.pdf"
DoCmd.Close acReport, MyReport
I open the report in preview mode first so events are fired that show/hide various objects based on fields in the recordset.
I've tried reinstalling, and I've tried this on two different machines, one running Windows 7 and one running Windows Server 2008...both with the same results.
View 5 Replies
View Related
Jul 31, 2013
What is the difference between "short text" and "long text"? Both seem to have 255 characters limit. I have Access 2013, and I found a solution, that you can use Memo instead of Short text. But the problem is, that there is no "memo" data type in Access 2013. So that won't work for me.
View 8 Replies
View Related
Feb 24, 2015
I know this is an Access 101 question, but what is the best way to view text rather than numbers in my tables. In an example which I have attached, an Orders table shows the Customer field as a number. I would like to view the actual customer name when I am looking at the table.
View 3 Replies
View Related
Dec 12, 2007
I need help. I want a field in my table that generates an Log number.
I already have fields:
I.D. number (sequential number)
Project Name (Text field)
Milestone (Number field)
The Log number should be made up of the first two letters from the Project Name, then the Milestone, then the ID number. The three parts of the Log number should be separated by hyphens.
So if:
I.D. number = 01
Project Name = Nice Light
Milestone = 03
Then Log number would = NI_03_01
On my form I have managed to get this to happen using an unbound calculated text box, but I need the log number displayed in the table, and this seems impossible.
Any help? Important things to note are I am not very clever when it comes to computers, or programming.
Cheers
View 12 Replies
View Related
Feb 12, 2008
I have a sql string that is used to populate a form and now I'd like to export that set of records to a spreadsheet but I can't get 'OutputTo' to work. It wants a predefined query name - !? Any suggestions?
View 5 Replies
View Related
Jun 22, 2007
guys the below works a treat on a single qry -(pinched from samples) however I will have 20-30 qry that I want in this 1 workbook all on seperate tabs .
Now I have also tried getting this done cross refer to "qryto excel automation" and have had some particual succes - but does any one know how to do this
DoCmd.OutputTo acOutputQuery, "Query1", acFormatXLS, "Tbl1XLS.xls", True
background
I have multiple currencies and multiple taxes on these currrencies
so Sterling
may have 5% tax , 17.5% and Tax n/A (and others) Dollars same, Euros same
so I need each currency and each tax in a seperate sheet int he same workbook
i am happy to write 1 qry for each currecny/tax
inthe exampel above Sterling 5%
sterling 17.5% , sterling Tax/Na - would be 3 qry
so I will end up with about 20-30 qry depending on how many tax's and currency I end up with
unless soemone can come up with a better solution :eek:
View 1 Replies
View Related
Jul 13, 2005
I've created code to export data from a query to a spreadsheet and it works fien. My question is, is it possible to set up an SQL statement in code and export the results of the SQL to a spreadsheet instead of using the saved query?
View 1 Replies
View Related
Jul 20, 2007
Hi,
I'm trying to compare partial text records across two tables.
The first table simply has a description, such as:
DescriptionHammer
Bone Saw
Power Saw
The second table is a list of terms and a category, such as:
Term, Category
Hammer, 1
Saw, 2
I'm looking to build a query will compare the two and assign each description a category based on the partial match. It seems like this should be fairly easy to do, but I'm struggling to find anything to point down that path.
Any ideas?
View 5 Replies
View Related
Jan 10, 2006
I am trying to link the textboxes on a form so that their values are stored in 2 seperate tables.
Setting the Record Source of the Form to TableA and the various Text boxes etc are set to the Fields in that table works fine, however I want some other text boxes to be linked to another set of table fields, so that when I enter values into those text boxes the data ends up in a different table.
Has anyone any ideas on how text boxes on one form can be linked to different tables.
dave
View 3 Replies
View Related
Feb 9, 2006
Hi All,
How do update two different tables (fields) from one text box from a form?
Thanks
View 2 Replies
View Related
Sep 17, 2006
I have a number of text boxes which user can change values, however on change of value the bound table does not update until the form is exited.
How do i ensure the table updates regardless of exiting form or not?
View 2 Replies
View Related
Jan 7, 2013
I randomly read on another website that your field type in a table should be 'text' unless you're doing math on the number'. Is this true?
View 14 Replies
View Related
Aug 30, 2013
I came into a database where the forms have checkboxes connected to table fields that are in text data type. I see that when the checkbox is checked, the value in the field is still -1 in the table. Is there a reason to change these fields to Yes/No data type or just keep them as they are? Are there limitations or problems to having Yes/No values (-1) in a text field?
View 2 Replies
View Related
