Şöyle bir sıkıntım var, yardımlarınıza ihtiyacım var.
şimdi arıza girin kullanıcının, girdiği arızaları görmesi için bir ekran yaptım.
yapmak istediğim olay kişi girdiğim arızaları listeye tıkladığında liste halinde gelmesini istiyorum. bunu şu şekilde yaptım.
<input type="text" name="kull" value="<%=rs("adi")%>" />
<input type="submit" value="Gönder" />
kişi gönder butonuna bastığında sıralıyor. böyle olmasını istemiyorum ama bir türlü çözemedim yardımcı olurmusunuz.
Kodun tamamı :
<%
intPage = Request.QueryString("SNO")
If intPage = "" OR not IsNumeric(intPage) Then
intPage = Int(1)
Else
intPage = Int(intPage)
End If
%>
<div align="center">
<table width="96%" colspan="2" cellspacing="5" cellpadding="5">
<tr>
<td aligin="left" bgcolor="#404040" width="6%" height="35"><font face="arial" size="2" color="#FFFFFF"><b>SIRA NO</b></font></td>
<td aligin="left" bgcolor="#404040" width="11%" height="35"><font face="arial" size="2" color="#FFFFFF"><b>İSİM</b></font></td>
<td aligin="left" bgcolor="#404040" width="58%" height="35"><font face="arial" size="2" color="#FFFFFF"><b>EKLEDİĞİ ARIZA</b></font></td>
<td aligin="left" bgcolor="#404040" width="15%" height="35"><b>
<font color="#FFFFFF">TARİH</font></b></td>
<td aligin="left" bgcolor="#404040" width="6%" height="35">
<b>
<font color="#FFFFFF">Oku </font></b></td>
</tr>
<%
Set Baglanti = Server.CreateObject("aDodb.connection")
Baglanti.Open "Driver=Microsoft Access Driver (*.mdb);DBQ=" & Server.MapPath("../db/db.mdb")
If Request.ServerVariables("REQUEST_METHOD") = "POST" Then
strKull=Request.Form("kull")
Set Rs=Server.CreateObject("ADODB.RecordSet")
Rs.Open"SELECT * FROM dal WHERE adsoyad = '" & strKull & "'order by id desc ", Baglanti, 1, 3
Do While Not Rs.Eof %>
<tr>
<td aligin="left" bgcolor="#FFFFFF" width="3%" height="35"><font face="arial" size="2" color="#000000"><%=i + (SNO + 1) * 1%> </font></td>
<td aligin="left" bgcolor="#FFFFFF" width="6%" height="35"><font face="arial" size="2" color="#000000"><%=strKull%> </font></td>
<td aligin="left" bgcolor="#FFFFFF" width="58%" height="35"><font face="arial" size="2" color="#000000"><%=RS("NOT")%></font></td>
<td aligin="left" bgcolor="#FFFFFF" width="15%" height="35"><%=RS("tarih")%></td>
<td aligin="left" bgcolor="#FFFFFF" width="6%" height="35"><p><font face="arial" size="2" color="#000000"><a href="xdefault.asp?islem=arama&id=<%=Rs("id")%>" onmouseover="window.status='Ayrıntılı bilgi için tıklayın' ; return true">
<img src="img/130.gif" alt="Bu kaydı Düzenle" width="16" height="16" border="0" align="middle" /></a> </font></td>
</tr>
</div>
<%
Rs.MoveNext
Loop
Rs.Close
End If
%>