<form method="post" action="kayit.asp"> k_seo : <input type="text" name="k_seo" size="20"><br><br> kategori : <input type="text" name="kategori" size="20"><br><br> resim : <input type="text" name="resim" size="20"><br><br> resim yazi : <input type="text" name="resim_yazi" size="20" value="0"><br><br> <input type="submit" value="Gönder"> </form>
<%
Set db = Server.CreateObject("adodb.connection" )
db.Open = "driver={mysql odbc 3.51 driver}; server=localhost; UID=DBkullanici; pwd=sifre; db=DBismi;"
k_seo=Request.Form("k_seo")
kategori=Request.Form("kategori")
resim=Request.Form("resim")
resim_yazi=Request.Form("resim_yazi")
If k_seo="" or kategori="" or resim="" or resim_yazi="" Then
Response.Write "Formda eksik bilgi bıraktınız.<br><br>"
Response.Write "Geri dönüp kontrol ederek tekrar deneyiniz.<br><br>"
Response.Write "<a href=javascript:history.back() >Geri dönmek için tıklayınız.</a>"
Else
Set kayit=db.Execute("insert into tablo(k_seo,kategori,resim,resim_yazi) values('"&k_seo&"','"&kategori&"','"&resim&"','"&resim_yazi&"')")
Response.Write " Kayıt başarıyla gerçekleşti.<br><br>"
Response.Write " Tüm kayıtlara bakmak için <a href=kontrol.asp>Tıklayınız.</a>"
End If
%>kodu aşağıdaki gibi kullandığımda, tabloya 5 ve daha fazla veri kaydı eklemek isterken;<form method="post" action="kayit.asp"> k_seo : <input type="text" name="k_seo" size="20"><br><br> kategori : <input type="text" name="kategori" size="20"><br><br> resim : <input type="text" name="resim" size="20"><br><br> resim yazi : <input type="text" name="resim_yazi" size="20" value="0"><br><br> haber : <input type="text" name="haber" size="20" value="0"><br><br><input type="submit" value="Gönder"> </form>
<%
Set db = Server.CreateObject("adodb.connection" )
db.Open = "driver={mysql odbc 3.51 driver}; server=localhost; UID=DBkullanici; pwd=sifre; db=DBismi;"
k_seo=Request.Form("k_seo")
kategori=Request.Form("kategori")
resim=Request.Form("resim")
resim_yazi=Request.Form("resim_yazi")
haber=Request.Form("haber")
If k_seo="" or kategori="" or resim="" or resim_yazi="" or haber="" Then
Response.Write "Formda eksik bilgi bıraktınız.<br><br>"
Response.Write "Geri dönüp kontrol ederek tekrar deneyiniz.<br><br>"
Response.Write "<a href=javascript:history.back() >Geri dönmek için tıklayınız.</a>"
Else
Set kayit=db.Execute("insert into tablo(k_seo,kategori,resim,resim_yazi,haber) values('"&k_seo&"','"&kategori&"','"&resim&"','"&resim_yazi&"','"&haber&"')")
Response.Write " Kayıt başarıyla gerçekleşti.<br><br>"
Response.Write " Tüm kayıtlara bakmak için <a href=kontrol.asp>Tıklayınız.</a>"
End If
%>şu hatayı veriyor.Microsoft VBScript compilation error '800a03ee'
Expected ')'
/kayit.asp, line 18
Set kayit=db.Execute("insert into tablo(k_seo,kategori,resim,resim_yazi,haber) values('"&k_seo&"','"&kategori&"','"&resim&"','"&resim_yazi&"','"&haber&"')")
---------------------------------------------------------------------------------------------------------------------------------------------------^sorun ne olabilir ? çok uğraştım tabloları ve sütunları değiştirdim yinede olmuyor. benim 4 değil 7 veri kayıdı eklemem gerekiyor. yardımlarınızı bekliyorum. kodları aynen paylaştım. belki başka birininde işine yarar. cevaplarınızı bekliyorum.kolay gelsin.
