Search results

This seems to work... INSERT INTO tblB SELECT T.DistinctMonth AS ReferenceMonth FROM (SELECT DISTINCT DateSerial(Year(A.SampleDateTime),Month(A.SampleDateTime),1) AS DistinctMonth FROM tblA AS A) AS T LEFT JOIN tblB AS B ON T.DistinctMonth = B.ReferenceMonth WHERE B.ReferenceMonth...

Hi guys, I have one table of records (table A) which contains a date/time field. I want to create a query that inserts a new record in another table (table B) for every distinct month that appears in the date/time field in table A (if it doesn't already exist in table B) I've uploaded a...

They are indexed, yes (of course :rolleyes:) - dataset not massive (~50k records?) If I change the recordset type to dynaset, does that impact the fact I am updating records within it (nod to "inconsistent updates") ?

Hi there, I have a query which I use to populate a recordset (effectively, a subset of a table based on some criteria), which is then looped through and updated (can't avoid the loop - I can't update the table with SQL, it requires VBA code unfortunately) Stupidly, I forgot that if the query...

It's not a form though? It's the actual record in the datasheet view of the table itself? I can do it with a form but I don't have time to construct a fancy interface

Hi guys, I have a table into which a number of colleagues will be entering records manually (i.e. directly into datasheet view, not via any form interface) I have a separate, static, table which lists, among other data, users and devices (one-to-many) In the table to be updated, I...

Thanks informer - good advice which I do heed An old post so can't quite remember but I think I got around the problem by incorporating a staging table into which I imported the raw data. Then applied some queries to refine it (i.e. remove duplicates based on field combinations and also...

Thanks guys Minty, I found that same thread during my web trawling but it didn't lead me down any appropriate paths - but thanks for sharing! Galaxiom, I'll look into that!

Hi guys, General question - title pretty much covers it; does anybody know if it's possible to query Active Directory without having to resort to VBA / ADO recordsets / looping etc.? I can pull the data via VBA no problem but that just gives me an ADO Recordset 'in memory' - I need the results...

Figured it out... Hope this helps somebody else... Public Sub ReplyToEMail(strSourceEMail As String) Dim appOutlook As Object Dim objMailItem As Object Dim objMailResponse As Object Set appOutlook = CreateObject("Outlook.Application") Set objMailItem =...

Hi guys, Anybody know if it's possible to create a reply to an e-mail if the 'source' e-mail is saved locally as a .msg file (as opposed to using a mailitem directly from an Outlook folder) Here is as far as I've gotten... Private appOutlook As Object ' Outlook Application Private...

Think so - okay thanks for that suggestion plog, let me delve into that a bit further...

Thanks plog Yeah, that was where I was falling over. Is there no way around this then?

Hi guys, I have a switchboard form which has a kind of dashboard element which tallies the counts of records according to a variety of pre-defined queries. At the moment I am just using domain aggregate functions to return the counts. So the Control Source for one of the textboxes in the...

Thanks for clarifying guys - was purely a question of aesthetics, don't particularly want to house another form when a plain MsgBox will suffice!

Hi guys, Anybody know if it's possible to show a downward arrow as part of the prompt text in a message box? Or are you restricted to only the ASCII table of characters? I'm trying this : strResult = "(" & ChrW(8595) & " " & Format(dblReduction, "0.0%") & ")" MsgBox strResult...

If it works, chances are it's fine? Not sure what your concern is around the 3 x End Select's - that's usually what happens when you have three blocks embedded within one another. Eventually you have to close out the blocks; there's nothing unusual in several blocks ending in quick succession...

Thanks guys - I was just looking for reassurance. To ease my concern, I've added a separate step to check the validity of the path prior to following the hyperlink, to reduce the likelihood that error 16388 is anything but a user-opted cancellation : Private Sub comViewAttachment_Click()...

Hi spike I have googled it? At length? And that link doesn't give me any alternatives? As you can see, I already have error handling in place, and one of the questions I asked was whether it would be safe to explicitly ignore error 16388, in order to continue to capture genuine issues with...

Hi guys, I have a continuous subform of attachments which includes a command button for the user to open/view the attachment in question. It's fairly straightforward : Private Sub comViewAttachment_Click() On Error GoTo ErrorHandler Application.FollowHyperlink...