I am not a VB Scripter, but I hope the logic in this VBA code is helpful.
Dim lngLastDay as long
Dim blnShowOnEvenDays as boolean
' Determine the last day of the previous month
lngLastDay = DateSerial(Year(Now), Month(Now), 1) - 1
' If the last day of the previous month was 29 or 31 (odd)...
Thanks in advance - any help will be appreciated.
Emails I receive from Ali-Express do not display graphics or images and links aren't active (no response to click). See attachment.
Emails I receive from any other senders display correctly.
Outlook settings are to download images automatically...
Hi Andy, what do you mean by 'messes up the other formatting'? Is it just messing up the alignment, changing fonts / font weights, converting everything to plain text?
The first step in problem solving is to understand the problem. Can you be more specific?
I'm not sure what you want to achieve, but hope this helps.
I copied your 'butter.jpg' to my c:\ and renamed it to 'butter.bmp'
In tblCmds i changed the first 7 PhotoURL's to C:\butter.bmp
In the form load code I added Dim pic as variant
I modified the code as in the attached screensnip and got...
Thanks Andrzejek, but that code produces the error 'Run time error 438: Object doesn't support this property or method'.
It is apparent that the property 'AttachmentCount' is only supported on form controls.
I worked around the problem by creating a form just for the 'Attachment' type field, and...
Hi Team, my Asset Register DB has a table which includes the following fields:
A yes/no field [Image] to indicate if a Photo is required.
An attachment field to contain the photo [Photo]
In the form code, me!Photo.attachmentcount returns 0 or 1 for the current record, no attachments or one...
I prefer VBA code to macros.
Access 2010 automatically creates Macros when I use the Control Wizards, which I then have to convert to VBA.
Is there a setting in Access 2010 to tell Access to create VBA procedures instead of macros.
Thanks
Foxy in Oz
My .mdb includes a form with 7 option groups on it (3,4, or 5 options), and I need another option group. When I add it to the form, and either save the form or switch to Form View, Access crashes with the 'Microsoft Office Access has encountered a problem and needs to close ....' dialogue box...
[Cardholder Name] Like '*" & Tempvar_CCN & "*'"
I believe with this code you will run into problems with names containing an apostophe e.g. O'Sullivan, where the result will be: [Cardholder Name] Like '*O'Sullivan*'
This may be preferred: "[Cardholder Name] Like ""*" & Tempvar_CCN & "*"""
To...
I'm sure someone will come up with a more efficient way but ....
Given that there will probably be more songs per artist than will fit across the page, how about creating a (temporary) table with fields:
Artist
Song1
Song2
Song3
Create a query to select the data you want, and write it to the...
Hi Techkenny1,
I am assuming that your invoices are a report from an Access app.
I had a similar requirement and solved it programmatically using ConvertReportToPDF from this website. Once it is installed into your app, it's just one line of code to output the report as a PDF file...
Hi FossilFool, I have VB6, but not installed on my machines, so yes I downloaded and unpacked.
I did the procedures documented in my earlier post on one machine. On the other machines I just copied the OCX and registered it.
I haven't deleted any .exd files, none of the ones I found on my...
The problem with uninstalling the update is that it leaves the machine vulnerable. In all conscience I could not do that to my clients, quite apart from the possible legal ramifications.
Providing a CD to clients with a batch file to copy the updated OCX and register it, is a small price to pay...
I'm using Access 2003.
Pressing Escape after changes are made to text boxes on a bound form, and a text box has the focus, triggers the FORM undo event.
Pressing escape whilst a combo box has the focus does not trigger the undo event.
Hope this helps.
This is how I solved my MSFLEXGRID / KB906715 problem.
Created a folder C:\VB (for convenience - optional)
Downloaded the VB6 SP6 Cumulative Update (KB957924) into c:\VB from:
http://www.microsoft.com/downloads/details.aspx?FamilyID=cb824e35-0403-45c4-9e41-459f0eb89e36&DisplayLang=en
Renamed...
I believe the escape key triggers the Undo event for the control that has the focus, but only if there is something to undo i.e. the data in the control has changed since it got the focus.
Put debug.print "Escape pressed" (or somthing) in the undo event procedure for the date control, and set...
Further to my last. Pressing control+break should take you to the error trap that is displaying the error message. Executing a resume (with no parameters) should take you to the offending code.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.