中DATAGRID怎么绑定SQL？代码是什么？

Dim Conn As SqlConnection = New SqlConnection("server=127.0.0.1;uid=sa;pwd=;database=new")
Conn.Open()
Dim str As String = "select * from message where userid='" & Trim(Request.QueryString("userid")) & "'"
Dim ad As SqlDataAdapter = New SqlDataAdapter(str, Conn)
ad.Fill(ds, "message")
Re1.DataSource = ds.Tables(0)
Re1.DataBind()
写了，怎么没有显示啊？

还是哪有错啊？