数据库程序 显示出表里的信息 出错了？？

<%
name=request("name")
number=request("phone")
response.write name&"<br>"
response.write number
Set conn = Server.CreateObject("ADODB.Connection")
Strconn="DRIVER={Microsoft Access Driver (*.mdb)}; "
Strconn=Strconn & "DBQ=" & Server.MapPath("user.mdb")
conn.Open Strconn
sql="insert into username values("+name+","+number+")"
conn.execute sql
dim rs
Set rs=Server.CreateObject("ADODB.Recordset")
strSql ="Select * From username "  
rs.Open strSql,db,3,3                       
response.write rs
conn.close
%>
提示如下：
错误类型：
ADODB.Recordset (0x800A0BB9)
参数类型不正确，或不在可以接受的范围之内，或与其他参数冲突。