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: 250
Üye Adı
Şifre
Beni Hatırla
          Yeni Üye KayıtYeni Üye Kayıt
          Şifremi UnuttumŞifremi Unuttum
FORUMLAR
 asp resim galerisi scrpti..
(2513 okuma, 0 yanıt)
 İki Ayrı Pc İki Ayrı Site..
(2692 okuma, 3 yanıt)
 Aquamp Player Dısında Pla..
(2311 okuma, 2 yanıt)
 Access ile calışan Asp ve..
(3865 okuma, 5 yanıt)
 reseller de domain e host..
(2113 okuma, 1 yanıt)
 http://www.akilli.tv..
(4148 okuma, 7 yanıt)
 Acilir kapanir sc..
(1724 okuma, 0 yanıt)
 aidsvebiz.com explorer si..
(4327 okuma, 2 yanıt)
 Excele Süzgeç Ekleyebilir..
(3493 okuma, 5 yanıt)
 ASP tabanlı bir domaine ..
(2370 okuma, 2 yanıt)
 asp hata..
(1907 okuma, 0 yanıt)
 Firma Tanıtım Sitesi Tasa..
(3254 okuma, 3 yanıt)
 çok güzel bir haber s&..
(4236 okuma, 5 yanıt)
 Haber ve Forumlar İçin En..
(3275 okuma, 3 yanıt)
 Arkadaslar Baka bilirmisi..
(3428 okuma, 5 yanıt)
 Veri Trafiği..
(3218 okuma, 4 yanıt)
 phpfox bilen varmı?..
(3369 okuma, 4 yanıt)
 linklere google reklamı e..
(2743 okuma, 2 yanıt)
 googla indexlenen alt say..
(3162 okuma, 3 yanıt)
 Okey s c ripti fiyatı hak..
(3981 okuma, 5 yanıt)
 Rss Gif Yapma ?..
(2173 okuma, 0 yanıt)
 Okey, Batak, Tavla..
(3908 okuma, 5 yanıt)
 flash resim gelerisi ariy..
(2302 okuma, 1 yanıt)
 JavaScript ile yada Html ..
(2053 okuma, 0 yanıt)
 Rss den anlayan varmı..
(4343 okuma, 5 yanıt)
 iframe ile onclick'i birl..
(3158 okuma, 2 yanıt)
 sql den veri çekip xml şe..
(3082 okuma, 2 yanıt)
 modül kodu html nasıl çev..
(4309 okuma, 6 yanıt)
 font stylerini değiştiren..
(2398 okuma, 0 yanıt)
 php sitem..
(3773 okuma, 4 yanıt)
 google da arayan arama mo..
(5102 okuma, 7 yanıt)
 Script..
(2434 okuma, 0 yanıt)
 Asp Scripti Linux Hosting..
(4155 okuma, 4 yanıt)
 Bu Portalı Bilen Varmı ?..
(3455 okuma, 3 yanıt)
 Dosya İndirmeye Nasıl Sın..
(2232 okuma, 0 yanıt)
 asp db yükleme..
(3405 okuma, 3 yanıt)
 sql admin sifresi..
(8699 okuma, 17 yanıt)
 İftara ne kadar var siste..
(3670 okuma, 2 yanıt)
 Html Sitede Sayaç (A.S.P&..
(4249 okuma, 3 yanıt)
 Asp Nesneleri..
(3271 okuma, 1 yanıt)
 Adım adım Firma Rehberi Y..
(4835 okuma, 4 yanıt)
 Java (j2ee, j2me)..
(3356 okuma, 1 yanıt)
 Javascript if dön..
(3129 okuma, 1 yanıt)
 bu kod ile sayfayı aynı a..
(3867 okuma, 3 yanıt)
 Ajax menu Paylaşım..
(4776 okuma, 5 yanıt)
 ASP YARDIM..
(5410 okuma, 6 yanıt)
 ASP sitem VAR ve siteyi y..
(4074 okuma, 2 yanıt)
 Xajax!..
(3005 okuma, 0 yanıt)
 Javascript nedir?..
(4789 okuma, 4 yanıt)
 Aspde md5..
(3718 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: 2018-07-17, 09:13:18    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-2018 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