Search results

1) You can set the criteria for the date field of the recordsource of the form to the control you use for determining which date to show. 2) You can filter the form by the date.

By default they will show up unless you have turned off 'Allow Full Menus' and 'Allow Default Shortcut Menus' or in the Form under the Other tab, you have 'Shortcut Menu' set to No.

You can use DateDiff to return the number of days: DATEDIFF("d",#05/01/2013#,date)

Thanks for the feedback John. If you have any questions let me know. Good Luck with your project.

John, this is the last I'll say about this. Using ADO and SQL is just about the easiest way to add columns to external tables. It always works. You can do it if your backend is Access or MSSQL or MYSQL etc. You can add tables, columns, write data anything you can do with SQL. I've...

John, The code I gave you Function AddCols(AccessVer As Integer, DBName, tblName, ColName, ColType As String, Optional ColSize As Integer) Dim myConn As New ADODB.Connection, FullColType As String If ColSize > 0 Then FullColType = ColType & "(" & ColSize & ")" Else FullColType = ColType End If...

JohnPapa, I gave you code on how to use SQL on your backend. Your problem sounds like you are trying to add columns to a live table, one that is open. If you have the form open and want to add columns to the underlying recordsource (table) you first need to remove the forms recordsource (set...

Try using SQL.

The code is in the main form, not subform.

From the code you showed I am assuming you are remotely trying to add columns to a table. If you are just adding columns to the same DB you are working from, you don't need the connection code, just use docmd: Function AddCols(tblName, ColName, ColType As String, Optional ColSize As Integer)...

To do any editing of a DB you have to have sole access, in other words, it can't be opened by someone else when you are attempting to remote access to it.

Try using SQL to add columns to a table. Function AddCols(AccessVer As Integer, DBName, tblName, ColName, ColType As String, Optional ColSize As Integer) Dim myConn As New ADODB.Connection, FullColType As String If ColSize > 0 Then FullColType = ColType & "(" & ColSize & ")" Else FullColType =...

:) Your welcome. Good luck with the rest of your project.

You could try adding an On Timer event for your popup form to check for focus (set it to 100 so it acts fast) Private Sub Form_Timer() If Screen.ActiveForm.Name <> "frmshortcut" Then DoCmd.Close acForm, "frmshortcut" End Sub

I'm guessing your trying to store your time as a data type Date. Access stores any data type date as date:time (01/01/2000 12:00:00 PM) and all you can do is format to show only what part you choose, i.e, Time only. Then, when you try to do math Access is performing the math as an interval...

Not quite sure what you are actually trying to accomplish but here is what I think you are looking for. In the end I'm confused by what your end goal is with all these criss-crossed tables.

Table2: PKID ProductIDSet: this would be the Set ProductID from Products table ProductID: this would be the single product ProductID from Products table You could use Append queries if you don't like using VBA.

Hi Derek. The second button will generate a new table with each data broken out into it's own column. I'm sure there is a limit to how many columns you can have in a table (it might be 255) and for each row in the original table you will create a new column in the new table so any table with...

You could concatenate each row into a single string as long as you don't actually need to have each location in it's own column. Function Concat(Prod As String) As String Dim Rst As DAO.Recordset, MySql As String Concat = "" MySql = "SELECT * FROM tbl_StockLoc WHERE ((([Prod])='" & Prod & "'));"...

In the table for products add an additional column IsSet as boolean for stating if the product is a set or just a single. Then, have a 2nd table tied to the product table that contains the list of items contained in each set. First table: individual items = A,B,C,D,E,F,G,H,I,J,K & SetA, SetB...