Hi
I've checked out some nice solutions on this forums but i'ts not really what I want and I've tried to modify them but without success.
Can anyone create a sample or let me know how to do this the easiest way preferably with no scripts (or small ones)
//Mikael
Hi there!
I'm trying to use an Invoice number from an Invoice form to populate a table of Invoice Lines with relevant records (linking by Invoice number). I realise the following SQL code isn't an append query, but I've simplified it to make it easier to explain
SELECT [Forms]![fInvoices]![SPInvNumber] AS MTInvNumber, tInvoices.SPInvNumber
FROM tInvoices
WHERE (((tInvoices.SPInvNumber)=[Forms]![fInvoices]![SPInvNumber]));
The output I get for this query is something along the lines of:
MTINvNumber | SPInvNumber
쉠 | 49760
THe MTInvNumber should read the same as the SPInvNumber, but it doesn't. If you can't see the above, its some sort of weird chinese/japanese character I think!
I thought maybe it was a display error, but I tried using it in my append query, and it inserted it as garbage too. The weirdest bit is it actually regards the form information as equalling the SPINvNumber from the tInvoices table! :S
Any clues on how I get it to format correctly??? I'm very tired now so it's bound to be something simple!
Hello, please could anyone tell me if is it possible to have a combo box in a form that displays just the last 7 days? (from whatever today’s current day is) I need to be able to store this date that the user selects in a query/table(Currently I have a field named SHIFT_DATE that the user enters a date into this field, this field is bound/linked to a query)Ie a drop down list showing the dates like this:15/02/200614/02/200613/02/200612/02/2006& so on……ive used the following code in a query before to display records from just the last 7 days >=DateAdd("d",-7,Date())I thought maybe I could do something similar in a combo box but I’ve had no luck so far :-( any suggestions would be excellent. Thanks.
View 14 Replies View RelatedHello I have a small problem that seems weird. I have a form which displays a subform with all correspondending jobs for one individual. The problem is the sub form displays the main form information with the other jobs. Im trying to stop the subform from displaying the current mainform's job information. So it won't look like there are more then 1 of the same jobs to other individuals. Can someone help me with the correct method to stopping this. Thanking you in advance,
I have a form, with a sub-form, which worked fine. but now, after I added and changed around the options in a combo box in the sub-form my main form only shows one result.
View 7 Replies View RelatedHey guys,
I was wondering... is there a way to have a listbox display values associated with a parent form ID? in other words... say I have a customer with invoices associated with their name, I want to display a form for that customer with a listbox (or maybe even subform) containing the invoice IDs associated with their name.
Right now, I've got:
SELECT qryClientData.InvoiceID, qryClientData.InvoiceDate FROM qryClientData ORDER BY [InvoiceDate]; to display information in the listbox. How do I modify this to display ONLY Invoices associated with the Clientname on the parent form?
I hope this makes sense. I can clarify if need be, I am just completely stumped. thanks and happy holidays!
I have made a search form for my company, where all the data is put simply into the tables and i have made a search form to search with the selected fields, it was working at first, but now it just displays blank table when i search.I am using ms access 2007.Here is the sql of the query::
Code:
SELECT
ClientT.[Project Number],
ClientT.[Client Surname],
ClientT.[Client Name],
[code]...
I have a report that displays 5 different status. The problem is I need an unbound box to display a certain word when one of the status's is displayed. But the thing is there should be an over-ride checkbox that will display "Void" if it is checked regardless of the status and in the Unbound Box Void will appear regardless of status. Here is an example:
Status Unbound Box
Happy Good
Sad Problem
Happy Void
Sad Void
Note the last 2 on status's list had the checkbox for "Void" Checked.
I know this sounds crazy! I don't even know why I was asked to do somethng like this. People just make up things to do in ACCESS for no apparent reason becuase it comes to their mind!
I have a form with a subform in it. On the main form, I have a combo box with a list of program numbers to choose from. Once one is selected, the subform displays all the unpaid invoices under that program number. This part works fine. The problem occurs when I try to close the form, switch to design view, or scroll the subform to the right. Basically, the error message says that the record can't be saved because it would create a duplicate value in the index/primary key. However, this form is used to display information only. I have disabled the edit, delete and addition abilities, so I can't figure out why it thinks I am trying to change or add a new record. Any help would be appreciated.
I figured it might make things easier if I included a copy of the database, so here it is.
The form is called SETR, and the subform is AllInfo subform.
why access 2007 is displaying an image oddly on a 2003/2008 terminal server farm. I am reasonably sure the problem is an access on terminal server issue because if you view the image in paint, image viewer, or word it displays fine on the terminal server. I don't think it is a resolution or color issue because once again it displays fine in paint, etc regardless of color depth.
The image below shows the difference in the png graphic. The image is transparent (the blue section being the background)
[URL]
As you can see the terminal server image is pixelated.
The form the image is sitting on has a blue gradiant that goes light to dark left to right. The form properties are below
[URL]
The image properties are below:
[URL]
I have two unbound text boxes and a search button adjacent each that allows me to search for a user via two methods:
1) Payroll ID
2) Surname
They have the following code:
txtPayrollIDSearch
Code:
Private Sub txtPayrollIDSearch_AfterUpdate()
Dim sWHERE As String
sWHERE = "[PayrollID] = " & Me.txtPayrollIDSearch
sWHERE = "[PayrollID] = '" & Me.txtPayrollIDSearch & "'"
[code]...
Then minor differences between the above and the Surname search.I have two questions:
1) How do I make the search more friendly by allowing it to find partial matches, i.e., a user has a surname of 'Smith' but I want to search for 'Smi'?
2) How can I display further error messages if there aren't any matches?
how to add recoreds in table thru form. There are 10 fields. first two are txt boxes and rest of are combo boxes. combo box are with drop down list. But they are unbound. two txtbox are auto filled by the username and empid. Now need to write the code to update these value to table. Just i wanna do ti thru vba coding only.
View 1 Replies View RelatedI have a tabbed form from which the user can select a contact's record from a subform on the first tab, click a edit command button, and the unbound text boxes on the top of that tab populate. The user can then click the second tab with employment history which has blank unbound text boxes and another subform which is linked by the contact id to the first tab.
The user can select a record in the second tab, click a command button and the text boxes populate no problem. The problem comes when the user changes the contact on the first tab, and then tries to edit a record on the second tab. Then I get a run-time error '-2147352567 (80020009)' saying the value you entered isn't valid for this field. Why it would work the first time by not the second?
There are 4 unbound dropdown list box that will have a default value of empty string. All 4 must have values entered (data is required).Once all 4 are required - the bottom 5 text box will become enabled (optional data).Forcing the user to click on a Validation Button
Some users type then use the mouse to select the next.Other users type to select then tab.The trick is: After filling in the 4th listbox and validating all 4 have values, the event must trigger code to enable the 5 optional text boxes below.This provides a seamless data entry environment.
I have been doing this in other places, but the transisition after the last required field is complete gets ugly.If Trim(cmbBoxname1 & "") = vbNullString ' check all 4..If it is the 4th one, the event seems not to happen quick enough for the bottom 5 text boxes to be enabled so the user can continue with data entry.
Access 2007
Unbound Form
I have a onclick tied to a label (for decoration purposes) that when clicked it launches VBA that essentially updates a form. All that part works except it will not recognize any changed value of the field I was last in?
Just to try to explain best as I can what happens.
- Form gets opened
- I change field (quantity field)
- I click the Label
- It reverts to pre-existing value.
if I click off of the text field first then do the onclick - it recognizes just fine.
Hello All
Does anyone know how you might build sliding bar displays as an input device for scores into an Access database? I am building an application that could really use something like this.
Here is an example. First go to the 'Chelsea tab', slide the bars, submit the results, and see the results on the "Results" tab
http://news.bbc.co.uk/sport1/hi/football/teams/c/chelsea/6173703.stm
Very impressive
NoVoice
I have a form that contains 4 sub-forms. In two of the Sub-Forms "Users" and "Computers" the form displays the PK on the second row when there is NO Data? (See attached).
Does anybody know how I can stop this from displaying?
Many Thanks,
Phil.
How can I Program a LABLE to appear (.visible = True)
when a result is present!
Example: If RecivedDate.text >1 Then LABLE.visible = True
I have it as Not Visable on start up! I cant seem to get this to work =(
Where can I place this CODE, so that it is executed every time the record is changed
Please help me put the finishing touches on a good Access DB Thank YOu
I have been designing a database and finally was making good headway. I have a junction table that references 2 tables (1-m) and the junction table creates an autonumber primary key that many tables will reference. I realized that the junction table could have duplicates. I did not want to use a composite primary key, but found that I could create an index that contained the unique combination of my foreign keys. No more duplicates. I thought things were looking up. I found out that it is a bad idea to use a combo box in dataset view to have look-ups to other tables. If it is a bad idea why have the option? It does make data entry easier. Anyway not my question. The other tables that refer to my junction table no longer show the values of the foreign keys, but displays an id number for my 2 columns.
Using MS Access 2010 32 bit Win XP.
I didnt write here alot of time,
so my english became less.
here is my question
I have an unbound form
In the form there are 40 textboxes.
There names are like this:
A1
A2
A3
A4
When I open the form I wrote code like this:
For I = 1 to 40
If
. Then
*****************
I WANT TO WRITE IN THE TEXTBOX
BUT I DONT KNOW WHAT IS THE I VALUE
IF I WROTE A & i
ITS DOSENT WORK
WHAT CAN I DO?
******************
End if
next
thanks!
Hello Learned Friends,
I have an unbound form with start date and end date text boxes. The code behind the form allows a combination of dates to produce a report, but only one named report. I would like, with your help, to give the user a choice of reports to preview and/or print. Thank you in advance for divulging your knowledge.
I am trying to save data from an unbound form to a table based on "VBAUnbound.zip" posted by sbaxter.
The Code looks like this:
Code:Private Sub cmd_ip_save_Click()'Error Handling On Error GoTo cmd_ip_save_Click_Err' Declare Variables Dim DAOdb As database Dim DAOrs As DAO.Recordset' Update Database Set DAOdb = CurrentDb t = "M_Paint" Set DAOrs = db.OpenRecordset(t) With DAOrs .AddNew .Fields("Catalogue_Code") = Me.txb_ip_cataloguecode .Fields("Base_Metal") = Me.cmb_ip_basemetal .Fields("Paint_Type") = Me.cmb_ip_painttype .Fields("Color_Family") = Me.cmb_ip_colorfamily .Fields("Metallic") = Me.cbx_ip_metallic .Fields("Surface_Quality") = Me.cmb_ip_surfacequality .Fields("Number_of_Coats") = Me.txb_ip_numberofcoats .Fields("Supplier") = Me.txb_ip_supplier .Fields("Product_Name") = Me.txb_ip_productname .Fields("Color_Name") = Me.txb_ip_colorname .Fields("Color_Number") = Me.txb_ip_colornumber .Fields("Top_Coat") = Me.txb_ip_topcoat .Fields("Pre_Finish_I") = Me.txb_ip_prefinish1 .Fields("Pre_Finish_II") = Me.txb_ip_prefinish2 .Fields("Finish_Comments") = Me.txb_ip_finishcomments .Fields("Size") = Me.txb_ip_size .Fields("Number_of_Samples") = Me.txb_ip_numberofsamples .Fields("Compilation") = Me.cbx_ip_compilation .Fields("Location") = Me.txb_ip_location .Fields("Date_Received") = Me.txb_ip_datereceived .Update End With' Message box MsgBox Me.txb_ip_cataloguecode & " Added" DAOrs.Close DAOdb.Close' Exitcmd_ip_save_Click_Exit: Exit Sub ' Error notificationcmd_ip_save_Click_Err: MsgBox "An unexpected error hass occurred." _ & vbCrLf & "Procedure: cmd_ip_save_Click" _ & vbCrLf & "Error Number: " & Err.Number _ & vbCrLf & "Error Description:" & Err.Description _ , vbCritical, "Error" Resume cmd_ip_save_Click_ExitEnd Sub
I am getting an error "Runtime Error '424' Object required" at this line:
Set DAOrs = db.OpenRecordset(t)
When I hover my mouse over "DAOrs" it flags a messages saying "DAOrs = Nothing".
What does that mean? Can anyone help??
I have a query that gets data from a table now not all fields are filled in, in this table, and the query only shows data that has all fields filled and i need it to show them all
View 3 Replies View RelatedI have a list of publishers for software titles in a table.
1=Adobe
2=Macromedia
and so on and so forth.
I have a form that pulls the publisher name and displays it, and it used to display correctly with the NAME but now all of a sudden it's displaying the publisher number "1" instead of "Adobe"
what's going on?
Friends,
I have created a combo box on a form using the combo box wizard. The combo box is linked to a table, and the combo box user's selection is supposed to be entered into a table so I can use it in reports, etc. The form works great. However, when I go to the table field that is supposed to have the newly entered combo-box selection, it contains only the record number, not the field contents chosen (by-the-way ... the record number and the record ID are the same ... maybe it is showing the ID??) Either way, why won't the table show the correct user choice from the form?
Thanks,
Mike
I have a form which has a few calculations on which are:
TotalPrice - =Nz([Quantity])*([UnitPrice])
Then at the bottom to calculate it all:
=IIf(Sum([Quantity]*[UnitPrice])=0,0,Sum([Quantity]*[UnitPrice]))
This has been working perfectly fine however the TotalPrice is no longer calculating the UnitPrice x Quantity and the TotalCost isnt calculating as nothing appears in the TotalPrice. However when we click the fields the data is diplayed but only on clicking, if we leave the record and go back its back to blank again.