Search results

sorry about that, i'll do that next time.

I got it to work by using delete and append queries to a local table, and then bringing in that table: Private Sub Command57_Click() Dim db As DAO.Database Dim rs As DAO.Recordset Dim sHTML As String Dim strQuery As String Dim msgbody As String DoCmd.SetWarnings...

i also tried using the results from a table, and when the table gets created, it looks fine. however, when i attempt to embed the table into an e-mail, I get the same problem. thus, I suspect something is awry with one of these two lines: Set f = fs.OpenTextFile("QueryResults.html", ForReading)...

sorry, I thought the output would be the same as opening the HTML as a text.... how do I that then?

when add this line: DoCmd.OutputTo acOutputQuery, "MyQuery", acFormatRTF, "C:\Users\" & Adent & "\Desktop\QueryResults.rtf", the file saved looks fine. basically, the same as above but without the file path

i appear to be a roadblock here, where my VBA code is producing some weird results. essentially, everything works perfectly fine except that the first field in the row of the query results in the e-mail contains additional text. that text has the ending string of the path where the app resides...

this appears to have worked for me. I'm going to have others test it today. thanks again for the suggestion!

i appreciate the effort, but my company prohibits us from uploading any content.

i'll see if that is feasible. thanks for the quick responses and extended effort!

it's possible, but I don't recall. still doesn't make sense why it would apply to one form and not another.

the only "save" codes pertain to the records, not the forms. but just closing the form does not contain any events.

i am a developer for a database app that gets used by 500+ users. users install the frontend on their desktop and use that exclusively. once I make updates, the app then automatically re-installs when they open it. within this app, I have a form with two subforms (both are shown as datasheet...

ideally, that would work, but users have gotten in the habit of using short names while others are using long names (e.g. IBM vs. I.B.M vs. International Business Machines vs. Int' Bus. Machines). we're in the process of cleaning some of that up, but this method works. this group deals with...

good suggestions - i'll make sure to do that. thank you!

this is helpful, but I already got something similar in another portion of my app. thanks!

I'm limited to just two characters for the start range, but I can make this work. FYI, I had to remove two double quotes from your code (the one after [start_range] and the one before AND). but after making that adjustment, I got it to work as expected. this was very helpful, thank you!

yeah, I've suggested that, but they want certain folks focused on specific companies as some are more complex than others.

thanks for the quick responses, CJ_London and GPGeorge! I suppose I should also mention that my current lookup method is just a dlookup: Dim companyF As String companyF = Left([Company_Name], 1) Me.Assigned_To = DLookup("[Analyst]", "[tbl_company_analysts]", "[first_char]...

the users of my app would like to auto-assign someone to a task based upon the first two letters of a company name. I currently have a table with each letter of the english alphabet (including numbers 0-9) and the corresponding assignee. for example: A: Stan B: Kyle C: Timmy D. Cartman E. Kenny...

that's a good thought, and just now tried that, but no changes. i have FireFox, Chrome, Edge (Default). I did not see a setting in Edge to change the default PDF app (only whether or not to open an online PDF vs. downloading it). this is very frustrating.... I am noticing that Adobe Reader DC...