如何在ADO下使用通配符查询的代码？请各位帮忙

在DAO下可以用like 进行通配符的查询
Dim dbs As Database, rst As Recordset
Set dbs = OpenDatabase("Northwind.mdb")
Set rst = dbs.OpenRecordset("SELECT LastName," _
& " FirstName FROM Employees" _
& " WHERE LastName Like '[A-D]*';")
在ADO下用like
strSQL = "SELECT * from 职工表 where 姓名like '陈*'"
m_rstReport.Open strSQL, g_cnnProductDatabase, adOpenForwardOnly, adLockReadOnly, adCmdText
返回的记录为0
请高手帮忙，最好有代码的例子，谢谢