selam arkadaşlar asp de acemiyim

kid=Request.QueryString("kid")
Set rs = Server.CreateObject("ADODB.Recordset")
sor = "Select * from tablo WHERE kid=" & kid & ""
rs.Open sor,Sur,1,3

kodlar bunlar eklediğim konuların en üstte çıkması için ne gibi bir değişiklik yapmam gerekiyor