关于vb控制SQL Server的问题，在线等

我的操作系统是2000,安装sqlserver2000
我的工程是用ADO控件操作SQLserver，对于ODBC数据源我都设置好了，然后设置ADO的连接，测试都成功，而且我用ADO控件自身带的移动记录指针都好用，几个和ADO绑定的文本框都随ADO改变，但是遇到下列问题：
问题1：我的程序如下
private sub Text6_Keypress(KeyAscii as integer)
if KeyAscii=13 then
adodc1.Recordsource=
"Select * From 表1 Where [姓名] like"+"'"+text6.text+"%"+"'"
adodc1.refresh
end if
end sub运行出现问题：
一 首先弹出
[Microsoft][ODBC SQL Server Driver][SQL Server]在关键字'select'附近有语法错误
二 按回车，然后弹出
实时错误'-2147217900(80040e14)':
对象'Refresh'的方法'IAdodc'失败还有，工程中我添加两个按钮，一个用来前移，一个后移，按钮click事件中的代码如下
adodc1.recordset.movenext
adodc1.refresh
当按下按钮时，程序没有反映，text中的内中没有随按钮按下是变化
但是操作ADO控件本身的按钮却运行正常请大家 帮忙解决谢谢