herkese kolay gelsin
bir sorunum var db firebird olan bir asp sayfa yapıyorum db üzerinde oynama yapamam bendeki kategoriler isim lerden oluşma sayı yok
bu kodu bir yererden buldum gayet güzel çalışıyor fakat kırmızı ile işaretledigim yerlerden dolayı olmuyor bir akıl verin nasıl çalıştıracagım ben bunu
anladıgım kadarı ile gelen veri yazı ise deger olarak sıfır var gelen veri isnumeric ise degere atıyor ve işlemi tamamlıyor siliyorum olmuyor pek anlamıyorum bu kod olayından yardımcı olabilirmisiniz bunu gelenleri konrtol ederek yazı ya çevirebilirmiyim...
<HTML>
<HEAD>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9" />
<TITLE> Select Boxlarla eğlence... </TITLE>
<SCRIPT LANGUAGE="JavaScript">
<!--
function formuGonder(kutu) {
if (kutu == 'GRUP') {
document.form1.GRUP_ARA.options[0].selected = true;
document.form1.GRUP_ALT.options[0].selected = true;
}
if (kutu == 'GRUP_ARA') {
document.form1.GRUP_ALT.options[0].selected = true;
}
if (kutu == 'GRUP_ALT') {
}
document.form1.submit()
}
//-->
</SCRIPT>
</HEAD>
<BODY>
<CENTER>
<table>
<%
Set conn=Server.CreateObject("Adodb.Connection")
conn.Open databasemmmmm"
SayfaAdi = request.servervariables("SCRIPT_NAME")
function veriKontrol(veri)
if isnumeric(veri) > 0 then
if len(veri) then
veriKontrol = cint(veri)
else
veriKontrol = 0
end if
else
veriKontrol = 0
end if
end function%>
<form name="form1" action="<%=SayfaAdi%>" method="get">
<tr><td>
<SELECT NAME="GRUP" style="width:171; height:173" size="7" onChange="formuGonder('GRUP')">
<option value=0>Araç Markanız ...</option>
<%
set tblFirma = conn.execute("select * from GRUP WHERE MODUL='STOK' AND WEBDE_GORUNSUN=1 Order By GRUP_ADI")
do while not tblFirma.eof
response.write " <option value=" & tblFirma("GRUP_ADI")
if tblFirma("GRUP_ADI") = veriKontrol(request("GRUP")) then
response.write " selected"
end if
response.write ">" & tblFirma("GRUP_ADI") & "</option>" & VbCrlf
tblFirma.movenext
loop
set tblFirma = nothing
%>
</SELECT>
<SELECT NAME="GRUP_ARA" style="width:171; height:173" size="7" onChange="formuGonder('GRUP_ARA')">
<option value=0>Araç Modeliniz ...</option>
<%
GRUP = veriKontrol(request("GRUP"))
if GRUP > 0 then set tblMarka = conn.execute("select * from GRUP_ARA where UST_GRUP_ADI = " & GRUP & " Order By GRUP_ADI")
do while not tblMarka.eof
response.write " <option value=" & tblMarka("GRUP_ADI")
if tblMarka("GRUP_ADI") = veriKontrol(request("GRUP_ARA")) then
response.write " selected"
end if
response.write ">" & tblMarka("GRUP_ADI") & "</option>" & VbCrlf
tblMarka.movenext
loop
set tblMarka = nothing
end if
%>
</SELECT>
<SELECT NAME="GRUP_ALT" style="width:171; height:173" size="7" onChange="formuGonder('GRUP_ALT')">
<option value=0>Aracınız Daki Konumu ...</option>
<%
GRUP_ARA = veriKontrol(request("GRUP_ARA"))
if GRUP_ARA > 0 then
set tblGrup = conn.execute("select * from GRUP_ALT where UST_GRUP_ADI = " & GRUP_ARA & " Order By GRUP_ADI")
do while not tblGrup.eof
response.write " <option value=" & tblGrup("GRUP_ADI")
if tblGrup("GRUP_ADI") = veriKontrol(request("GRUP_ALT")) then
response.write " selected"
end if
response.write ">" & tblGrup("GRUP_ADI") & "</option>" & VbCrlf
tblGrup.movenext
loop
set tblGrup = nothing
end if
%>
</SELECT>
</form></td></tr>
</table>
</CENTER>
</BODY>
</HTML>