Adding a condition

[system]

Hi all,

I want to add a condition on a query using VBA. I’m just discovering SDK so my pb could seem easy : the ‘Work Date’ object is a date object and I want to make it equal to “2005/10/01” (for example). Here is the code :

ActiveDocument.DataProviders.Item(intReqIndex).Queries(1).Conditions.Add ClassCondition, "Work Date", "Equal to", strLine

where strLine is the string “2005/10/01”.
I’m workin on a DB2 database and the result is an SQL error cause of the date type of ‘work date’. So I’ve tried to change the code

ActiveDocument.DataProviders.Item(intReqIndex).Queries(1).Conditions.Add ClassCondition, "Work Date", "Equal to", strLine,boDateVariable

But it still doesn’t work, it adds to my query "Date Work equal to " Could someone help me?

---

Toby (BOB member since 2005-10-28)

[system]

I got my solution, I’ve to add quotes inside my string :

VBA Condition.Add

I have been searching through the lists to find an answer to my problem, the closest to findingg a solution was from Mr Rathbun back in March 02. My problem concerns adding a Between operator on a Date Object using VBA. following his advice I have created the new operator as follows but I keep getting an error I have tried lots of combinations i.e. changing the datatype to date or string but none work, can any one help! the basics are. [code:1:c9b4ba04fb]Dim dfrom As String Dim dto As String…

 ...  "'"+strLine+"'" ...

Excuse, next time i ll search better the forum before asking

---

Toby (BOB member since 2005-10-28)