hocam 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>