SQL数据库不能更新的小问题

今天在调试程序时发现SQL数据库不能更新，

当时读取时选用了：select top 1 * from tablename where username='”& username &”‘

rs.Open txtSQL,conn,1,3