Search results

Hi If you are to use a laptop for updating your data then read up on Replication. It haddles the sort of problem you have identified using globally unique identifiers (GUIDs). These are random rather than sequential numbers. I hope this helps.

Hi I've run an app linked to 3 b/e dbs for several years without any problems. You should be fine.

If you post the code you are using I'll have a look.

Nothing wrong with having the f\e and b\e in the same folder unless at a later date you want to make it multi user

to find the b\e append the b\e name to the CurrentProject.Path e.g. strSearchPath = CurrentProject.Path & "\myDb.mdb"

CurrentProject.Path will return the application folder, i.e. the front end location.

currentdb.name gives you the full installation path. If you want just the folder then manipulate the string using instr, instrrev, mid etc. The following function from the KB will give you the backend. Public Function Get_Linked_DbName(tableName As String) As String Dim myDb As...

You could try decompiling. Also try creating new db and importing forms etc. Search this forum for decompiling.

The approach I use is to test for the presence of the last table on application start e.g.start splash screen. The reason for using the last table is if a previous re-link failed earlier tables may be linked but not latter tables. If the table isn’t present prompt the user to locate your b/e db...

The error is probably because your control is a label control. Place On Error Resume Next before your other code. If you need error handling then test for the specific err and then resume next.

If you search for 'relink tables' on this forum or on the Microsoft KB you will find some good examples. If you really get stuck let me know.

dim ctl as control for each ctl in me.controls ctl.enabled = false next If you only want certain controls then using a tag on control may prove useful to you.

Try RefreshLink mthod rather than relinking

In the On_Click event try somtething like Me.myControl.ControlTipText = Me.myControl.Column(4) Column(?) being the one holding the descriptive text

Try creating a new database. This will have its own MSysAccessObjects table. Then import all tables etc. from your original db.

The following is an example from Help. This example adds a Salary field with a data type of Currency to the Employees table. Sub AlterTableX1() Dim dbs As Database ' Modify this line to include the path to Northwind ' on your computer. Set dbs = OpenDatabase("Northwind.mdb") ' Add the...

Try setting the control source of the textbox to the underlying table field. Use the after update event of the combo to update the data, e.g. myTextBox =[Vision Post Reference].column(2)

This may not be the answer but print preview will only work if the PC has a printer installed.

Search for Mousewheel on this forum. There are articles covering what you need.

Try If IsNull(Me.AuditDate) Or Me.AuditDate = "" Then MsgBox "You must enter a date!" docmd.cancelevent End If End Sub