Search results

  1. Nero

    Mailing Dilemma

    Hi, There is probably an easy answer to this but here goes.. I have a db that logs all calls to our IT dept. I want to mail a report each week showing all calls not resolved. I'm stuck trying to decide where is best to put the code for the event. If the db was open 24/7 then I could use the on...
  2. Nero

    Still getting me Open File()

    Jon, When a file is open ie Word,Excel etc it leaves what I call a ghost file ( similar to the .ldb file in Access). You could use the 'file search' method in VBA to see if these files exist. If they don't exist then send your data. If they do exist then you could try the Kill file command to...
  3. Nero

    Monthly Email

    Hayley, Glad to help. Btw how do you get your avatar to animate?? Kev.
  4. Nero

    How to avoid this?

    Right click on your shortcuts and make sure that each one is pointing to the right version of Access. ie"C:\Program Files\Microsoft Office2k\Office\MSACCESS.EXE" "C:\YourFolder\YourDb.mdb"
  5. Nero

    Automatic E-mail triggered by change in value in Database

    I would use the on_timer event on a form and set the timer to execute code every hour. You would have to experiment with the time delay though ( the value 4000 is equal to about 3 seconds I think). To send the email you could use similar code that I posted in the modules forum...
  6. Nero

    Monthly Email

    Hayley, Try this, I havn't tested it though but it might help. Create a module and insert this code. Public Function Mailer() Dim olkapps As Outlook.Application Dim olknamespaces As Outlook.NameSpace Dim objmailitems As Outlook.MailItem Set olkapps = New Outlook.Application Set...
  7. Nero

    Oleaut32.dll

    suzzieo, I can give you half an answer. This happened to me laast year and the answer was to download an update for your controls. I think I got it from the Microsoft website (version 8). It was about 8 meg in size but for the life of me I can't remember the exact name of the file. Sorry I can't...
  8. Nero

    What new products or services would help?

    What about an ActiveX control section with Q & A and downloadable controls.
  9. Nero

    How to hide the 'X' in right corner

    If you mean the close button on the title bar then I don't think you can remove it. If you mean the default menu bar then you can create your own and use it in place of the default. These settings are as Rich said in the startup options.
  10. Nero

    Dim As Database

    You must make sure that the DAO object library is higher priority than the ADO library. It will not work otherwise:D
  11. Nero

    Attach a document to an e-mail through code

    Create a module and insert this code. Public Function MailNot() Dim olkapps As Outlook.Application Dim olknamespaces As Outlook.NameSpace Dim objmailitems As Outlook.MailItem Set olkapps = New Outlook.Application Set olknamespaces = GetNamespace("MAPI") Set objmailitems =...
  12. Nero

    Import external tables

    You could try creating three blank tables and running an append query to import the data .
  13. Nero

    photos

    DW. Is your database going to be secured? If so I wrote a VB .exe that will allow the user to pick out an image from an external file and insert the path name into the database. Post back if you want it.
  14. Nero

    Scope of Recordsets in a Form

    I may be wrong ( I'm sure someone will correct me) but do you need to declare your database and recordset as public and not private in a module?
  15. Nero

    Urgent-Create Link in code

    I think ISAM is refering to your connection string. This is an error that can occure when using VB to connect to an Access database using DAO or ADO. I've not come accross it in stand alone Access though. I have a database that picks out DBF files from a folder and appends them to a table with a...
  16. Nero

    Loop to all records in a recordset.

    I have ammended my original code so that if a field value is empty it will move to the next record.Hope it helps with the second part of your problem. On Error GoTo err Dim db As Database Dim rst As Recordset Set db = CurrentDb Set rst = db.OpenRecordset("Table Name") With rst .MoveFirst Do...
  17. Nero

    Loop to all records in a recordset.

    I don't know if this will help. basically it will loop through your records and add a value to the specified field. On Error GoTo err Dim db As Database Dim rst As Recordset Set db = CurrentDb Set rst = db.OpenRecordset("Db Name") With rst .MoveFirst Do Until rst.EOF .Edit .Fields("Field...
  18. Nero

    Loop to all records in a recordset.

    What do you want to do with the loop?
  19. Nero

    Dim Problems

    Also check that the DAO library is of higher priority than the Active X Data Object Library. You will get that error if it isn't.
  20. Nero

    Recordsets and Tables

    Sounds like a refresh or update problem. Try 'Me.Refresh' In your code.
Back
Top Bottom