Search results

I have got a query running on several tables. The result is: Customer Invoicedate Invoicenumber 100 13-2-2015 10001 200 NULL 20001 200 NULL 20002 I use a RecordSet to modify the field Invoicedate. The recordset has a...

I was experimenting with a Web controls on a form. It works nice in Access 2013. But I forget that older version do not support Web controls. So I removed it from my form. But now when I open the database in an earlier version it keeps telling me that the specific form in which the control was...

Thanks JHB! Your solution works. What I still don't understand is why it works the first time.

Sorry, a piece of code was missing. At the beginning af the module is: Dim apXL As Excel.Application Dim xlWbk As Excel.Workbook Dim xlWsh As Excel.Worksheet Dim xlCht As Excel.Chart Set apXL = CreateObject("Excel.Application") Set xlWbk = apXL.Workbooks.Add...

I have a generic module for creating Excel reports. This code works, but only once..... Set rstBron = dbOFA.OpenRecordset("SELECT Year([Date]) AS Year, Cint(Format([Date],'mm')) AS Month, Amount FROM Invoices" apXL.Visible = True Set xlWsh = xlWbk.Worksheets(1) xlWsh.Name = "Data"...

This code reads the message for all mail in your Inbox: Dim olApp As New Outlook.Application Dim olIn As Outlook.Folder Dim olMail As MailItem Set olApp = Outlook.Application Set MAPISpace = olApp.GetNamespace("MAPI") Set olIn = MAPISpace.GetDefaultFolder(olFolderInbox) For...

Another option is the split function. Split([Yourtext],"*")(0) gives all before the * Split([Yourtext],"*")(1) gives all behind the *

Made a test. See included database. Test is by ID which is an autonumber field. Als by ItemID which is an text field. Both work fine. Mayby this helps you.....

Why not add two fields on your report? One for the start date, the other for the end date. Make them a list box so you can select value form your query.

I agree with Spikepl. Check if nobody is using the database. You do not need a batch file. This works also.... Dim fso As New scripting.FileSystemObject If fso.FolderExists(Me.AppPath & "\Backup\") = False Then fso.CreateFolder (Me.AppPath & "\Backup\") fso.CopyFile Me.DatabasePath...

To check a mailbox: Dim olApp As New Outlook.Application Dim olIn, olMap As Outlook.Folder Set olApp = Outlook.Application Set MAPISpace = olApp.GetNamespace("MAPI") Set olIn = MAPISpace.GetDefaultFolder(olFolderInbox) Set olMap = olIn.Folders("YourOwnFolder") msgbox olMap.Items.Count...

If you have the right library, this code is enough.... With Application.FileDialog(msoFileDialogFolderPicker) .AllowMultiSelect = False .Show If .SelectedItems.Count > 0 Then strPath = .SelectedItems(1) End If End With

I have made you an example..... There is no refresh in the sub form yet to show what's happening. Maybe the switching of the record can be done easier......

There is another solution, using a parameter in the query. In the design of the query create a parameter (sorry, I have got a dutch version): see Screen1 In VBA you can refer to the parameter: Set qdfExample = CurrentDb.QueryDefs("QueryEQ") qdfExample.Parameters("parModel") =...

I do not have an Access 2010 environment. One machine is running 64-bit Windows 8 with 64-bit Access 2013. Then the library is stored in C:\Program Files\Microsoft Office\Office15\MSACC.OLB The other machine is 64-bit Windows 7 with 32-bit Access 2007. Then the library is stored in...

As far I can see, these are all normal Access library functions. On my Access 2013 the library is C:\Program Files\Microsoft Office\Office15\MSACC.OLB Is there a difference on the sixth machine with this file?

What happens after update? It must be something with a library but first you need to know which functions is activated....

A bit further with XML and DOMDocuments With the help of Gemma I am a bit further. I can iterate a tag! But a second iteration is not working. The XML file is included. Renamed to TXT. This is the code: Private Sub NameS_Click() Dim objDoc As DOMDocument60 Dim objNodeList As...

Thanks for your replies. Still not a step further towards the solution... The XML I included was a part of the Original. The complete one is surely valid. I included it. The XML file has a header <GrpHdr> and then <PmtInf> several times. The header has information about a bankstatement. The...

For weeks I am trying to read an XML file which needs to be processed in an Access database. I can not find the proper way to: - find a specific node - iterate from there The XML file is an international bank file: <?xml version="1.0" encoding="utf-8"?> <Document...