Open Report -->working Not Correctly
Dec 7, 2005
hi...
firstly, i created some report based on query. then in my form i create list and combox to list down all primary key that had in query..
what i want to do is open report, based on criteria that i selected from combobox or list box...
i create both cbo and list box to compare which 1 is better... but both not working. i mean it works but not show the data as i want to. it open / list all data at report..
i use this code but nothing happen :
for listbox;
StCriteria = "[ID]=" & "'" & ListCustomer.Column(0) & "'"
DoCmd.OpenReport "Invoice Print", acPreview, , StrCriteria
and Cbo;
StrCriteria = "[ID]=" & Me.[cboCustomer]
DoCmd.OpenReport "Invoice Print", acPreview, , StrCriteria
plz help me..i dunno what to do.. :confused:
it works but not correct
View Replies
ADVERTISEMENT
Jul 2, 2005
Hi guys,
I'm trying to create a simlpe database that is use to store time worked for clients (see attached).
If you run the form frmClientEntry i have two issues.
1 - you will see that the title is automatically selected from the combo box. However is i try and enter the form I'm told 'You cannot add or change a record because a related record is required in table 'tblTitle'. If I select one of the entries I get rid of this. I would like the default to be selected...
2 - There is no entry in the hourly rate column field even though there is an entry in the table. How do I get my hourly rate to show? Ideally this will only be a single text box and not a comboBox as the hourly rate will be the same for every client.
If this is a table design issue please let me know and I'll post there.
Thanks
View 11 Replies
View Related
Sep 1, 2006
I have a query based continuous form that looks up a serial number entered by the user and allows them to view the matching data.
When a user enters a serial number that is not in the database I want a message box to pop up to warn them there is no match.
The code I am using makes the msgbox pop up on every entry. I have tried to put this code in a variety of form and control events with no luck. Can someone tell me what I am doing wrong?
Private Sub Form_AfterUpdate()
Dim intRespone As Integer
If DCount("[packing station scan].[serial_number]", "match with last test results", _
"[drive test results].[serial_number] = ' & Forms![match with last test results].[Serial_Number] & '") < 1 _
Then
intresponse = MsgBox("Stop! Serial Number has no test data!", vbYesNo, "No data found")
Select Case intresponse
Case vbYes
DoCmd.Requery
Case vbNo
DoCmd.Requery
End Select
End If
End Sub
Any help is greatly appreciated!
Regards,
Kerry
View 5 Replies
View Related
Nov 17, 2004
I have a field in my DB called "Category". Users are allowed to imput any text in that field. I have a particular problem in which the LIKE command isn't working as I think it should with the limited help files of Access explanation of use. The category field has multiple entries, for example - HEQ, PBH5, PBH4, SWA, SWA2, ALL - etc. I'm trying to pull the records from that field with specifics.... in other words I may need to get All the records that have "PBH5" in them. However, if if PBH5 isn't the FIRST entry in that field the LIKE criteria doesn't work. I have tried Like "PBH5*" LIke "PBH4* etc to no avail. Any ideas? It can't be that difficult, but I cannot find anything in any book I've purchased on it, or any of the knowledge base information at Microsoft.com.
View 2 Replies
View Related
Mar 26, 2008
I am working on developing a database that develops requests to send to another department. There are a lot of forms, macros, reports and queries. A user inputs information into a form, and then selects a command button that is attached to a macro that builds the request. Midway through the build, another form comes up to complete missing information. I was going along just fine - at the testing stage for this part of the process - when the database stopped working like it should. Some of the issues I am seeing:
1) If you open a new query and try to close it without saving it, it just keeps asking you if you want to save over and over even though you select No.
2) If you open an existing query and make a change, it closes it and saves the changes without any prompting at all.
3) Macros and forms do not work right. I have a macro that deletes the records from one table. The form for that table now shows #Deleted in all the fields instead of blanks.
If you compact/repair the database is good for one run through but then it doesn't work correctly again. I have had this issue in the past but have no clue how I break my databases! I have a general knowledge of Access, I am not really a VBA coder if I can avoid it at all costs. There must be something in the relationship between all my tables, queries, forms, etc but I have no clue even where to start to troubleshoot. HELP!!
View 3 Replies
View Related
Sep 11, 2007
I know there are numerous threads regarding dsum() on the forum, but I wasn't able to find the exact answer to my problem.
The root of my problem is that I'm trying to update a field on a table using dsum, which references another query to update the table. Although I have all of the correct keys from the physical table joined to the query in the dsum function, the code/ms access seems to ignore the joins. As a result, all payees are having their "vol" field set instead of a select subset.
Query (GetTxnVolAmtTR"):
SELECT p.payee_id, sum(txn_volume) AS vol, t.market, t.period_id
FROM ft_payees AS p, ft_txn_summary AS t
WHERE p.payee_id=t.payee_id And p.market=t.market
GROUP BY t.payee_id, t.period_id, t.market, p.payee_id;
Update statement (references the query above):
UPDATE tmp_ft_component AS rc
SET rc.volume = Dsum("vol","GetTxnVolAmtTR","GetTxnVolAmtTR.payee_id= " & [rc.payee_id] And "GetTxnVolAmtTR.market= " & [rc.market] And "GetTxnVolAmtTR.period_id= " & [rc.period_id] & "")
WHERE rc.component_name='Total Revenue';
as you can see, I have all of the fields I want joined, but the code seems to ignore this. I've tried looking at this site: http://www.mvps.org/access/general/gen0018.htm , but haven't found my answer. Any help would be much appreciated!
View 3 Replies
View Related
Mar 13, 2013
My report generates base on 2 date inputs(from textboxes) namely, ProcStartDate & ProcEndDate & a combobox(cmbRptSupplier) to select the supplier:
Code:
Private Sub btnReport_Click()
Dim strDocName, strWHERECondition As String
strWHERECondition = ""
If Me.cmbRptSupplier = "" Or IsNull(Me.cmbRptSupplier) = True Then
[Code].....
When I leave my cmbRptSupplier blank (so that I can leave supplier out of my criteria), & fill in 1/2/2013 for ProcStartDate, 14/3/2013 for ProcEndDate, I get ALL the invoices displayed in return for my report. Even with those before 1/2/2013.
View 10 Replies
View Related
Jul 17, 2013
I have a report, and the "reason" field is one that can grow as needed. The following string is in the field: "MISSING IMPLEMENTATION PLAN, MISSING SERVICE LOGS FOR DATE OF SERVICE". I bolded MISSING, where the space hits the border. My standard setting for the border style is Transparent, and the space is causing the growing to not work properly. TransparentBorder.pdf shows the incorrect growing. When I change the border style to Solid, the growing works correctly, as shown in the SolidBorder.pdf file.why the growing is not working properly with the Transparent border, but does work correctly with the Solid border?
View 3 Replies
View Related
Sep 21, 2014
I have a report based on a query that has data for many dates. At the moment I have put a specific date in the criteria of the query so that I could build the report format. So it now displays all the data for the date i have in the criteria section. I will need to run this report several times per week so the specified date (and corresponding data in the report) will need to be changed to a new date when I open the report i.e. when I open my report I want to show data in the report only for a specified date.
Can I create a date parameter box open up when I open the report? Can I create a form with a button that when I click will open the report displaying data for that date? What would be the best way?I also need to display the specified date on the report.
View 5 Replies
View Related
May 21, 2014
My application relies on whether Outlook is open and more importantly, with the correct Exchange profile selected. To ensure this I have the following code which, on the work PCs (Windows XP and Office 2003) works correctly.
Code:
If Outlook_is_Running = True Then
Set myOlApp = CreateObject("Outlook.Application", "localhost")
Set myNameSpace = myOlApp.GetNamespace("MAPI")
Set colFolders = myNameSpace.Folders
On Error Resume Next
[code]....
The work PCs are being upgraded soon to Windows 7 and Office 2007 so I have taken the application home and started to develop it on my home PC (Windows 8.1 64 and Office 2013 64). I have used PtrSafe where necessary and have compiled with no errors, but this code always returns false even though Outlook 2013 is open.
On further investigation, if I comment out the 'On Error Resume Next line I get the error Active X component cannot create the object (or similar) Error 429. This is the same regardless of whether Outlook is open or not
View 4 Replies
View Related
Dec 3, 2013
I have a report with an unbound checkbox which has a null (greyed out value) when printed. I'm just trying to set it to false when the report opens.I have
Code:
Private Sub Report_Open(Cancel As Integer)
Me.CheckNotPaid = False
End Sub
but it just says 'Runtime Error -214..You can't assign a value to this object'
View 3 Replies
View Related
Sep 14, 2013
I think my issue is that when the user opens my form a record gets created. Thus default value will not work. what happens is; the user fills out form 1 goes to form 2 and on form 2 i want a check box default value to be true...but its always false.
the checkbox in question is adequite staff. the user gets the question, "was there adequate staff" if there was the "adequate staff box" would be true. what i have tried is i created a "dummy" checkbox (checkbox299) entitle no. and labled adequite staff checkbox as yes. on the form2 open insert the following
Code:
If Me.ADEQUATE_STAFF = False And Me.Check299 = False Then
Me.ADEQUATE_STAFF = True
Else
End If
View 3 Replies
View Related
Apr 3, 2014
I have a form with two subforms. One subform is a datasheet that pulls data from a temp table. During the other subforms Form_Current, the temp table is emptied (DoCmd.RunSQL "Delete from tblAddRefs"), reloaded with data relevent to the current record, and requeried (Forms("frmEDFP").Controls("tblAddRefs subform").Requery). This works like I want it to...
With the exception of the initial load of the main form. The subform based on a table shows (#Deleted) instead of data. if I step through the code, I can see that the temp table is emptied and repopulated by the time I try to requery the subform. This is still happening during the Form_Current of the other subform, which is successfully running on main form load.
If I requery (Forms("frmEDFP").Controls("tblAddRefs subform").Requery) using a button on the main form once it is loaded, the #deleted data is correctly is replaced by regular data, so it's like the requery in the Form_Current event isn't doing anything during load.
View 2 Replies
View Related
Aug 13, 2015
I have a form with 7 List boxes linked to 7 Query's which in turn are linked to a table. Each list box if for a particular trade.
I am trying to select a person or persons from each List box and then have them sent to a report. I have Code to do one list box, but do not know how to link all boxes with code to a 'Open report' button.
The code I am using is as follows:-
Private Sub cmdOpenReport_Click()
On Error GoTo Err_cmdOpenReport_Click
Dim strWhere As String
Dim ctl As Control
Dim varItem As Variant
'make sure a selection has been made
[code]....
View 9 Replies
View Related
Nov 4, 2006
I have a report "Work Order Details" that that is based on a query and opens along with a form that is used to set filters. Based on samples I have looked at and reading, I cannot figure out what is missing. When I select my item form one of 5 unbound combo box 's and click the "Set filter" button, it brings up a paramter box?? If I cancel out the box, I still don't get a result. Just for the heck of it, I filled in a name in the paramter box, still no luck. The report property has "Filter On" as YES. The close button, clear button, and drops downs operate perfectly.
Here is the On Click Event info from my "set filter" button:
Private Sub Command28_Click()
Dim strSQL As String, intCounter As Integer
'Build SQL String
For intCounter = 1 To 5
If Me("Filter" & intCounter) <> "" Then
strSQL = strSQL & "[" & Me("Filter" & intCounter).Tag & "] " & " = " & Chr(34) & Me("Filter" & intCounter) & Chr(34) & " And "
End If
Next
If strSQL <> "" Then
'Strip Last " And "
strSQL = left(strSQL, (Len(strSQL) - 5))
'Set the Filter property
Reports![Work Order Details].Filter = strSQL
Reports![Work Order Details].FilterOn = True
End If
End Sub
View 2 Replies
View Related
Dec 15, 2004
Hi,
I have a report that has 3 sub reports in the main report but for now I will just concentrate on my main report and my first sub report. My first subreport is a bit of a nightmare as it pages and pages of just text well 3 pages. I have typed all the text in labels n the sub report and I have inserted a page break control when I run the sub report without the main report the page breaks are there when I run the sub report from the main report the breaks have gone. Any idea's how to fix this one. So I have a hughe details section with 3 page breaks that only work on the sub report that has not been opened from the main report. Once I try to open the sub report from the main report I lose my page breaks in the details section of the sub report. Hope this make sense. Thanks PWF
View 1 Replies
View Related
Sep 8, 2014
I want to show ( or print ) on a report a specific URL on Google Maps with the ActiveX control "Microsoft Web Browser".
I managed to use the Google API on a form to show the actual URL found with X and Y coordinates.
Now I'd like to show the same URL on a report to send to the customer as a reference. Is there a way to get this done?
I already put a ActiveX control (Ms Web Browser) on a report and used the same URLstring in the ActiveX control , but nothing is shown on the screen.
View 7 Replies
View Related
Jul 22, 2014
I get an error message when I click the setup button in the print dialog window.
View 10 Replies
View Related
Sep 6, 2013
Using Access 2010 32-bit. I have a report that contains a Graph Chart (class = MSGraph.Chart.8). The reports works fine using the uncompiled .accdb. When I compile to .accde, the report is not rendered...I get an empty report screen as though Access is going to produce the report and nothing happens. I have to terminate Access using the "X" at the top right.
View 3 Replies
View Related
Mar 11, 2014
I have 3 tables.
One is a list of fishermen with all their info. I used a Code as the primary key.
The 2nd is a fish ticket sheet with fish tickets entered and the code in there as a foreign key in the relationship between the two.
I create a report listing the fish tickets and prices perfectly for the 4 fishermen I have entered fish tickets for. (I have 140 fishermen in the main table)
I added a 3rd table for payments made to the fishermen. There are two payments for 2 of the fishermen.
then, I go into report design view and drag in two of the cells from that 3rd table into my report.
The problem is the report then prints JUST the fish tickets and payments for the two fishermen that have payments...not the info for all 4 fishermen. I need to print out settlements for all the fishermen whether they have payments or not?
View 1 Replies
View Related
Jun 5, 2014
i have created a MultiSearch query witch puts my results in a list box.under it i have created a button wich i want to use to print a report with the criteria i select from my list box if there is more than one result.
Following is the Code i used for my button
On Error GoTo Err_Command60_Click
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "ReportLable"
stLinkCriteria = "[ProductID]=" & Me![SearchResults]
DoCmd.OpenReport stDocName, , , stLinkCriteria
Exit_Command60_Click:
Exit Sub
Err_Command60_Click:
MsgBox Err.Description
Resume Exit_Command60_Click
Every time u press the button i get a message syntax error(missing Operator) in query expression
Now i have not used any code in my Query except for
Like "*" & [forms]![frmSearchFor]![SrchText] & "*"
Where i made the error
View 3 Replies
View Related
Oct 11, 2006
Hello friends,
I would like to add a cmdbutton on a form to view a report.
This report should also include the last modified data of my form. Is it possible to see the data without closing the form?
Or perhaps there is a solution like close the form and open the report (it will use the field SSN as PK) of the last modified (or viewed) recordset?
Any help or code will be appreciated.
Thank you.
View 1 Replies
View Related
Jul 23, 2007
I have an Access 2003 database that has a report which prints to the default printer.
We recently replaced the printer and now we cannot open the report in either design or preview.
How can I resolve this problem??
Many Thanks,
DL
View 4 Replies
View Related
Dec 18, 2007
This keeps happening to me. I am tired of importing from a backup and making modifications. My report won't open in any view. I double click on it in the db window, and nothing happens. It does the same when I try to open in design view. Have any of you ever had this proble,? What should I do?
KellyJo
View 3 Replies
View Related
Feb 13, 2006
Hello all,
Please help with this:
On opening my database, I have a switchboard that opens up.
How do also run a report automatically just after the switchboard screen opens. To make the switchboard open when I click on my database, I went to tools..> startup. But I don't know how to run a report automatically after that.
Thanks for your help!
View 3 Replies
View Related
Dec 28, 2006
Seasons Greetings to all.. I hope you didnt put on too much weight.
The fog at Heathrow ensured I had a very stressful Christmas.. but thankfully it has gone for now.
i have a question regarding choosing a report to open based on a combo list..
i have a field called jobtype..
this field will always have either
"CASH" or "ACCT"
i have 3 separate report designs.. 1 design for cash jobs, 1 design for acct jobs, and 1 deisgn for both jobs.
i want a form that will allow my user to choose which report to look at..
lets call it form1.. i want to place a combo on my form (combo1) that has the values..
CASH
ACCT
BOTH
i realise that in my report query source.. i can use the following as the jobtype criteria
[Forms]![form1]![combo1]..
Question
I need the combo to realise that if the CASH value is selected.. it should open the CASH report..
if the ACCT value is selected.. it should open the ACCOUNT report..
and finally if BOTH is selected then open the BOTH report..
how can i do this?
View 7 Replies
View Related