Olmadı arkadaşlar.
Hata kodu verdirmeyi başardım. Kod ve hata satırları aşağıda.

Microsoft OLE DB Provider for SQL Server hata '80040e14'
Invalid column name 'trn'.
index.asp, satır 32



30-Set rs = Server.CreateObject("Adodb.Recordset")
31-Sorgu = "select * from YONETIM where KADI ='" & KADI & "'"
32-set rs = bag.execute(Sorgu)
33-rs.Open Sorgu, bag, 1, 3