Posted on: 7/9/2012 12:24:07 AM | Views : 231

 Id = Request.QueryString("Id")
        Dim myConnection As New SqlConnection(ConfigurationManager.AppSettings("ConnectionString"))
        Dim cmd As New SqlCommand("SELECT Username,Topic,Message FROM Topic where Id ='" & _
                                  Request.QueryString("Id") & "'", myConnection)
       
        cmd.CommandType = CommandType.Text
        cmd.Connection.Open()

        Dim myDA As New SqlDataAdapter(cmd)
        Dim ds As New DataSet()
        myDA.Fill(ds, "Topic" ...

Go to the complete details ...