数据库查询结果排续？？

数据库为MSSQL2000，使用ADO控件，DNS连接，VB为客户端这个语句执行成功
Adodc1.RecordSource = "select * from 表 where 日期>'2004-4-24' order by 数据编号"
Adodc1.Refresh
因为在实际引用中需要使用日期为变动的（由操作人员输入），所以要使用变量，但修改为这个语句执行失败Adodc1.RecordSource = "select * from 表 where 日期>' order by 数据编号" & Text1.Text & "'"
Adodc1.Refresh错误提示为
SQL SERVER 从字符串转换为datetime时发生语法错误那位大仙看一下！