Search results

Yes. Eval() works on functions. You've named that code "MyMethod" but you declared it as a Function. A "Method" (IFAIK) is a... thing ... (piece of code) within a COM Object (a DLL file) Some Methods return values and as such act like functions. EDIT: Controls also have Methods...

(sorry for the inadvertent bump, i was trying to post a new thread. this thread is years old) FYI: there was no (vba) solution. You simply can't call a method without a consistent number of parameters. The workaround was to dump it all into a text file, then shell out and run an exe that...

nevermind. worked around it, I *had* written a function for filtering, so I added the custID filter to that function. (still would love to know why that wasn't workin)

A very complex query, involves four tables (about 2/3 of that data in the enterprise system that it is) and 4 very complex complex criteria. one of which is so complex I had to write a function for it) THAT works. But if the user right-clicks on the form (or me on the query) and tries to...

Thanks guys, OK a query with an Nz([POSUbDate]) and then count the zeros. Although, now I'm thinking I *could* write a DNull() function that works via ADO, it would probably be slower..

I have a table of Transactions "tblTransactions" in which more than one row will have the same PO number. Each row has a date field called "POSubDate" I need to know if *any* row has a null in that field. I tried: If IsNull(DMin("POSubDate", "tblTransactions", "POno = " & Chr(34) & Me.PONo &...

Public Declare Function funcIMConvert Lib "ImageMagickObject.dll" Alias "convert" (ByVal Arg1 As String, Arg2 As String) As String Runtime Error 453: Specified DLL Function not found. I guess that means Convert is not a "valid entry point" And (unless I'm mistaken) I have to declare each...

Exactly! You seem to be exactly the person I am looking for, and this is exactly what I want to try. (early-binding I’ve heard of that!) It does return one as string from a series of inputs. It works like a DOS copy command. It can convert file1 in to file2, or it can convert file1, file2...

We discussed that. 1. I did vastly simplify the command for the purposes of the post, there are about 4 variables per file, and an additional string I need to tack on the end. 2 Your function just loops through pairs of files. (I could do that) I need to run this on 5 files once, 34 files the...

Still working on this problem from another thread. I have a third party COM object DLL called ImageMagick, I’ve registered the DLL with RegSvr, and I’ve been using it by declaring an object variable and setting a reference within an individual sub. It has a “convert” command that saves a file...

you're right, the .movenext should be after End if

I traded tripping over the 1st record, for tripping over the last record. Private Sub Command42_Click() Dim OutApp As Outlook.Application Dim OutMail As Outlook.MailItem Dim strbody As String Dim objMyTable As Object Dim strEmailAdds as string Set OutApp =...

Private Sub Command42_Click() Dim OutApp As Outlook.Application Dim OutMail As Outlook.MailItem Dim strbody As String Dim objMyTable As Object Dim strEmailAdds as string Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) Set...

oh, I see , you're only creating one email. moving the Set OutMail = OutApp.CreateItem(olMailItem) to inside the Do Loop would create a new message for each record in the table. But is that what you want? or do you want to send one email to all the addresses in the table? In THAT case we...

Private Sub Command42_Click() Dim OutApp As Outlook.Application Dim OutMail As Outlook.MailItem Dim strbody As String Dim objMyTable As Object Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) Set objMyTable =...

(I thought MyEverything was always a VB placeholder) MSDN says clearly Eval() will work on USER functions. This had me thinking, a lot. But at the top end we would have to have high hundreds of parameters, it would be unworkable. But three things have occurred to me: 1. The ImageMagick...

Untested: Private Sub SendEmailfromTable() Dim OutApp As Outlook.Application Dim OutMail As Outlook.MailItem Dim strbody As String Dim objMyTable As Object Set OutApp = CreateObject("Outlook.Application") Set OutMail = OutApp.CreateItem(olMailItem) Set objMyTable=...

Not to thread-jack but: I thought dimensioning a recordset and using a connection string *WAS* DAO. But dimensioning an *object* and setting an object reference *WAS* ADO. if not: (1) do I not know the difference between ADO and DAO? (possibly I learned it all so along ago I no longer...

Works on one machine but not another? What are the differences between the machines? How much RAM does he have? Paging file size? What other apps is he running? Pull up task manager and/or Resource Monitor and see what is going on. try it on a 3rd and 4th and 5th machine hth

OK the plog mystery has been solved. It wasn't too many quotes, it was not enough: this works: Sub PlogTest2() str1 = Chr(34) & "Hello" & Chr(34) Eval ("MsgBox(" & str1 & ")") End Sub The way he wrote it, it Eval() wasn't evaluating the "msgbox" it was opening the msgbox, in an attempt to get...