Search results

  1. D

    Iterate Through Forms Collection To Get Recordset

    Thank you, Kodo, that does work; sort of. It's actually about 900 pages that I'd have to wade through; maybe there's a Sys table that holds this info?
  2. D

    Iterate Through Forms Collection To Get Recordset

    Iterate Through Forms Collection To Get Recordsources Hi all, I've been charged with redeveloping a huge (several 100+ tables, forms, etc.) database which was brought over from another company. I'm trying to iterate through the forms to get their RecordSources, but I can't quite get it. This...
  3. D

    Access control of Word through VBA (error: remote server machine does not exist)

    I've never really used Word Automation, but it does seem that you're actually creating two instances of the Word Application by: Surely you can take the second statement out as it's already being accomplished by the first? Also, I seem to remember that you'll get an error if you use...
  4. D

    updating a blank field with its record number

    The loop will not automatically move to the next record, you have to tell it to by: rs.MoveNext
  5. D

    cannot open form and subform - "you cancelled the previous operation"

    I have had experience with this as well. If you are fortunate enough to have a back-up, you should be able to simply copy-paste the non-corrupt objects from the back-up over the corrupt objects in the regular database, that way you won't lose any data.
  6. D

    Schedule Compact

    You need to set a Reference to the DAO 3.5 (or above) library: Open a Module->Tools->References->Microsoft DAO 3.x Library
  7. D

    Insert New Records with Range of Values

    Yes, I have; a For...Next loop and RunSQL statement should do the trick: Public Function fInsert_Nums(numStart As Long, numEnd As Long) DoCmd.SetWarnings False Dim i As Long For i = numStart To numEnd DoCmd.RunSQL "INSERT INTO tblEXAMPLE (Num_Field) VALUES (" & i & ")" Next i DoCmd.SetWarnings...
  8. D

    GIS Database

    I'm glad that I stumbled on this link. I've been doing Access development for a couple of years now, first at IBM(!) and for the last month or so for a mid-sized mortgage lender. Though I love Access development, writing applications for industries which don't interest me personally has been a...
  9. D

    Upper Case in SQL View

    The easiest way to do this is to base a query off of your Union Query and do your formatting there.
  10. D

    Excel Automation Clean-up

    Hi all, I'm just looking to see if anyone has ever reached a definitive conclusion on dealing with Excel Automation and the age-old problem of the Excel Application hanging around in the background with the user having to eventually do a Ctl-Alt-Del or, worse, having to restart the computer in...
  11. D

    Query searches range of dates

    Date()-800 will begin your search 800 days prior to the previous date, which is not what you want. Between Date()-7 and Date()+7 should get you what you want.
  12. D

    Access Generating DB1, DB2 etc

    Yes, 'Compact on Close' is almost certainly the cause. When the database compacts, it is actually creating a new file, transferring all objects to the new file, deleting the old file, and then renaming the new one. If another user is in the database while it is trying to compact, then it can't...
  13. D

    FileSystemObject Property to determine if file is currently in use?

    Well, it's actually a .txt file that I'm trying to get at. Either way, thanks for the reply, I'm sure that I can make use of it for future reference.
  14. D

    FileSystemObject Property to determine if file is currently in use?

    Is there a Method of the FileSystemObject class which will allow you to determine whether or not the file is currently in use (i.e. is open)? *edit* if not, is there another class which could make this determination?
  15. D

    Excel Problem

    This should definitely be in the FAQ as just about anyone who has attempted Excel Automation (myself included) has had this problem. I haven't looked at your example, but I can almost assuredly tell you that your problem lies within not setting UserControl=True like...
  16. D

    Query expression calling for a previous month

    Replace the "any day last month" with (Month(Date()))-1 and [date of sale] with Month([date of sale])
  17. D

    Importing from multiple Excel spreadsheets

    ok, I played around with it and got this: Public Function fGet_Files() Dim xlApp As Object Dim fs As Object Dim i As Long Dim strPath As String strPath = "C:Your_Filepath_Name" Set xlApp = CreateObject("Excel.Application") Set fs = xlApp.FileSearch With fs .newsearch .lookin = strPath...
  18. D

    General Info About Reports

    Sorry, Pat, forgot to respond. Yes, this is a pretty good source of info; thank you.
  19. D

    Help with CopyFromRecordset

    ok, I believe I see what your problem is. You have declared your variables using Early Binding and you have set your variables using late binding. Try: Set xlApp=New Excel.Application instead of Set xlApp = CreateObject("Excel.Application")
  20. D

    General Info About Reports

    Hi, all, I'm looking to get some general information and tips about Access reports. Up to this point, the majority of reporting/output has been via Excel as very few people within the company that I work for have MS Access but everyone has an Excel license. The upside to this is that I've been...
Back
Top Bottom