Anasayfa FORUMLAR Üye Girişi Dosyalar Dersler İpuçları Yardımcı Araçlar Hakkımızda
KİMLER BAĞLI
Toplam Üye: 32638
Aktif Üye: 0
Aktif Ziyaretçi: 671
Üye Adı
Şifre
Beni Hatırla
          Yeni Üye KayıtYeni Üye Kayıt
          Şifremi UnuttumŞifremi Unuttum
FORUMLAR
 asp resim galerisi scrpti..
(4803 okuma, 0 yanıt)
 İki Ayrı Pc İki Ayrı Site..
(5660 okuma, 3 yanıt)
 Aquamp Player Dısında Pla..
(5414 okuma, 2 yanıt)
 Access ile calışan Asp ve..
(7366 okuma, 5 yanıt)
 reseller de domain e host..
(4292 okuma, 1 yanıt)
 http://www.akilli.tv..
(7536 okuma, 7 yanıt)
 Acilir kapanir sc..
(3525 okuma, 0 yanıt)
 aidsvebiz.com explorer si..
(6560 okuma, 2 yanıt)
 Excele Süzgeç Ekleyebilir..
(6903 okuma, 5 yanıt)
 ASP tabanlı bir domaine ..
(4774 okuma, 2 yanıt)
 asp hata..
(3726 okuma, 0 yanıt)
 Firma Tanıtım Sitesi Tasa..
(6015 okuma, 3 yanıt)
 çok güzel bir haber s&..
(7898 okuma, 5 yanıt)
 Haber ve Forumlar İçin En..
(6171 okuma, 3 yanıt)
 Arkadaslar Baka bilirmisi..
(6843 okuma, 5 yanıt)
 Veri Trafiği..
(6200 okuma, 4 yanıt)
 phpfox bilen varmı?..
(6046 okuma, 4 yanıt)
 linklere google reklamı e..
(4940 okuma, 2 yanıt)
 googla indexlenen alt say..
(6140 okuma, 3 yanıt)
 Okey s c ripti fiyatı hak..
(7232 okuma, 5 yanıt)
 Rss Gif Yapma ?..
(4036 okuma, 0 yanıt)
 Okey, Batak, Tavla..
(7189 okuma, 5 yanıt)
 flash resim gelerisi ariy..
(4171 okuma, 1 yanıt)
 JavaScript ile yada Html ..
(3789 okuma, 0 yanıt)
 Rss den anlayan varmı..
(7836 okuma, 5 yanıt)
 iframe ile onclick'i birl..
(5522 okuma, 2 yanıt)
 sql den veri çekip xml şe..
(5435 okuma, 2 yanıt)
 modül kodu html nasıl çev..
(7840 okuma, 6 yanıt)
 font stylerini değiştiren..
(4209 okuma, 0 yanıt)
 php sitem..
(6435 okuma, 4 yanıt)
 google da arayan arama mo..
(8935 okuma, 7 yanıt)
 Script..
(4206 okuma, 0 yanıt)
 Asp Scripti Linux Hosting..
(7181 okuma, 4 yanıt)
 Bu Portalı Bilen Varmı ?..
(5807 okuma, 3 yanıt)
 Dosya İndirmeye Nasıl Sın..
(3929 okuma, 0 yanıt)
 asp db yükleme..
(5917 okuma, 3 yanıt)
 sql admin sifresi..
(15815 okuma, 17 yanıt)
 İftara ne kadar var siste..
(6212 okuma, 2 yanıt)
 Html Sitede Sayaç (A.S.P&..
(7078 okuma, 3 yanıt)
 Asp Nesneleri..
(5250 okuma, 1 yanıt)
 Adım adım Firma Rehberi Y..
(7768 okuma, 4 yanıt)
 Java (j2ee, j2me)..
(5725 okuma, 1 yanıt)
 Javascript if dön..
(4975 okuma, 1 yanıt)
 bu kod ile sayfayı aynı a..
(6222 okuma, 3 yanıt)
 Ajax menu Paylaşım..
(7817 okuma, 5 yanıt)
 ASP YARDIM..
(9418 okuma, 6 yanıt)
 ASP sitem VAR ve siteyi y..
(6517 okuma, 2 yanıt)
 Xajax!..
(4807 okuma, 0 yanıt)
 Javascript nedir?..
(7693 okuma, 4 yanıt)
 Aspde md5..
(6234 okuma, 2 yanıt)
Netopsiyon Online: Forums
Netopsiyon Online :: Başlık görüntüleniyor - Asp'ye Başlayalım (Form Oluşturma)
 AramaArama   RütbelerRütbeliler   ProfilProfil   GirişGiriş 


Asp'ye Başlayalım (Form Oluşturma)

 
Bu forum kilitlendi: mesaj gönderemez, cevap yazamaz ya da başlıkları değiştiremezsiniz   Bu başlık kilitlendi: mesajları değiştiremez ya da cevap yazamazsınız    Netopsiyon Online Forum Ana Sayfa -> Diğer Diller
Önceki başlık :: Sonraki başlık  
Yazar Mesaj
emrahkaya
Mesaj: 500+
Mesaj: 500+





Kayıt: Jan 27, 2006
Mesajlar: 704
Konum: Geldiğimi ßende ßilmiyom :D

MesajTarih: 2007-05-12, 00:27:19    Mesaj konusu: Asp'ye Başlayalım (Form Oluşturma) Alıntıyla Cevap Gönder

Genelde Web Yazılım DErslerine Başlarken ilk Ders Genelde Form Yapmak Olur. Başlarda Saçma bulurdum Ama sonradan Tabanın Orda Atıldığını Anladım.

Burda öğreneceğimiz konu form elemanlarından databaseye kayıt – güncelleme ve silme olacak. Ayrıca yine databaseden while döngüsüyle kayıtları sıralı çekmeyi öğreneceğiz.

Alıntı:
İlk önce masaüstünde ders1 diye bir klasör yaratıp yine ders1 diye dosya özellikler > Webpaylaşımı ndan paylaşım verin.


Başlat > Programlar > MS Access e tıklayarak bir Access dosyası açalım. Ve dosya3 klasörüne db ismiyle olarak yeni bir Access veritabanı oluşturalım.

Db veritabanımızda deneme diye bir tablo oluşturalım ve aşağıdaki alan ( field ) leri açalım ;

id – otomatik sayı
isim – not
adres – not
sehir – not
email – not
tarih – tarih


ve veritabanımızı kapatalım.

Şimdi veritabanımızdan veri alıp işlem yapabilmemiz için ilk etapta kayıt etmeliyiz. Bunun için bir kayıt formu oluşturmamız gerekli.

Bir NotePad dosyası açın ve aşağıda yazıcaklarımı aynen yazın.

<%
‘ İlk etapta veritabanımıza bağlanmaız gerekiyor.

Set db = Server.CreateObject("adodb.connection" )
db.Open("driver={microsoft access driver (*.mdb)}; dbq=" & Server.MapPath("db.mdb" ))

‘ Veritabanımıza bağlantı kurduk. Şimdi kayıt formunu oluşturmaya başlayalım.

Response.Write “<form method=POST action=kayit_son.asp>”
Response.Write “Adı ve Soyadı : <input type=text name=isim> <br>”
Response.Write “Adresi : <input type=text name=adres> <br>”
Response.Write “Şehir : <input type=text name=sehir> <br>”
Response.Write “E-Mail : <input type=text name=email> <br>”
Response.Write “<input type=submit value=Gönder>”
Response.Write “</form>”

%>


Formumuzu tamamladık. Şimdi bu dosyayı paylaşım yaptıgımız ders3 klasörüne default.asp olarak kayıt edelim. Artık kayıt formumuz hazır. Farkındaysanız bu form un action bölümüne kayit_son.asp ye yönlendirdik. Yani bu adımdan sonraki işlemlerimizi kayit_son.asp diye bir dosyada yapmamız gerekecek.

Kayit_son.asp yi oluşturmaya başlayalım.

<%

‘ İlk etapta veritabanımıza bağlanmaız gerekiyor.

Set db = Server.CreateObject("adodb.connection" )
db.Open("driver={microsoft access driver (*.mdb)}; dbq=" & Server.MapPath("db.mdb" ))

‘ Veritabanımıza bağlantı kurduk. Şimdi kayıt işlemlerini oluşturmaya başlayalım.


‘ Yukarıdada veritabanımızda deneme diye bir tablo açmış ve alanlarını oluşturmuştur. Şimdi bu düzenekte ilk önce tablomuza bağlanacağız ve formdan gelen verileri kontrol edip bu tablomuz ve alanlarına göre kayıt işlemi yapacağız.

‘ ilk önce default.asp den gönderdiğimiz form elemanlarımızı alıp tanımlayalım ve boş olup olmadıklarını kontrol edelim.

isim = Request.Form(“isim”)
adres = Request.Form(“adres”)
sehir = Request.Form(“sehir”)
email = Request.Form(“email”)

‘ form elemanlarını tanımladık. Şimdi gönderilen verilen boş olup olmadıklarını kontrol edelim . Boş ise default.asp ye geri döndürelim.

If isim=”” or adres=”” or sehir=”” or email=”” Then

Response.Write “Boş alan bıraktınız.<br><br>Lütfen geri dönüp kontrol ediniz.<br><br><a href=j a v a s c r i p t:history.go(-1)>Geri dönmek için tıklayınız.</a>”

Else

‘ Else yani boş değilse dedikten sonra kayıt yapacağımız deneme tablomuzu açıp kayıt işlemine başlayalım.

Set rs=Server.CreateObject(“adodb.recordset”)
Rs.Open “deneme”,db,1,3
Rs.addnew
Rs(“isim”)=isim
Rs(“adres”)=adres
Rs(“sehir”)=sehir
Rs(“email”)=email
Rs(“tarih”)=Now()
Rs.update
Rs.Close
Set rs=Nothing

‘ kayıt işlemini bitirdik. Şimdi kayıt işlemini bitirdiğimize dair bilgi verelim.

Response.Write “ Kayıt işlemi başarıyla yapıldı. <br><br><a href=default.asp>Yeni kayıt için tıklayınız.</a><br><br><a href=kayitlar.asp>Tüm Kayıtları İnceleyin. </a>”

End If

‘ şimdi bu dosyayı kayit_son.asp olarak kayıt edelim. Evet artık kayıt işlemi sayfamızda hazır arkadaşlar….

%>


Farkındaysanız tüm Kayıtları İnceleyin diye kayitlar.asp ye giden bir link oluşturduk yukarıda . Ve Yeni kayıt için tıklayınız diye az önce oluşturduğumuz form sayfamıza yani default.asp ye ziyaretçiyi yönlendirip yeni bir kayıt eklemesinide sağlayabiliyoruz.

Şimdi yapacağımız işlem kayıt ettiğimiz verileri sayfaya while döngüsü ile sıralı halde yazdırmak olacak.

Bunun için bir notePad dosyası açalım.

<%

‘ İlk etapta veritabanımıza bağlanmamız gerekiyor.

Set db = Server.CreateObject("adodb.connection" )
db.Open("driver={microsoft access driver (*.mdb)}; dbq=" & Server.MapPath("db.mdb" ))

‘ Veritabanımıza bağlantı kurduk. Şimdi işlemlerimize başlayalım. Bu sayfada veritabınımızdaki deneme tablomuzun içerisine kayıt ettiğimiz bilgileri sıralı halde sayfaya yazdırma işlemi yapacağız. Bunun için deneme tablomuza bağlanıp ilk etapta veri olup olmadıgını kontrol edeceğiz ,Yok ise olmadıgına dair bilgi yazısı yazdıracağız, var ise verileri tanımlayıp sayfaya sıralı halde yazdıracağız.

Set rs=Server.CreateObject(“adodb.recordset”)
Rs.Open “deneme”,db,1,3
If rs.Eof Then
Response.Write “Kayıt bulunamadı.<br><br><a href=default.asp>Yeni kayıt eklemek için tıklayınız.</a>”
Else
While not rs.Eof
id=rs(“id”)
isim=rs(“isim”)
adres=rs(“adres”)
sehir=rs(“sehir”)
email=rs(“email”)
tarih=rs(“tarih”)

‘ alanları tanımladık . şimdi yazdıralım.

Response.Write “ Sıra No : “&id&” – Adı Soyadı : “&isim&” – Adres : “&adres&” – Şehir : “&sehir&” –Email : “&email&” – Kayıt Tarihi : “&tarih&” <a href=guncelle.asp?ID=”&id&”> - Güncelle ! </a><br>”

Rs.Movenext
Wend

‘ döngüyü bitirdik.

Response.Write “<a href=default.asp>Yeni Kayıt eklemek için tıklayınız.</a>”

End If
Rs.Close
Set rs=Nothing

‘ iş bukadar. Artık sayfamızda tüm verilerin sonuna <br> tagı koydugumuz için alt alta sıralandı. <br> tagından hemen sonra guncelle.asp diye bir link oluşturduk. Ve hangi verimizi guncelleyeceğimizi bildirmemiz için verinin id numarasını ID tanımıyla linkimize ekledik. Bunu guncelle.asp ye gidildiğinde hangi veriyi güncelleyeceğimizi bilmemiz için yaptık. Şimdi bu dosyayıda kayitlar.asp olarak kayıt edelim.

%>



Bir kayıtı güncelleyebilmemiz için o kayıtı form elemanlarına yazdırmamız gerekiyor. Şimdi yapacağımız işlemde link ile gelen ID değişkeni ne göre tablomuzdan verimizi bulup form elemanlarımıza bu kayıtın bilgilerini yazdıracağız.

<%

‘ İlk etapta veritabanımıza bağlanmamız gerekiyor.

Set db = Server.CreateObject("adodb.connection" )
db.Open("driver={microsoft access driver (*.mdb)}; dbq=" & Server.MapPath("db.mdb" ))

‘ şimdi kayitlar.asp den gelen ID değişkenini tanımlayalım.

ID=request(“ID”)

‘ şimdi ID değişkenine göre veritabanındaki deneme tablomuzdan kayıtımızı bulalım ve kayıtları tanımlayalım.

Set rs=Server.CreateObject(“adodb.recordset”)
Rs.Open “deneme where id=”&ID,db,1,3
isim=rs(“isim”)
adres=rs(“adres”)
sehir=rs(“sehir”)
email=rs(“email”)
rs.Close
Set rs=Nothing

‘ tablodan kayıtı bulup verileri tanımladık. Şimdi form oluşturup bu verileri form elemanlarına yerleştirelim.

Response.Write “<form method=POST action=guncelle_son.asp>”
Response.Write “<input type=hidden name=ID value=”&ID&”>”
Response.Write “<input type=text name=isim value=”&isim&”>”
Response.Write “<input type=text name=adres value=”&adres&”>”
Response.Write “<input type=text name=sehir value=”&sehir&”>”
Response.Write “<input type=text name=email value=”&email&”>”
Response.Write “<input type=submit value=Gönder>”

‘ formumuzu oluşturduk ve formun gideceği adres olarak guncelle_son.asp olarak tanımladık. Bundan sonraki güncelleme işlemini guncelle_son.asp de yapacağız. Ve farkındaysanız bir önceki sayfadan gelen ID değişkenini formun içerisinde gizli (hidden) olara koyduk ve tanımladık. Amacımız guncelle_son.asp dede hangi ID numaraya sahip kayıtsetimiz ile ilgili işlem yapacağımız bilmek..

‘Şimdi bu dosyamızı guncelle.asp olarak kayıt edelim ve bir sonraki adıma geçelim.

%>

Şimdiki yapacağımız işlemde guncelle.asp den yolladıgımız form elemanlarını alıp , formdan gizli olarak gelen ID değişkenine göre kayıtsetimizi bulmak ve veirleri güncellemek olacak.

Bir notePad açalım.

<%

‘ İlk etapta veritabanımıza bağlanmamız gerekiyor.

Set db = Server.CreateObject("adodb.connection" )
db.Open("driver={microsoft access driver (*.mdb)}; dbq=" & Server.MapPath("db.mdb" ))

‘ ilk önce guncelle.asp den gönderdiğimiz form elemanlarımızı alıp tanımlayalım ve boş olup olmadıklarını kontrol edelim.

ID = Request.Form(“ID”)
isim = Request.Form(“isim”)
adres = Request.Form(“adres”)
sehir = Request.Form(“sehir”)
email = Request.Form(“email”)

‘ form elemanlarını tanımladık. Şimdi gönderilen verilen boş olup olmadıklarını kontrol edelim . Boş ise guncelle.asp ye geri döndürelim.

If isim=”” or adres=”” or sehir=”” or email=”” Then

Response.Write “Boş alan bıraktınız.<br><br>Lütfen geri dönüp kontrol ediniz.<br><br><a href=j a v a s c r i p t:history.go(-1)>Geri dönmek için tıklayınız.</a>”

Else

‘ Else yani boş değilse dedikten sonra kayıt yapacağımız deneme tablomuzu açıp kayıt işlemine başlayalım.

Set rs=Server.CreateObject(“adodb.recordset”)
Rs.Open “deneme where id=”&ID ,db,1,3
Rs(“isim”)=isim
Rs(“adres”)=adres
Rs(“sehir”)=sehir
Rs(“email”)=email
Rs.update
Rs.Close
Set rs=Nothing

‘ güncelleme işlemini bitirdik. Şimdi güncelleme işlemini bitirdiğimize dair bilgi verelim.

Response.Write “ Güncelleme işlemi başarıyla yapıldı. <br><br><a href=default.asp>Yeni kayıt için tıklayınız.</a><br><br><a href=kayitlar.asp>Tüm Kayıtları İnceleyin. </a>”

End If

‘ şimdi bu dosyayı guncelle_son.asp olarak kayıt edelim. Evet artık kayıtsetine özel Güncelleme sayfamızda hazır arkadaşlar….

%>

Silme işlemi yapalım. Bunun için ilk önce kayitlar.asp sayfamızı notePad da açalım ve aşağıdaki satırı bulalım.

Response.write “ Sıra No : “&id&” – Adı Soyadı : “&isim&” – Adres : “&adres&” – Şehir : “&sehir&” –Email : “&email&” – Kayıt Tarihi : “&tarih&” <a href=guncelle.asp?ID=”&id&”> - Güncelle ! </a><br>”

Burada bir silin linki koyup bu link sayedesinde istediğimiz kayıtı silebileceğiz.

Yukarıdaki satırı aşağıdaki gibi düzenleyin.

Response.write “ Sıra No : “&id&” – Adı Soyadı : “&isim&” – Adres : “&adres&” – Şehir : “&sehir&” –Email : “&email&” – Kayıt Tarihi : “&tarih&” <a href=guncelle.asp?ID=”&id&”> - Güncelle ! </a> - <a href=kayit_sil.asp?ID=”&id&”>Silin !</a> <br>”

Bu şekilde düzenledikten sonra kayitlar.asp yi kaydedip kapatın.

Silme işlemini farkındaysanız kayit_sil.asp de yapacağız. Sil linkindeki ID değişkenine göre kayıtımızı belirleyecğeiz ve kayit_sil.asp de bu kayıtı bulup sildireceğiz. Silme işleminde sonra direkt kayitlar.asp ye geri döneceğiz. Bunun için bir notePad açalım.

<%

‘ İlk etapta veritabanımıza bağlanmamız gerekiyor.

Set db = Server.CreateObject("adodb.connection" )
db.Open("driver={microsoft access driver (*.mdb)}; dbq=" & Server.MapPath("db.mdb" ))

‘ sil linkinden gelen ID verisini tanımlayalım.

ID = Request.Form(“ID”)

‘ şimdi sildirelim.

Set rs=db.Execute(“delete from deneme where id=”&ID)

‘ sildirmeyi yaptık. Şimdi kayitlar.asp ye geri döndürelim.

Response.Redirect “kayitlar.asp”

‘ işte bukadar. Artık kayıtları sildirebiliyoruz.

%>


Arkadaşlar. Bu derslerimizde Database bağlantısı , Tablo bağlantısı , Kayıt ekleme , Kayıt Güncelleme , Kayıt silme , Kayıt Sıralama – Yazdırma , veri değişkeni tanımlama işlemlerini öğrendik. Bu işlemler ASP için çok önemli unsurlardır.
Başa dön
Kullanıcının profilini görüntüle Özel mesaj gönder E-posta gönder
Bu Site Google Adsense ile Gelir Elde Ediyor









Tarih: 2024-03-28, 22:20:16    Mesaj konusu: Forum Arası Reklamlar


Başa dön
Önceki mesajları göster:   
Bu forum kilitlendi: mesaj gönderemez, cevap yazamaz ya da başlıkları değiştiremezsiniz   Bu başlık kilitlendi: mesajları değiştiremez ya da cevap yazamazsınız    Netopsiyon Online Forum Ana Sayfa -> Diğer Diller Tüm zamanlar GMT + 3 Saat
1. sayfa (Toplam 1 sayfa)

 
Geçiş Yap:  
Bu forumda yeni başlıklar açamazsınız
Bu forumdaki başlıklara cevap veremezsiniz
Bu forumdaki mesajlarınızı değiştiremezsiniz
Bu forumdaki mesajlarınızı silemezsiniz
Bu forumdaki anketlerde oy kullanamazsınız

Benzer Konular

Başlık Yazar Forum Cevaplar Tarih
Yeni mesaj yok Block oluşturma Life PHP 20 2010-03-17, 21:50:10 Son Mesajı Görüntüle
Yeni mesaj yok 1yıla yaklaşık problem çözülemedi,sql... e_destek Php Nuke Modülleri 6 2009-07-11, 21:55:37 Son Mesajı Görüntüle
Yeni mesaj yok Blok Oluşturma [Yardım!!!] MylvlDifferent Php-Nuke 2 2009-05-09, 22:37:57 Son Mesajı Görüntüle
Yeni mesaj yok XML Site Map Oluşturma sanaldunyali Google 4 2009-02-28, 19:38:17 Son Mesajı Görüntüle
Yeni mesaj yok footer'in üzerinde menü oluşturma mehmet_akif Php Nuke Blocklar 1 2009-01-21, 13:53:43 Son Mesajı Görüntüle

Copyright © 2002-2024 Netopsiyon Bilişim Teknolojileri San. Tic. Ltd.Şti. - Bütün hakları saklıdır!
Bu site Netopsiyon.com.tr Sunucularında Barındırılmaktadır.
Netopsiyon Bilişim Teknolojileri San. Tic. Ltd.Şti. Netopsiyon Copyright