recordset sorgu hatası

merhaba arkadaşlar , kayıt güncelleme yapmak için şöyle bi kod oluşturdum ama hata alıyorum sürekli çözemedim.

<!--#include file="conn.asp"-->
<!--#include file="ayarlar.asp"-->
<%
dim ida
ida = Request.Form("Tidx")
set rseditson = Server.CreateObject("Adodb.Recordset")
sql = " Select * from Arpa Where Tid = "&ida&""
rseditson.open sql,baglan,1,3
rseditson("Tarih") = Request.Form("tarih0")
rseditson("Mustahsil") = Request.Form("Mustahsil")
rseditson("Plaka") = Request.Form("Plaka")
rseditson("TahAdi") = Request.Form("TahAdi")
rseditson("TahKod") = Request.Form("TahKod")
rseditson("Hekto") = Request.Form("Hekto")
rseditson("Nem") = Request.Form("Nem")
rseditson("Durum") = Request.Form("Sonuc")
rseditson("LabPer") = Request.Form("LabPer")
rseditson("Not") = Request.Form("Not")
reseditson.update

%>
<%=("güncelleme tamam")%>

sayfayı çalıştırdığımda şöyle bi hata alıyorum
Microsoft Office Access Database Engine hata '80040e14'
'Tid =' sorgu ifadesi içindeki Sözdizimi hatas&yacute; (eksik i&thorn;leç)
/APA/bilgigun.asp, satır 8

ida = Request.Form("Tidx")

değişkenin formdan geldiğine emin misin, querystring olmasın ? ayrıca Tid = ' " ida " ' diye de yapabilirsin

denedim olmuyor yine.. form sayfası ve bilgigun.asp dosya kodları şöyle


admin.asp?islem=duzenle&reportid=reportid kodları

<%
islem = Request.Querystring("islem")
idx = Request.Querystring("reportid")
if islem = "duzenle" and reportid = ""&reportid&"" then
set rsedit = Server.CreateObject("Adodb.Recordset")
sql = "Select * from Arpa where Tid = "&idx&""
rsedit.open sql,baglan,1,3
%>
<table style="width: 50%" align="center">
<%
if rsedit.eof then
response.write("HATALI BİR DURUM VAR")
Else
%>
<tr>
<td style="width: 294px">
dbid</td>
<td style="width: 367px">
<input name="Tidx" type="text" value='<%=rsedit("Tid")%>'></td>
</tr>
<tr>
<form id="duzenle" method="post" action="bilgigun.asp">
<td style="width: 294px">
Tarih</td>
<td style="width: 367px">
<input name="tarih0" type="text" value="<%=rsedit("Tarih")%>"></td>
</tr>
<tr>
<td style="width: 294px">
M�stahsil</td>
<td style="width: 367px">
<input name="Mustahsil" type="text" value="<%=rsedit("Mustahsil")%>"></td>
</tr>
<tr>
<td style="width: 294px">
Plaka</td>
<td style="width: 367px">
<input name="Plaka" type="text" value='<%=rsedit("plaka")%>'></td>
</tr>
<tr>
<td style="width: 294px">
Hammadde Cinsi</td>
<td style="width: 367px">
<input name="TahAdi" type="text" value='<%=rsedit("TahAdi")%>'></td>
</tr>
<tr>
<td style="width: 294px">
Hammadde Kodu </td>
<td style="width: 367px">
<input name="TahKod" type="text" value='<%=rsedit("TahKod")%>'></td>
</tr>
<tr>
<td style="width: 294px">
Yo�unluk</td>
<td style="width: 367px">
<input name="Hekto" type="text" value='<%=rsedit("Hekto")%>'></td>
</tr>
<tr>
<td style="width: 294px">
Nem</td>
<td style="width: 367px">
<input name="Nem" type="text" value='<%=rsedit("Nem")%>'></td>
</tr>
<tr>
<td style="width: 294px">
Sonu�</td>
<td style="width: 367px">
<input name="Sonuc" type="text" value='<%=rsedit("Durum")%>'></td>
</tr>
<tr>
<td style="width: 294px">
Analizi Yapan</td>
<td style="width: 367px">
<input name="LabPer" type="text" value='<%=rsedit("LabPer")%>'></td>
</tr>
<tr>
<td style="width: 294px">
Not</td>
<td style="width: 367px">
<input name="Not" type="text" value="<%=rsedit("Not")%>"></td>
</tr>
<tr>
<td style="width: 294px" class="style1">
&nbsp;</td>
<td style="width: 367px" class="style1">
<input name="Submit2" style="width: 134px" type="submit" value="Kayitlari g�ncelle"></td>
</tr>

</table>
</form>
<% end if
end if
%>
---------------------------------------------------------------------------------
Burasıda formun post edildiği bilgigun.asp kaynak kodları


<!--#include file="conn.asp"-->
<!--#include file="ayarlar.asp"-->
<%
dim ida
ida = Request.Form("Tidx")
set rseditson = Server.CreateObject("Adodb.Recordset")
sql = " Select * from Arpa Where Tid ="&ida&""
rseditson.open sql,baglan,1,3
rseditson("Tarih") = Request.Form("tarih0")
rseditson("Mustahsil") = Request.Form("Mustahsil")
rseditson("Plaka") = Request.Form("Plaka")
rseditson("TahAdi") = Request.Form("TahAdi")
rseditson("TahKod") = Request.Form("TahKod")
rseditson("Hekto") = Request.Form("Hekto")
rseditson("Nem") = Request.Form("Nem")
rseditson("Durum") = Request.Form("Sonuc")
rseditson("LabPer") = Request.Form("LabPer")
rseditson("Not") = Request.Form("Not")
reseditson.update

%>
<%=("güncelleme tamam")%>
---------------------------------------------------------------------------------
formu post ettiğimde bu hatayı alıyorum

Microsoft Office Access Database Engine hata '80040e14'
'Tid =' sorgu ifadesi içindeki Sözdizimi hatas&yacute; (eksik i&thorn;leç)
/ARPA/bilgigun.asp, satır 8

Veri alfanumeric olarak geliyor Form'dan...
Dolayısı ile sorgunun
sql = "Select * from Arpa Where Tid = '" & ida & "'"
şeklinde olması gerekmez mi?
yani tek tırnak lar konulmalı değişkenin başına ve sonuna...

set rseditson = Server.CreateObject("Adodb.Recordset")
kodundan önce
response.write ida
yaz ekran boşsa veri gelmiyordur formdan formu kontrol et

admin.asp?islem=duzenle&reportid=reportid
değil

admin.asp?islem=duzenle&reportid=<%=reportid%>
olacak dimi