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
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]....
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
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
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.
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
: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
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 RelatedI 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?
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.
Hi,
I have a select query that selects certain customer email addresses and
I want to output the results as csv, which can be used directly in a "To:" field to create a group email.
The SQL of my query is:
SELECT [Customer Details].[Email Address]
FROM [Customer Details] INNER JOIN [Orders] ON [Customer Details].[Customer ID] = [Orders].[Customer ID]
WHERE ((([Orders].[Licence Declaration])=No) AND (([Orders].[Licence Status])="Unlicensed"));
I have found some SQL code on the internet as follows:
"SELECT Field1, field2 FROM table WHERE field1='" & [FORM]![PARAMETER] & "';"
but adapting my code with that is a little bit beyond me...can anyone help?!
Cheers,
Dave
Hi,
I have a query which pulls key fields from a Table and exports to an excel file through the Output to cmmd.
In the table, i have defined a few fields with Look-up criteria and Combo / LIsts. When the Excel sheet is created the Lists are not downloaded. The purpose is to scrub the data and provide users an excel sheet for update of the Combo box for upload in another MS access table.
Please help, this feature is extremely critical for our work. Thanks in advance.
Hello, I’m pretty bad with VB code but I need something pretty simple. I have a button on my form and when I click it I want it to run a query and output a certain field value to a label. I know I’ll need VB code for this, so any sample code would help a ton!
View 4 Replies View Relatedis it possible to automatically output the results of a query to notepad?
View 2 Replies View RelatedWindows XP Pro/Office 2000
I was able to output to excel before fine, now all of a sudden I cannot. I keep getting a message when I go Tools>Office Links>Analyze with MS Excel:
"Cannot access "xxxvac_Inv_DBQuery.xls"
It's wierd. It won't output the data, but it still creates the spreadsheet file.
Any Idea's?
Thanks to all in advance, your help is greatly appreciated! :(
Hi Folks,
I have a table that has Student_ID, Course, and Grade. So each student has multiple records, one for each course they took. But what I want to return is only those people who have All F's. If I just put "F" as a criteria on the grade field then it will pump out those records that have an F, including those who maybe only have 1 F, but all I want is a list of Student_ID's of all of those people who have nothing but F's. Any ideas? HELP..i'm really in a bind with this one.
Hi Guys,
I have 2 tables
tblXRFResults
ResultID
SampleName
Date
SampleDate
a few others not necessary in this
and tblXRFResultsConcentration
ResultID (many records linked to 1 record in tblXRFResults)
Concentration
CompoundName
What I need to set up is a query that will allow me to generate a report that will give an excel like format, with the column headings being the SampleName, followed by the CompoundName(s) from the other table and the "rows" will be corresponding sample name and concentrations.
I am sure this is pretty easy, but I am stumped!
Any help would be greatly appreciated.
along with data in each row, i want to include the record number in the ouput of a query. is it possible?
once i run the query and view the ouput, i can see the standard access database record counter at the bottom or if i select a row, i can see the row number at the bottom.
how can i include that counter in each row of output from the query?
Im trying to output my VBA code to a report.
Here is my code:
Code:
Dim strEmployeeName As String
strEmployeeName = EnUsername
DoCmd.RunSQL "SELECT StrConv(Replace([sUser],""."","" ""),3) AS Employee, TimesheetTable.Activity, TimesheetTable.Hours, TimesheetTable.Description, TimesheetTable.[Task Date], TimesheetTable.ProjectRef " & vbCrLf & _
"FROM TimesheetTable " & vbCrLf & _
"WHERE (((StrConv(Replace([sUser],""."","" ""),3)) Like """ & strEmployeeName & """) AND ((TimesheetTable.[Task Date])>=#" & [Forms]![DateSelection_Frm]![txtWeekCommencing] & "# And (TimesheetTable.[Task Date]<= #" & [Forms]![DateSelection_Frm]![txtWeekEnding] & "#)) AND ((TimesheetTable.ProjectRef) Not Like ""CENG*""));"
And my report is called TimeReport.
I want to get the output of a vba query (only one solution possible) in to a variable but the variable stays empty.
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("SELECT info FROM evaluationtable WHERE evaluation= " & evaluationchoice & " ")
var = rst(0).Value
rst.Close
some explination: evaluation and info are fields of evaluationtable evaluationchoice is a field in an accessform where I can choice a value from the evaluation field
the table is build as this (only two fields) evaluation - info
I have a field in a query that shows amount of hours a site is covered. This field name is Coverage hours and it changes depending on the number of work days in a month. This part is working correctly but some times additional hours may be requested by the customer.
I want to add a another field to this query that will prompt me if their were any additional covered hours. Then I would have the ability to enter a value and the shown output for this field would be the value entered plus the standard coverage hours in the other field.
I'm not sure how to set up the new field.
I am trying to modify the output to only show discontinued items. While the query is in datasheet view, the text is read as "YES" or "NO" under discounted items. So, I tried entering "YES" in criteria while in design view, but keep getting an error message stating, "Data type mismatch in criteria expression".
View 5 Replies View RelatedI looked thru the forums and didn't seems to get what I needed;
I want a count query to give me all fields in "group by" column, and assign 0 to where there are no count for certain fields.
I tried to set Outputallfield to "yes" but got an error message saying that there is a data type mismatch. The query ran just fine when outputallfield was set "no" and gave right results.
Can anyone help, please?
I have a form where a user reviews information input by another user, once they have done this they sign it off by selecting their name from a drop down list. On this form there is a scrolling message which tells the user how many un-signed entries there are. This works fine until there are 0 (zero) entries to be signed off.
The scrolling message is linked to a count query which basically counts any records that does not have a name entered in the required field. I have done this with ' Not Like "*" '
Like I say it works when there is one or more entries to count, but as soon as there are none the query does not output a zero it is just blank. This is the problem.
I need some sort of statement to say if there are no matching records please display a zero.
Any help would be much appreciated!
i have got 2 tables i am trying query against. in table 1 i have a list of records which only appear once in the table under 1 field. in table 2 list of records which may have the same record appear under the same field numerous of times with different data in other fields on the table. i have created the reationship between both tables but i am getting multiple records appear in the output of the query where i only want the record to appear once in the output.
View 2 Replies View RelatedUsing 2010.Would like to open a new form as a popup to display the results of a query. Trying to avoid eliminating objects in my DB, so not wanting to create Query Objects, but just creating the SQL on the fly.
The purpose of opening the popup form is to display the results of the Query based on a Button selection that the user chooses. Not sure if I can pass the Query from Form to Form, or if the called Form should run the Query. The Query output is a single record which is a Memo field, which is why I want to open the new form to display the result. The Memo text can be a page long or more.
I am not getting any errors and can open the form. The problem is that I am not getting the Query results displayed on the new form. The code below is from my first form that has the buttons. The popup form is Results_frm.
Code:
Private Sub InScope_bt_Click()
Set dbs = CurrentDb
strSQL = "SELECT In_Scope FROM Project_Scope_Deliverables"
Debug.Print strSQL
ResultType = "I"
DoCmd.OpenForm "Results_frm"
Forms!Results_frm.RecordSource = strSQL
End Sub