More or less than not working.....

[spud]

Why does this not work?


If DataEnvironment1.rsISSUED1033.State = adStateOpen Then DataEnvironment1.rsISSUED1033.Close

DataEnvironment1.Commands("ISSUED1033").CommandType = adCmdText
DataEnvironment1.Commands("ISSUED1033").CommandText = "SELECT * FROM ISSUED1033 WHERE DysOnIssue >= '" & Text4.Text & "'"
DataEnvironment1.ISSUED1033

DataReport6.DataMember = "ISSUED1033"

DataReport6.Show

'allows a refresh with new data without having to close the report first.
DataReport6.Refresh

The DysOnIssue contains numbers of days that the equipment has been issued and text4 contains a number of day's that you wish to see equipment issued over. But it does'nt work...HELP!

thx

[brucevde]

Try a sql statement without single quotes around the textbox value.

DataEnvironment1.Commands("ISSUED1033").CommandText = "SELECT * FROM ISSUED1033 WHERE DysOnIssue >= " & Text4.Text

[spud]

Brucevde

i get Get Data type mismatch incriteria expresion

[spud]

If I just use = then it works fine?