well I got this to work,
not by the option group like I had hoped but by the way of multiple query buttons. each "option" now has a unique button that changes the rowsource of the listbox to support the user parameter.
thanks for the help
I am trying to set up a search form allowing the users to search a table using 4 different criteria.
when the form is opened I get an parameters and an error,
it asks for the user to give it parameters for
[Forms]![Search]![NPA]
[Forms]![Search]![NXX]
[Forms]![Search]![LineRange]...
I have a doc that has a table with 4 columns and 50 rows, column 4 instructs the reader to go to Next Step?? or start reading at row ??.
Now there are additions/deletions of some action within the process so these steps change, not often but they do change.
as it is now, the table column one is...
Rick,
Thanks for your help pointing me in the new direction. it works beautifly.
here is the final code with many thanks to Rick Sprague!
Dim db As DAO.Database, rst As DAO.Recordset
Set db = CurrentDb
Set rst = db.OpenRecordset("StatusHistory")
With rst
.AddNew
![OrderID] =...
Rick,
Thanks for your help pointing me in the new direction. it works beautifly.
here is the final code with many thanks to Rick Sprague!
Dim db As DAO.Database, rst As DAO.Recordset
Set db = CurrentDb
Set rst = db.OpenRecordset("StatusHistory")
With rst
.AddNew
![OrderID] =...
Rick,
Thanks for your help pointing me in the new direction. it works beautifly.
here is the final code with many thanks to Rick Sprague!
Dim db As DAO.Database, rst As DAO.Recordset
Set db = CurrentDb
Set rst = db.OpenRecordset("StatusHistory")
With rst
.AddNew
![OrderID] =...
Goal: create a status History table for Intervals
Reason: Status changes all the time, Need to track the interval in days that a order was within each status.
I have changed some object names to easier understand what I am trying to accomplish, here is what I have so far:
Running code...
Goal: create a status History table for Intervals
Reason: Status changes all the time, Need to track the interval in days that a order was within each status.
I have changed some object names to easier understand what I am trying to accomplish, here is what I have so far:
Running code...
Goal: create a status History table for Intervals
Reason: Status changes all the time, Need to track the interval in days that a order was within each status.
I have changed some object names to easier understand what I am trying to accomplish, here is what I have so far:
Running code...
Thanks RickSpr
I think I have it... it seems to work here is the final Code
Sub AlterFieldType(TblName As String, AlterTempField As String, NewDataType As String)
On Error GoTo Err_AlterFieldType
Dim db As DAO.Database
Dim qdf As DAO.QueryDef
Set db = CurrentDb()...
I found this code that will do what I am needing posted by DougP. Thanks Doug,
How do I place this code in a sub routine and How do I put the last piece of info in a Debug window?
Sub AlterFieldType(TblName As String, FieldName As String, NewDataType As String)
Dim db As Database
Dim qdf As...
Goal - Pull data from Production DB and populate fields in an Operations DB.
First determine Orders to pull. so I created a Union Query to get a list of Orders.
Pull Data From Production. built a query using the Union query to pull three fields, Date1, Date2, Text1
I need to send this...
can't figure this one out.
this code works to archive when the tables are local. However I need this to be a split database with the tables on the server. When that happens the code errors.
it stops on the Delete portion. and it cannot find the search key.
here is the error;
Run Time Error...
can't figure this one out.
this code works to archive when the tables are local. However I need this to be a split database with the tables on the server. When that happens the code errors.
it stops on the Delete portion. and it cannot find the search key.
here is the error;
Run Time Error...
We Did it!!!!!
Thank you jlitondo !!!!
it was small change in the single quotes being in the expression.
here is the final code that did it
Private Sub Command5_Click()
Dim rst As DAO.Recordset
Dim dbs As Database
Dim RepIdVar As String 'Variable to store the Rep ID
Dim...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.