Execute的问题谁来帮我（再线等待）

[caojin]

set rs=comm.Execute 处有问题总是过不去快救我
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={sql server};dsn=address;server=(local);uid=ueser;pwd=123;database=addrbook"
set comm=server.createobject("adodb.command")
comm.commandtype=1
comm.commandtext="select * from tong where 姓名='"&request.form("name")&"'"
set mypl=comm.createparameter("mname",129,1,13)
comm.parameters.append mypl
comm.parameters("mname")=request.form("name")
set comm.activeconnection=conn
set rs=comm.Execute
if rs.eof then
response.write"没有这个人"
else
response.write rs.fields("姓名")
response.write rs.fields("电话")
response.write rs.fields("地址")
end if
set rs=nothing
set comm=nothing
set conn=nothing
%>
提示如下
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E09)
/lushi/lianxi.asp, 第 11 行

[caojin]

谁回答我为什么没人来那

[yangyanli]

看不懂你写的程序
set conn=server.createobject("adodb.connection")
conn.open "driver={sql server};dsn=address;server=(local);uid=ueser;pwd=123;database=addrbook"
sql="select * from tong where 姓名='"&request.form("name")&"'"
set rs=conn.execute(sql)
if rs.eof then
response.write("没有记录")
else
....
end if
rs.close
set rs=nothing
conn.close
set conn=nothing