Recent content by jfischer

If the new app has a subform on one of the tabbed pages, Access will automatically save the parent form record before shifting focus to the subform. Then, when you set the focus back to the main form by clicking a tab, the parent record will already have been saved. If you don't want the...

I agree with Hap007--get the front-end MDB, along with any related Admin security information (passwords, etc.). Only commercial products need to tightly control changes to their distributed objects. Even then, the good Access products that I use provide front-end MDBs/ADPs for all but the...

I'm running all three versions of Access under Windows XP and they coexist just fine. Use the Custom Installation option of Office XP in order to keep your older versions. One thing you'll have to do is check all your shortcuts that launch various Access applications to make sure the proper...

To change a Reference on your client's PC, open up the References and uncheck the Microsoft Outlook 10.0 Object Library. (It should say "MISSING" next to it.) Then, close the References sheet. Now, open the References sheet again and scroll through the list until you find Microsoft...

My understanding from your first post was that your client had a PC with Office 2000 installed on it. The Access 2000 application was removed from the Office 2000 suite, and replaced with Access Runtime 2000. Since Access 2000 was the only application replaced in the Office 2000 suite, the...

Is there a particular reason that you are trying to use the Microsoft Outlook 10.0 Object Library? Some of the features may not be compatible with Microsoft Outlook 2000 (the Office 2000 application being automated, in this case). You've obviously hit one of these forward compatibilty...

The Office 2000 users will need a copy of msoutl.olb from Office XP in order to use the Microsoft Outlook 10.0 Object Library. Office 2000 uses the Microsoft Outlook 9.0 (or 9.1) Object Library, named msoutl9.olb. To avoid library conflicts on your Office 2000 user's PC, I'd suggest copying...

Here's some sample code that I use to change connections in ADPs. You can adapt this code as needed. Function ChangeConnection(sServerName As String, _ sLoginName As String, _ sPassword As String, _ bTrustedYn As...

1 a) The RecordsetClone is a mirror image of the recordset that is bound to your form. Every form bound to a recordset has a RecordsetClone as well. 1 b) Yes, you can use the .Find method with the RecordsetClone. 2) When you attach recordsets to ADO connections the process passes through...

Here's a sample routine that you can adapt. It uses a Customer ID search to position the form (Me.) to that customer's record. Private Sub Cust_Reposition(sCustID As String) Dim rs As ADODB.Recordset Set rs = Me.RecordsetClone 'May need to wait for the recordset to be populated Do...

Did you relink your tables after making the IP address change? The links are stored in each table's definition. For example: Dim tdf As TableDef Set tdf = CurrentDb.TableDefs("tblMyTable") MsgBox "tblMyTable.Connect = " & tdf.Connect Set tdf = Nothing You should see a...

You can use a Command object to execute the stored procedure and retrieve the result. For example: Dim com As ADODB.Command Dim lRet As Long Set com = New ADODB.Command With com .ActiveConnection = CurrentProject.Connection .CommandText = "dbo.sp_CheckServerRole&quot...

Assuming that your Access database is using a File DSN located in the database directory, you can change the IP address in a couple of ways. The quick and dirty way is to use Notepad. Use your Windows Explorer to navigate to the database directory and find the File DSN (.dsn extension) used by...

If you don't need a fancy form to display the query results, simply use the OpenQuery statement. For example: Private Sub btnGo_Click() On Error Resume Next DoCmd.OpenQuery "qrySearch", acViewNormal, acReadOnly End Sub Leave off the acReadOnly parameter if you want to allow the...

Sorry, I didn't catch your &quot;<>&quot;. My example should be: If rs.Fields(&quot;Memo&quot;).Value & &quot;&quot; <> &quot;&quot; Then 'Process code... End If