Search results

  1. Travis

    Refresh Links to Multiple Backends?

    You'll need to add a break point and walk through the code. Check that the Path & filename combined actually points to the file you are trying to relink. It is possible that you are missing the "\" between the path and the filename and it is not able to relink because the file does not exists...
  2. Travis

    Refresh Links to Multiple Backends?

    that is one of those hidden system tables. Obviously the table is not (or should not be) in your linkage table. You will need to write code that skips these tables. The result you are getting of Null is because that table name does not exist in you table, thus the [DatabaseName] field is...
  3. Travis

    Refresh Links to Multiple Backends?

    If you are using this line of code strPath = DLookup("[DatabaseName]", "[tblLinkage]", "TableName='" & tdf.Name & "'") I'll Assume that you have a Table named 'tblLinkage' It also has two fields 'Databasename' and 'Tablename' Also the Name returned by tdf.Name exists in this table and the...
  4. Travis

    Refresh Links to Multiple Backends?

    First Create a Table Two Columns (tblLinkage) 1. Table name [TableName] 2. Database Table Resides in [DatabaseName] 'Change the strFileName to strPath Function RefreshLinks(strPath As String) As Boolean Dim dbs As Database Dim intCount As Integer Dim tdf As TableDef Dim...
  5. Travis

    DoCmd.SendObject

    I had ment the whole procedure not just the single line. However, I have researched some of my notes and one that I have concerning the DoCmd.SendObjects is that It does not perform well in LOOPS (For Loops, While Loops etc.) My note was to create a seperate function (Passing it the needed...
  6. Travis

    DoCmd.SendObject

    Please post your code so that I can look at it and make suggestions.
  7. Travis

    Many Frontends/Users with same set of functions

    I'm not aware of a way to do this with just MS Access (without the copy and paste of modules) 1. You could create an Update process using Cloning on the Front End 2. You could create a DLL (C++, VB or .NET) 3. DCOM or COM, COM+ Application (C++, VB or .NET) 4. You could create a Web Service...
  8. Travis

    Qckst Question - VERY NEWBIE Call Function

    Do you have to be linked to all of the data? Access is notorious for bringing all of the data accrossed (even if you only want a single Record). One posiblity (won't fix the speed issue, but it could mask it) is to have the form open Not Visible to the User and have a Nice Splash Screen...
  9. Travis

    Qckst Question - VERY NEWBIE Call Function

    See steps 1 and 2 above. You need to create what is called a Public Module You will place the GotoNextRecord procedure in this module. Notice that it is "Public", this allows all code modules to be able to see this procedure.
  10. Travis

    Refresh Links to Multiple Backends?

    The code should be very similar to how you are doing the single link refresh. However, you will need to break the tables out that will be refreshed with each Backend. In the Past I have used a Table Structure to Hold the Table names and what Database they reside in. Of course without know...
  11. Travis

    Qckst Question - VERY NEWBIE Call Function

    You need to create a seperate Module 1. Go to the Modules Tab 2. Create a new Module 3. Past the Move code into the module Example Public Sub GotoNextRecord() On Error GoTo ErrorHandler DoCmd.GoToRecord , , acNext Exit_GotoNextRecord: Exit Sub ErrorHandler: MsgBox...
  12. Travis

    DoCmd.SendObject

    Are you getting a message (Such as an Error) or does it just step through the code like nothing happened? Are you using Error Trapping? If you are and you are using "On Error Resume Next" then remark this out and try again. Other thing to try, Make sure that OutLook is open on your PC and...
  13. Travis

    Dealing with 'non-existent' data

    You cannot set String Variables to NULL. Use the Nz Function (Null-To-Zero). This will allow you to set a string to a value that is valid. If NULL needs to be a valid variable value then you need to use a different Variable Type.
  14. Travis

    Automating Outlook Task

    See Microsofts Knowledge base ACC2000: How to Use Automation to Add a Task or a Reminder to Microsoft Outlook
  15. Travis

    Help With TransferSpreadsheet

    You said that you copied and Pasted the commands and changed the names where necessary You just introduced the human error factor :) What I do to help myself is first open NotePad and copy the line that works and the lines that should be exactly like it right below. I then walk through...
  16. Travis

    database not working on other computers

    Refresh the References. You can do this by picking one (Don't forget which one) and then adding it back in. Or just add a reference and then remove it.
  17. Travis

    Size of File Real Small after Compact

    This is correct. What this process does is removes all of the extra space that the MDB took up but never gave back. Databases are notorious space hogs. When you run the program it will converts the Code into Machine language. It does not necessarily remove the old machine code. Also if you...
  18. Travis

    Click event has priority over exit event

    Where is the variable set to True? in the OnClick code? Is that before or after the Docmd.Close? Before Then does the OnExit code go in the Else part (=True) in the Unload event?Nothing Since Setting Cancel=True will cancel the close event What goes in the first part (If Cancel = False)...
  19. Travis

    Click event has priority over exit event

    Set a Form Level Boolean Variable, set it equal to False on the Open Event of the Form. When Ever a button is pressed that you want the OnExit Event to ignore set this variable equal to True. Move all of your OnExit Code to the Private Sub Form_Unload(Cancel As Integer) Cancel=fDoExit If...
  20. Travis

    Wildcards

    If all you are doing is checking for the existance of an "@" sign and that there are characters before and after you can check as follows: Dim aEMAIL as Variant Dim sEMAIL as String sEMAIL=Me.FieldName aEMIAL=Split(sEMAIL,"@") If Ubound(aEMAIL)<>1 then 'Invalid Email It does not contain...
Back
Top Bottom