Search results

If I've understood your question.... .To = enter recipients email address surrounded by double quotes .Recipients.ResolveAll .Subject = add subject line .Body = here is what you want the message to say…you can use the field names on the form to transfer the desired data. .DISPLAY

...forgot to add, too many single quotes... sSQL2 = "SELECT A, B, C, D, E FROM tblHAPList WHERE D LIKE '%" & Me.txtKeyword & "%'" single quotes should surround the % and the text, for a total of 2 single quotes. " ' % " & Me.txtKeyword & " % ' "

Hi there, ...is that like "Who's on First?" ADO uses "%" as its wildcard, not "*".

Good to hear, smercer, & thanks for the appreciation. Believe it or not, though finally correct, I may have procrastinated the resolution. I think this one goes to Wayne.

smercer, Wayne is correct, (I believe we both are). either... If DLookup("[Book_ID]", "tbl_Inventory_Each_Book", _ "([Book_ID]= '" & Me![Condenced_Book_ID] & "' ) and " & _ "([Customer_No]= " & Forms!frm_Book_Sales![txt_Cust_ID] & ") and " & _ "(Not [Date_Sold] Is Null)") = Me!Condenced_Book_ID...

I DON"T BELIEVE THIS (refering to myself)... smercer, try this please.. If DLookup("[Book_ID]", "tbl_Inventory_Each_Book", _ "([Book_ID]= '" & Me![Condenced_Book_ID] & "' ) and " & _ "([Customer_No]= " & Forms!frm_Book_Sales![txt_Cust_ID] & ") and " & _ "(Not [Date_Sold] Is Null)") =...

In general, when continuing code, to the next line, use Space then Underscore. With strings, you still must concatenate, so last character in code, before the line break, gets a Double quote, Ampersand, then Space and Underscore. "SELECT * " & _ "FROM tblBooks " & _ "WHERE txtISBN = '" &...

...Famous last words. Wayne is correct, about the single quotes, (I saw the attachment, after the fact). I'm quite certain about "Not Is Null", this may be why, it's being read as a value...thus, "No Operator" or "Type Mismatch". It doesn't recognize "Is Not Null" even the function, is syntaxed...

smercer, my apologies, can you say "What the #$#*& was I talking about"! Possibly, a chance to redeem myself... Wayne, i'm sure this was an oversight also, Not this, "Date_Sold Is Not Null" But, "Date_Sold Not Is Null" If this doesn't work, Im going to lay low for a while, LOL...

Sorry, value wasn't requisite but, syntax was incorrect. Good Luck!

If DLookup("[Book_ID]", "tbl_Inventory_Each_Book", "([Book_ID]= me![Condenced_Book_ID]) and ... You didn't ask DLookUp for a value. & you have, one too many brackets, in your DLookUp syntax Should be; If IsNull(DLookup("[Book_ID]", "tbl_Inventory_Each_Book", "[Book_ID]=...

Soapy, is it not just a matter of... [Dep Dft] = [Dep Dft] + 0.1 ? Yes, the format will come out, 5.10, is that the problem? Can you not change the format, to "0.0"? Sorry Soapy, can you specify exactly, where the problem lies, pls!

Thank-you Wayne, I appreciate that, both the explanation & recognition (even though my catch, was somewhat inadvertant, LOL!). Either way Wayne, a pleasure. Thank-you & take care!

Good work Wayne & Jon. Nice catch on the SQL statement, recordset reference Wayne. Guys, bear with me here, I'm not familiar with the Response.Write statement, and I thought the Execute method, was only applicable to Action queries. I looked up both in the VBA help, couldn't find anything for...

Yes you can use "+" to concatenate in Access, Sub Conc() Dim s As String, f As String, g As String s = "Bon": f = "jo": g = "ur" Debug.Print s + f + g End Sub but as you see, in your own code, it can be problematic. With integers of course, they will be added, and apparently, when referencing...

Try this, to get the referencing correct. For iL_I = 1 To 99 If iL_I Like "[0-9]" Then aa = "0" Else aa = "" aG_Points(iL_I) = rst1("Pos" & aa & iL_I) Next In case of problem, throw this in standard module & run, you'll get the idea... Sub ABC() Dim iL_I As Integer, aa As String...

Sorry for the error there, guys. Thank-you ghudson, that was very clear & informative!

CrashIhdm, maybe you & ghudson have considered this already, but, could it be in the chain of events? Would Unload be more appropriate? I know when opening, Load happens before open, I assume the reverse when closing. But, just in case, or something along these lines (changing the event)...

Maybe this... 12MoChgs: DSum("[Charges]","[AR_Rec]","[Month]>= #" & DateAdd("m",-11,[Forms]![frmAR_RecDialog]![RptMonth]) & "# And [Month]<= #" & [Forms]![frmAR_RecDialog]![RptMonth] & "#")

Yes Surjer, I use that quite often. Especially, when the string may have "quotes" or "apostrophes" itself. This syntax covers that... WHERE txtStoreName = """ & cboStore & """" double, double quotes. otherwise, if store name = "Johnson's", the syntax, will get confused. This won't work...