|
More Detail Button
Dear
I have form (its name is frmproduct) containing the following records (the
resource record is Products table):
Barcode ----> primary key
itemName ----> Memo
ItemNo ----> Number
the primary key (barcode) has this format X10-1234
I creaded a parameter query (its name is FindProduct) to search on the
itemname. if I run this query, it will give me a pop up box asking to ent...
|
4 |
11/16/2008 5:57:33 PM |
|
|
Open a different form with command button
I have a command button on a form that opens a different form. I want to
open the same record on the command button form as on the main form. Now a
box pops up & asks for the record ID.
Please help.
--
Nancy...
|
5 |
11/16/2008 1:01:02 AM |
|
|
positional data in WHERE claus
I am writing code for a series of cascading combo boxes but do not how
to write the where claus for my desired activity.
The data for all combo boxes comes from tblJCA which contains JCA_PK
as autonumber, JCA_Number as <i>text</i> and JCA_Desc.
JCA_Number is formated as follows: 1.2.3 or 2.4.11
cboJCA1 shoulld list the single digit values where there is only
something in ...
|
5 |
11/15/2008 9:06:07 PM |
|
|
OutputTo question
I have the following in my code. It works as expected.
It exports the named table to an html file.
DoCmd.OutputTo acOutputTable, "tbl_MeetingDates", acFormatHTML,
"F:\html\MeetingDates.html"
What I would like to do is set it up to delete the old file, then export as
HTML and add my own HTML as its created. How can I have it export
basically a bunch of text - my html code - then the tabl...
|
6 |
11/15/2008 8:38:51 PM |
|
|
Filtering form containing combo boxes
My subform has a list of names which are in combo boxes. The form contains
EspID and the combo which is bound to EspID but shows the word rather than
the ID field.
If I right-click this field, I can enter >ro and filter out any names which
come before ro...
But is there a way of doing this in code?
At the moment, I have a second subform in my main form which is linked to a
table tha...
|
2 |
11/15/2008 11:40:24 AM |
|
|
What am I missing?!
I don't know why this won't work. I am getting a type mismatch error.
Dim db As DAO.Database
Dim rst As DAO.Recordset
Dim varItem As Variant
Set db = CurrentDb
Set rst = db.OpenRecordset("tbl_firearms_licence")
For Each varItem In Me.txt_gun_lic_no.Column(0)
With rst
.AddNew
rst![contact_ID] = [Forms]![add_new_all]![contact_ID]
rst![licence_type] = v...
|
3 |
11/15/2008 6:05:01 AM |
|
|
Why won't this work?
Private Sub Command2_Click()
Dim tot As Integer
tot = DCount("*", "Deposits", "DateDep")
Text3.Text = tot
End Sub
...
|
11 |
11/15/2008 5:10:35 AM |
|
|
insert into
I have a database that the users want to have a seperate table that holds the
primary keys of two other tables. So I create a table with both tables
primary keys in it:
Software_Node
NodeID
SoftwareID
(made both pk both numbers)
which is connected to the Software and Node tables by their pk's.
Now on the node form I have it where the user selects the software, and then
enters the nod...
|
8 |
11/15/2008 4:47:43 AM |
|
|
Before Update event
Hello
I have a form that checks for duplicate PPHN (Patient Personal Health
Number) on the before update event of the patient registration form. If a
duplicate is found, the user is presented with a msgbox giving 3 options:
Yes, No, Cancel. I would like to automatically populate the PPHN with a
random number (function call) when the user selects "No" but I'm hit with a
runtime error 2...
|
4 |
11/15/2008 4:46:15 AM |
|
|
How to Display in Forms- Join Table Query ?
Harlo, i am developing a quries base on 2 tables and got stuck with some
issues hopefully someone kind enough to provide some help and guidance...
I had a from that generate display for this 2 tables (with text boxes)
How do i get the input from this quries to display on individual text boxes ?
The form should be able to display lists of records to enable navigation
viewing this report....
|
3 |
11/15/2008 1:18:34 AM |
|
|
Select 1st Item
Hi again Groupies
When the listbox on my form receives the focus, I would like it's first
record to be selected. How do I make this happen with code?
I have tried:
Private Sub lstShopInventory_GotFocus()
Dim rst As DAO.Recordset
Me.Refresh
Set rst = Me.Recordset
rst.GetRows 1
End Sub
....nothing happened....
--
Thanks for taking the time!
CJ
------------...
|
6 |
11/15/2008 12:35:00 AM |
|
|
Conditional Formatting Using Date To Verify Age
I have a table (Alpha Roster) that has misc. info about personnel. One of
the fields is Date Of Birth (DOB). I would like to use conditional
formatting on the dates to where the text color would change if they were
younger than 26. I have the DOB Field setup as a Medium Date.
When I run the report, I would like all the personnel to be listed,
regardless of age, in ABC order, but just...
|
5 |
11/14/2008 11:53:00 PM |
|
|
Get dates from table where month and year like txtbox
I have a label control where I want to list all the dates that are like the
month and year that is displayed in a textbox (which gets it's date from a
calendar control), how would that be stated on form load?
something like....????
Dim text3 As Date
cal.Value = Date
text3 = cal.Value
Label8.Caption = DCount("DateDep", "Deposits", "Year([DateDep]) = " &
DatePart("y", Me![text3]) & " ...
|
6 |
11/14/2008 10:35:01 PM |
|
|
suppress SHIFT key
Hi All,
Can anyone tell me how to suppress the SHIFT key bypass?
Thanks,
Tracktraining
--
Learning ...
|
14 |
11/14/2008 8:57:35 PM |
|
|
Double Click List Box
Hi Groupies:
I am trying to open another form when I double click an item in a listbox.
However, I keep getting a parameter error. I don't understand why I am
getting this error because the field on the form I am trying to open is
definitely called SKU Number. The good news is that the parameter shows that
it has the correct value selected but when I click OK the form opens up
empty.
...
|
3 |
11/14/2008 8:33:23 PM |
|
|
Determine AbsolutePosition in Access97 subform
have an Access97 form with a subform (subD1W) that displays a number of
values from a query. The query name is "qryD1W". The values are displayed as
a continuous form. When I change one of the values in the subform, I want to
determine the recordnumber (absoluteposition) of the value I just changed.
This will direct other functions.
I had it working in an Access2000 database, but wh...
|
2 |
11/14/2008 8:26:10 PM |
|
|
Determine AbsolutePosition in Access97 subform
have an Access97 form with a subform (subD1W) that displays a number of
values from a query. The query name is "qryD1W". The values are displayed as
a continuous form. When I change one of the values in the subform, I want to
determine the recordnumber (absoluteposition) of the value I just changed.
This will direct other functions.
I had it working in an Access2000 database, but wh...
|
1 |
11/14/2008 8:18:02 PM |
|
|
OpenRecordset, AddNew won't add a record?
I'm no good at code but through lots of researching have managed to come up
with this and obviously I've missed something because it isn't adding a
record - hopefully someone can tell me where I'm going wrong.
Where the error appears is at rs.TOD.Update and it tells me "You cannot add
or change a record because a related record is required in
Subtbl_Obligations_MAIN".
What I'm trying...
|
6 |
11/14/2008 7:02:59 PM |
|
|
Repaint vs Refresh vs Requery
I have a form which contains a button that populate a field called "services"
in the subform based on a field called "scope" which is located on the form.
One record of scope on the form usually turns into several records of
"services" on the subform thru the use of an append query. and the "services"
fields do not automatically refresh ("services" is a text box and not a combo
box) The...
|
2 |
11/14/2008 6:34:04 PM |
|
|
Conditional Formatting
In Access 2003, I had this code to apply conditional formatting to a field:
With GrownYrSeason.FormatConditions _
.Add(acExpression, acNotEqual, Nz(GrownYrYear.Value, "") <> "XXX")
.BackColor = RGB(230, 230, 230)
End With
I recently upgraded to Access 2007, and this code seems to work sometimes,
and other times I get this message:
...
|
3 |
11/14/2008 6:20:04 PM |
|
|
Compile error using the Replace in the Codescan DB
Here is the code I'm using
Dim sOriginal As String
Dim sNew As String
Dim log As String
sOriginal = "tblMember"
sNew = "tblMemberUS"
String_In_Queries_Alter (sOriginal, sNew)
The module is from the codescan DB I got off Allen's site (I think).
Any help would be appreciated,
Shimon...
|
2 |
11/14/2008 5:26:52 PM |
|
|
update table from form
Hi
I would like to be able to update table dbo_datalots field StatusFlag to " "
where LotNumber in form matches field LotNumber in table (text fields) the
form has more than one lot number i(t prompts for stockcode and like serial
number )I need to update all records shown in form
tried following but syntex is wrong
Private Sub Command29_Click()
Dim strSQL As String
strSQ...
|
8 |
11/14/2008 3:43:02 PM |
|
|
Update Form Field from another Form
There are probably serveral ways this can be done, however I am having
trouble with them all.
I have a form with preloaded data that can be edited. However, if the data
needs to be changed, then the user should be able to pick the correct
[Employee] in this case.
The field itslef cannot be a lookup because it's tied to a table that is NOT
a lookup field - Nor should it be.
So, I ...
|
12 |
11/14/2008 3:37:40 PM |
|
|
embedded pivot tables will not requery
I have about 21 embedded pivot tables that where used to display user
information. I had to change the data linking and re-embed them for a project
my company is doing. However, when the form opens it is instructed to open
the excel spreadsheet that is embedded in it. But the data will not change
when the spreadsheet opens. I have pasted the on_load code below, how would I
pass to the ex...
|
1 |
11/14/2008 3:03:01 PM |
|
|
Preventing blank field
I have created a form to use for entering new records. I open this form with
the dataEntry property set to true. There are text boxes bound to the field
values and then a button I created to add an additional record. (I want to
create a form that the user will be able to enter data without using the
mouse.) The event code for this add button is simply DoCmd.RunCommand
acCmdRecordsGo...
|
8 |
11/14/2008 1:48:01 PM |