Not Getting Back Rows From SQL

Hi,

I am trying to connect to a SQL DB and pull data from it. But i never get back any rows. I have run the query, it works fine and i get back rows. But htis does not seem to work. HELP ?

Attaching my code 

TryDim ConnStr As String = System.Configuration.ConfigurationManager.ConnectionStrings("Engineering_Health_SiteConnectionString").ToStringURLConn = New Data.SqlClient.SqlConnection(ConnStr)

URLConn.Open()

 Dim param1 As New Data.SqlClient.SqlParameter("@FG", Data.SqlDbType.NVarChar)

Dim param2 As New Data.SqlClient.SqlParameter("@SS", Data.SqlDbType.NVarChar)

Dim query As String = "Engineering_Health_Site.dbo.usp_GetSiteURL"Dim comm As New Data.SqlClient.SqlCommand(query)

comm.Connection = URLConn

comm.CommandType = Data.CommandType.StoredProcedureparam1.Value = Me.DropDownList1.SelectedValue.Trim

comm.Parameters.Add(param1)param2.Value = Me.DropDownList2.SelectedValue.Trim

comm.Parameters.Add(param2)Dim adap As New Data.SqlClient.SqlDataAdapter(comm)Dim dt As New Data.DataTable

adap.Fill(dt)For Each row As Data.DataRow In dt.Rows

Response.Write(row(1).ToString)

NextCatch ex As Exception

Response.Write(ex.Message)

Finally

URLConn.Close()

End Try