Misafir adlı üyeden alıntı: mesajı görüntüle
"Asp ile veri tabanına veri ekleme" başlığı ile arama yaparsanız bir çok sonuç bulabilirsiniz..

Ama kısaca;

proje isimli bir tablo olsuturursak ;

id (Otomatik Sayı)
hafta (Sayı)
projebaslik (Metin)
projedetay (Not)


Şimdi bir adet proje ekleme formu olusturalım... "projeekle.htm"

<form name="projeekle" action="projeekle.asp" method="post">
Kaçıncı Hafta Projesi:<input type="text" name="hafta">
Proje Başlığı : <input type="text" name="projebaslik">
Proje Detay : <textarea name="projedetay"></textarea>
<input type="send" name="send" value="Proje Ekle">
</form>

Verileri kayıt ettirelim.. "projeekle.asp"

<%
Set baglan = Server.CreateObject("Adodb.Connection")
baglan.open = "Provider=Microsoft.Jet.Oledb.4.0;Data Source="& server.MapPath("projelerim.mdb") &";"


set kayit = Server.CreateObject("Adodb.Recordset")
SQL = "SELECT * FROM proje"
kayit.Open SQL, baghlanti, 1, 3

hafta = request.querystring("hafta")
projebaslik = request.querystring("projebaslik")
projedetay = request.querystring("projedetay")

kayit.AddNew
kayit("hafta") = hafta
kayit("projebaslik") = projebaslik
kayit("projedetay") = projedetay
kayit.Update
response.Write("<h1>Kayıt işlemi tamamlandı</h1><hr><br>")
baglan.close : set baglan = nothing
%>



şimdi projelerim için link verirken de linkleri su sekilde yaparsan;

<a href="projegoster.asp?hafta=1">1.Hafta</a>
<a href="projegoster.asp?hafta=2">2.Hafta</a>
....

linke tıklayınca projelerimizi gösterelim... "projegoster.asp"


<%
hafta=request.querystring("hafta")
Set baglan = Server.CreateObject("Adodb.Connection")
baglan.open = "Provider=Microsoft.Jet.Oledb.4.0;Data Source="& server.MapPath("projelerim.mdb") &";"
set weysel=baglan.Execute("SELECT * from proje where hafta="&hafta&" ")
%>
proje basligi :<%=weysel("projebaslik")%>"
proje detayı:<%=weysel("projedetayi")%>
</a>
<%
baglan.close : set baglan = nothing
%>


ve tamamdır deneme fırsatım olmadı ama çalışması gerekir.. Sorun çıkarsa yazarsınız..
deneyince cvp yazarım hocam şimdiden teşekkürler yine