|
Subform printing report
I have a subform that checks does some error checking in the Before UPdate
Event. I seem to have that working ok. What I want to be able to do now is
if the form passes all my error checks, I want to ask to print a report or
not? Also, If this is a new record will the report be blank? Do I have to
have some code to save the data, before printing. I'm not sure where to
start on this. ...
|
4 |
12/12/2008 3:21:51 AM |
|
|
Help - Incrementing ID based on date
This is a multi-part message in MIME format.
------=_NextPart_000_0008_01C95B0E.8F7FFFD0
Content-Type: text/plain;
format=flowed;
charset="iso-8859-1";
reply-type=original
Content-Transfer-Encoding: 7bit
Hi
I am trying to create an incrementing ID based on a date prefix like
"CC-10-Dec-2008-001" using an example by Helen Feddema from Access Archon
Column 114 from www.helenfedd...
|
4 |
12/12/2008 1:14:50 AM |
|
|
Go To Record with filter
tblBillets
Billet (PK) - Text with format XX-99,
frmBilletEdit
cboBillet with qry accessing tblBillets.
I want to find billets with only govt- in the primary key, but the message I
get is
The Microsoft Jet Database Engine does not recognize govt as a valid field
name or expression.
Any help you can offer is appreciated.
--
Teach me to fish! Thanks for the help.
Pa...
|
2 |
12/11/2008 11:03:04 PM |
|
|
Need help for VBA script in ACCESS
Hi
I am trying to write VBA script in Access 2003 like this:
Private Sub ProgramList_AfterUpdate()
Dim prog As Variant
Dim stYTD As Variant
If Me.ProgramList = 1 Then prog = "JPAAF" Else If Me.ProgramList = 2 Then
prog = "JPAAE" Else If Me.ProgramList = 3 Then prog = "JPAAH" Else If Me.
ProgramList = 4 Then prog = "JPABX" Else If Me.ProgramList = 5 Then prog =
"JPABR" Else If Me.Progra...
|
5 |
12/11/2008 9:14:10 PM |
|
|
complie error:next without for
The following code gives me the next without for error. What is wrong?
Dim c As Control
If Not Me.NewRecord Then
For Each c In Me.Controls
If c.Tag = "Vehicle" Or c.Tag = "Outsourced" Then
If IsNull(c) Then
c.Visible = False
Else
c.Visible = True
End If
...
|
4 |
12/11/2008 7:36:37 PM |
|
|
Closing Form After Set Amount of Time
I created a form as a welcome splash. I want it to display on startup. I know
how to do that. I need to know how to automatically close the form after a
set amount of time (say, 2 seconds from the current time). I don't know if
you do this through macros, coding, or the expression builder, so any help
would be greatly appreciated. Thanks.
--
I am running on Office 2003, unless otherwise...
|
3 |
12/11/2008 7:35:02 PM |
|
|
Not in list not working
I have a combo box with values chosen from a table field
(fldDepartmentsAffected). If the value selected does not already
exist, I want to allow the entry (even though limit to list set to
yes) but before doing that I want to "alert" the user so that he can
think twice before adding a new entry. I am using the following code:
Private Sub cboActionBy_NotInList(NewData As String, Response As...
|
2 |
12/11/2008 5:07:02 PM |
|
|
clearing and closing a form
I have a form that contains a linked subform. It is being used as a data
entry screen. If someone begins typing into the form (either the form or the
subform) it inserts a record if they simply stop inputing the information and
close the form. I need a way to close the form and to not add any record that
may have been started.
So far I've tried the following:
1. I've turned off the "...
|
3 |
12/11/2008 3:19:01 PM |
|
|
Error with form.requery (no current record)
I want to dump all information within the table and requery the form, and i
get error no current record, please help! :)
.MoveLast
.MoveFirst
I = 1
Do While I <= .RecordCount
basketID = QryDat.Fields.Item("basketID")
productID = QryDat.Fields.Item("productID")
subtotal = QryDat.Fields.Item...
|
4 |
12/11/2008 2:20:23 PM |
|
|
Query
I've got this inside a query, but i want to add a WHERE, which only when
quantity isnt a negative value, (quantity within tblProductsLog can be 10 or
-10). Any suggestions?
SELECT tblProducts.productID, tblProducts.product, tblProducts.price,
tblProducts.staffID, tblProducts.productType, tblProducts.deleted,
Sum(tblProductsLog.quantity) AS quantity, tblProducts.reduction
FROM tblProduc...
|
3 |
12/11/2008 1:52:12 PM |
|
|
The "good" way to use .Recordset
I have done sore database editing using
Dim rs As DAO.Recordset
....
Set rs = DBEngine(0)(0).OpenRecordset(strSelect)
....
but I have also used some different methods, ie, some different
resources. I got used to this one just because I had some more
unsolved difficulties with the other alternative ways I tried.
I would jut like to know if the above is a acceptable way of doing
thi...
|
2 |
12/11/2008 12:48:17 PM |
|
|
Build form dynamically based on user
Hi
I have an application that I'm going to distribute to multiple clients. To
avoid several application files I want to build one application file and
build forms dynamically based on the user that's running the application.
The clients have slightly different customization needs. There are also
different numbers of fields that should be visible on the forms, based on
user level.
...
|
4 |
12/11/2008 9:11:04 AM |
|
|
Deleting Records in a subform after change in field on main form.
Hi everyone, I have a data entry form [RMA Entry Form]with one subform
[RMADetail Form]. There is a field on the mainform [combo32] that when its
value changes I want to delete any existing records in the subfor.
Thanks in advance
Bret...
|
4 |
12/11/2008 6:45:39 AM |
|
|
Saving the date & time from a form
Hi there,
Wondering if someone could assist with some difficulty I'm having with
saving the date and time from a form into a table.
I have a form which displays the Date() and Time() in a text box using the
Control Source property. When the form is opened it automatically inserts
this data. I cant quite work out how to then save the data from these fields
into the table, as the Cont...
|
4 |
12/11/2008 6:12:30 AM |
|
|
newbie question on how to add records or rows of data
I have a simple form that is for payroll data entry. I have a combo
that allows the data entry people to select the employee number and
about 8 fields are autofilled with everything from TimeClockID,
EmployeeName, PayGroupID, etc.
The main data entry line is where they choose a Location (CostCenter)
and PayCategory (Job such as Welder, etc.). Currently there is only
one line for this entry...
|
2 |
12/11/2008 6:10:33 AM |
|
|
Filter a listbox based on the value of a combobox
I have a form with a combobox (combo1) and a listbox (list1); the controls
are unbound and the row sources are two different tables with a common field
(system_id). I would like to use the value chosen in combo1 in a subquery to
make up the "where" clause of list1, but I am not sure quite how to
accomplish this or which event to use. Ideally, I want the row source of
list1 to be:
"sel...
|
6 |
12/11/2008 4:45:53 AM |
|
|
Data type mismatch text to expression search
Hi all,
I am trying to search a query where the field is actual an expression
comprised of a subquery.
I am getting a type mismatch error. Here is the code:
strWhere = "([expClientMainName] LIKE "" * " & Me.txtClientSearch & "" * ")"
I'm not even sure if this is possible.
Many thanks for your help.
...
|
11 |
12/11/2008 12:24:06 AM |
|
|
Running query for invoices that start with #5???
How do I create a query that will look up multiple invoices that start with
the number 5? When I type in criteria "5" nothing shows up even though I know
I have plenty.....thanks.
Shannon
--
Message posted via AccessMonster.com
http://www.accessmonster.com/Uwe/Forums.aspx/access-formscoding/200812/1
...
|
9 |
12/10/2008 11:56:22 PM |
|
|
Modify sql statement
Hello,
I and doing an archive and would like to make a simple change but can't
figure it out. Here is the code:
'Step 1: Initialize database object inside a transaction.
Set ws = DBEngine(0)
ws.BeginTrans
bInTrans = True
Set db = ws(0)
'Step 2: Execute the append.
strSql = "INSERT INTO tblCandidatesArchive "
strSql = strSql & " IN 'J:\Bak\PFS\Recruiting\MyCandidat...
|
3 |
12/10/2008 11:33:00 PM |
|
|
Code using list box and multi select option
I am very new to writing code and know very little.
I have a form that is used to enter parameters in for multiple reports and
queries, therefore there is multiple if-then-else statements in the code. The
first query (qryCurrentInventory2) relies upon the date (cboDate) and a
selection of 1 of 3 units (lstUnit) to run the query. I would like to make
it possible for the user to select m...
|
9 |
12/10/2008 10:40:01 PM |
|
|
Update syntax error?
"UPDATE tblBaskets SET timestamp='" & Now() & "' WHERE basketID=" & basketID
& ";"
if i update the timestamp it gives a syntax error :< timestamp is Date/Time
with general date...
|
3 |
12/10/2008 9:41:44 PM |
|
|
How to use a recordset to validate and entry?
I have a form where user enters a BOL number (bill of lading) and on lost
focus of that field i would like it to be able to go out and look at another
table to see if that BOL is a valid number.
Can someone give me an idea on how to do this?...
|
4 |
12/10/2008 8:58:01 PM |
|
|
I want the Subform total in a textbox in the main form
I want the Subform total in a textbox in the main form.
I got a subform with invoice number and for each invoice I got a total on
each line. I want the sum of each line in the Total column to show in a text
box on the main form.
...
|
3 |
12/10/2008 8:44:00 PM |
|
|
Minimizing SwitchBoard
I want my Switchboard be minimized every time I work with any other form.
Tried to do so with coding OnLostFocus event, but it did not do the job.
I woud not like to code every button (wich are responsible for opening
different forms and reports) on the SB to minimize its motherform on click.
Is there any other way to make the SB go down every time I work woth other
object?...
|
1 |
12/10/2008 8:31:02 PM |
|
|
Query used for Report
I have created a query on a table to be used for a report. The sorting is
not working like I would expect and I can't figure out why.
I have 4 fields in the select query design:
Risk_Exp_Lvl sorted Ascending Criteria "High" or "Medium"
Risk_Exposure sorted Descending
Prob_Occur
Conseq_Occur
Risk_Exp_Lvl Risk_exposure Prob_Occur Conseq_Occur
High 25 5 ...
|
8 |
12/10/2008 11:08:10 PM |