arkadaşlar veriyi düzenlemiyor boş veri ekliyor sebebi nedir acaba
--------------------------------------verilerin listelendiği ilk sayfa :---------------------------------------------------------------
<%
db="kariyervt.mdb"
Set baglanti = Server.createobject("adodb.connection" )
baglanti.open " Provider = Microsoft.jet.oledb.4.0;Data source= "&Server.mappath(""&db&"" )
set rskisiler = server.createobject("ADODB.Recordset")
SQL = "Select * from kisiler"
rskisiler.open SQL,baglanti,1,3
islem = request.QueryString("islem")
id = request.QueryString("id")
if islem = "sil" then
baglanti.execute("Delete from Kisiler Where id=" & id)
Response.Redirect "kayit-duzenle.asp"
ENd if
%>
<table width="217" border="3">
<tr>
<td width="106" bgcolor="#999999">adı</td>
<td width="91" bgcolor="#999999">soyadı</td>
<td width="91" bgcolor="#999999">sil</td>
<td width="91" bgcolor="#999999">düzenle</td>
</tr>
<%Do until rsKisiler.eof%>
<tr>
<td><%=rskisiler("adi")%> </td>
<td><%=rskisiler("ice")%> </td>
<td><a href="kayit-duzenle.asp?islem=sil&id=<%=rskisiler("id")%>" >sil</a></td>
<td><a href="guncelle.asp?id=<%=rskisiler("id")%>">dü ;zenle</a></td>
</tr>
<%
rskisiler.movenext
loop
rskisiler.close
baglanti.close
%>
</table>
------------------------------------------------------------------------------verileri güncelliyen sayfa------------------
<%
id = request.QueryString("id")
db="kariyervt.mdb"
Set baglanti = Server.createobject("adodb.connection" )
baglanti.open " Provider = Microsoft.jet.oledb.4.0;Data source= "&Server.mappath(""&db&"" )
set rskisiler = server.createobject("ADODB.Recordset")
rskisiler.open "Select * from kisiler where id=" & id,baglanti,1,3
If request.ServerVariables("REQUEST_METHOD")="POST" Then
rskisiler("adi") = request.Form("adi")
rskisiler("ice") = request.Form("ice")
rskisiler.update
response.Redirect("guncelle.asp?id=" & id)
End if
%>
<table width="201" border="3">
<tr>
<td width="54">adi</td>
<td width="8">:</td>
<td width="113"><form id="form1" name="form1" method="post" action="">
<label>
<input name="adi" type="text" id="adi" value="<%=rskisiler("adi")%>" />
</label>
</form> </td>
</tr>
<tr>
<td>soyadi</td>
<td>:</td>
<td><input name="ice" type="text" id="ice" value="<%=rskisiler("ice")%>" /></td>
</tr>
<tr>
<td>yaşı</td>
<td>:</td>
<td> </td>
</tr>
<tr>
<td> </td>
<td> </td>
<td><form id="form2" name="form2" method="post" action="">
<label>
<input type="submit" name="Submit" value="Güncelle" />
</label>
</form>
</td>
</tr>
</table>
asp de veri düzenleme yardım
4
●1.030
- 07-09-2008, 15:15:05Eposta Aktivasyonu Gerekmekte
------------------------------------------------------------------------------verileri güncelliyen sayfa------------------ <% id = request.QueryString("id") db="kariyervt.mdb" Set baglanti = Server.createobject("adodb.connection" ) baglanti.open " Provider = Microsoft.jet.oledb.4.0;Data source= "&Server.mappath(""&db&"" ) set rskisiler = server.createobject("ADODB.Recordset") rskisiler.open "Select * from kisiler where id=" & id,baglanti,1,3 If request.ServerVariables("REQUEST_METHOD")="POST" Then rskisiler("adi") = request.Form("adi") rskisiler("ice") = request.Form("ice") rskisiler.update response.Redirect("guncelle.asp?id=" & id) End if %> <table width="201" border="3"> <tr> <td width="54">adi</td> <td width="8">:</td> <td width="113"><form id="form1" name="form1" method="post" action=""> <label> <input name="adi" type="text" id="adi" value="<%=rskisiler("adi")%>" /> </label></td> </tr> <tr> <td>soyadi</td> <td>:</td> <td><input name="ice" type="text" id="ice" value="<%=rskisiler("ice")%>" /></td> </tr> <tr> <td>yaşı</td> <td>:</td> <td> </td> </tr> <tr> <td> </td> <td> </td> <td> <label> <input type="submit" name="Submit" value="Güncelle" /> </label> </form> </td> </tr> </table>böyle dene - 07-09-2008, 19:02:01Eposta Aktivasyonu Gerekmektebutonu farklı form a almışsın giden veri null...
o yüzden aradaki diğer form tagini silmen ve tüm input ları 1 form un arasına alman gerekir.
kolay gelsin - 08-09-2008, 01:19:52hocam kodları webviz kullandığım sisteme uygulayım dedim ama olmadı. Kaydet dediğimde sayfada hareket yok. Veriyi güncellemiyor kodlar işlemiyor sebebi nedir acaba
kodlar --
----------------güncelleme sayfası -------
<!--#include file="admin-ust.asp" --> <% id = request.QueryString("id") db="tabani.mdb" Set baglanti = Server.createobject("adodb.connection" ) baglanti.open " Provider = Microsoft.jet.oledb.4.0;Data source= "&Server.mappath(""&db&"" ) set rskisiler = server.createobject("ADODB.Recordset") rskisiler.open "Select * from anasayfa where id=" & id,baglanti,1,3 If request.ServerVariables("REQUEST_METHOD")="POST" Then rskisiler("baslik") = request.Form("baslik") rskisiler("yazi") = request.Form("yazi") rskisiler.update response.Redirect("guncelle.asp?id=" & id) End if %> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-9"> <link href="css_styles/default_style.css" rel="stylesheet" type="text/css" /> <body OnLoad="initialiseWebWizRTE();"> <br> <br> <table width="750" border="0" align="center" cellpadding="1" cellspacing="1" bgcolor="#CCCCCC"> <tr> <td align="center" bgcolor="#F4F7FB"> <p> </p> <table width="213" border="0" align="center"> <tr> <td width="33" height="24"><span style="font-size: 10px">baslik</span></td> <td width="10"><span style="font-size: 10px">:</span></td> <td width="156"><label> <input name="baslik" type="text" id="baslik" value="<%=rskisiler("baslik")%>"> </label></td> </tr> </table> <p> <% Dim strFormName Dim strTextAreaName strFormName = "myForm" ' Formun adı strTextAreaName = "yazi"' Textarea'nin adı... '---------------------------------------------------------------------------------------------- %> <!--#include file="RTE_editor_inc.asp" --> <textarea name="yazi" cols="90" rows="20" id="yazi"> <%=rskisiler("yazi")%> </textarea> </p> <p> <input type="submit" name="Submit" id="Submit" value="Kaydet" /> <input type="reset" name="reset" id="reset" value="Temizle" /> <br /> </p> </form> </td> </tr> </table> </div> </body> </html>