Mar
6Bu yazımızda basit ziyaretçi defteri geliştiriyoruz.
Bu yazımızda ziyaretçi defteri yapacağız.
Mantığı basit, bir veritabanı oluşturacağız ve form aracılığı ile ziyaretçi bu veritabanına kayıt girecek. Sonrada girilen kayıtları sayfada göstereceğiz.
İlk önce veritabanı oluşturmamız gerekli.
Database.mdb adında accsess veritabanı oluşturun.
İçinde mesajlar adında tablo, sütunlar ve türleri ;
id : otomatik sayı
Mesaj : not
İsim : not
Mail : not
Tarih : Tarih/Saat
Veritabanını oluşturduktan sonra kodlamaya başlayabiliriz.
İlk önce veritabanı bağlantısını yapacağız.
Baglanti.asp adında dosyada veritabanına bağlanacağız ve bu dosyayı bütün sayfalara include edeceğiz.
Baglanti.asp
Yol=Server.Mappath("Database.mdb")
Set baglanti=Server.Createobject("Adodb.Connection")
oku="Provider=microsoft.jet.oledb.4.0; data source=" & Yol
baglanti.open (oku)
%>
Veritabanına bağlandık. şimdi kayıtları listeletelim.
Kayitlar.asp
<%
Set rs=baglanti.execute("select * from mesajlar order by id desc")
While Not rs.Eof
Response.Write "isim: " & rs("isim") & " <br>"
Response.Write "Mail: " & rs("mail") & " <br>"
Response.Write "Tarih: " & rs("tarih") & " <br>"
Response.Write "Mesaj: " & rs("mesaj") & " <br>"
Rs.movenext:Wend
Rs.Close:Set rs=nothing ' kayıtları listelettik ve bağlantıyı kapattık.
%>
Altına mesaj ekle diye bir link verebilirsiniz.
Mesajekle.asp
İsim : <input type="text" name="isim" />
Mail :<input type="text" name="mail" />
Mesaj: <textarea name="mesaj"></textarea>
<input type="submit" value="Gönder" />
</form>
Kaydet.asp
<%
Set Rs=Server.Createobject("adodb.recordset")
Rs.Open "Select * from mesajlar",baglanti,1,3
isim=trim(request.form("isim"))
mail=trim(request.form("mail"))
mesaj=trim(request.form("mesaj"))
Rs.Addnew
Rs("isim")=isim
Rs("mail")=mail
Rs("mesaj")=mesaj
Rs("tarih")=date()
Rs.Update
%>
Herhangi bir hata ile karşılaşırsanız yorumlarınızda belirtiniz.
Bir sonraki yazıda görüşmek üzere...
İyi Çalışmalar.
Etiketler : ado adodb recordset connection set trim close request nothing
İçeriği takip etSayfayı YazdırPermalink32 yorum var
#55.-SrcnCkr-07 Mart 2007 Çarşamba
Güzel yazı, ellerine sağlık. Temel olarak buradaki konuları anladıktan sonra Aspogren Topluluğu tarafından geliştirilen Ajax Tabanlı ziyaretçi defterimizi incelemenizi tavsiye ederim.
#67.-Faruk-10 Mart 2007 Cumartesi
Rs.Addnew
Rs("isim")=isim
Rs("isim")=mail
Rs("isim")=mesaj
Rs("isim")=date()
Rs.Update
bunlarin böyle olmasi gerekmiyormu
Rs.Addnew
Rs("isim")=isim
Rs("mail")=mail
Rs("mesaj")=mesaj
Rs("tarih")=date()
Rs.Update
#68.-SrcnCkr-10 Mart 2007 Cumartesi
Sanırım gözden kaçırdı arkadaş, alanları kopyaladı ve değiştirmeyi unuttu. İlginize teşekkür ederiz, düzeltilmiştir.
#69.-fatiherikli-10 Mart 2007 Cumartesi
Yazıyı gece 1-2 surlarında yazmıştım. Dalgınlığıma geçmiş. İlk olarak rs("isim")=isim dedim. Sonra bunları kopyaladım. Ama sütun adlarını değiştirmeyi unutmuşum 
scripti deneme fırsatımda olmamıştı. Sadece kod olarak burada yazmıştım.
#122.-nahrat lila-04 Nisan 2007 Çarşamba
Kaydet.asp ve kayitlar.asp'de hata verdi. Kontrol etme şansınız olursa scripti deneyip test edebilir misiniz?
Ayrıca belirtmeliyim ve tahmin ediyorum ki 'mesaj yaz' çok tüketilen bir ihtiyaç. Bu nedenle sizi tebrik ediyorum.
Beyin ve emeğinize sağlık.
Teşekkürler !
#125.-SrcnCkr-04 Nisan 2007 Çarşamba
Kayıtlar.asp'de kayıt yoksa hata verir. Kaydet.asp'de eğer yazım izniniz verilmişse hata vermemeli.
#141.-Aydın-09 Nisan 2007 Pazartesi
Alttaki hatayı alıyorum...
-----------------------------------
Microsoft JET Database Engine error '80040e10'
No value given for one or more required parameters.
/ziyaretci_defteri/Kayitlar.asp, line 11
#147.-fatiherikli-12 Nisan 2007 Perşembe
<!--#include file="baglanti.asp"-->
Sayfanın başına bu kodu koyduğundan eminmisin?
Birde sütunlarına dikket et. Kayitlar.asp'de mesajları id büyüklüğüne göre listelettirdik. id adında sütunun olduğundan emin ol.
#183.-Serkan Ceylan-07 Mayıs 2007 Pazartesi
Bu koldları uygulayıp çalıştırdım.Hem öğretici hemde kolay bir uygulama.Yanlız şu varki ben sayfamın en altına <!--#include file="Mesajekle.asp"--> kodunu yerleştirdim.Yorumu kullanıc yazıyor ve ulaşıyor db dosyasına,yorumlar.Fakat sayfamda yapılan yorumlar alt alta çıkmıyor.Bunu nasıl yapabilirim?
#189.-ali çelik-15 Mayıs 2007 Salı
sayın fatih erikli bey sizi birçok siteden takip ediyorum.
yukarda ki kodlarda bir hata gözüme çarptı.
aslında çok önemli değil gibi gözüksede çok önemli bir hata
kaydet.asp sayfasında nesneleri kapatmayı unutmuşsun biliyorsun bu devam ederse belli bir süre sonra serverde şişme yaratabilir.
diğer arkadaşlarımızın dikkatine..
#208.-fatih koçak-02 Haziran 2007 Cumartesi
arkadaşlar bunun ajax la yazılmış ziyaretci defterini nerden inceliye biliriz.
#222.-mustafa özkara-13 Haziran 2007 Çarşamba
Hmm güzel Emeğinize sağlık.
#273.-burak sumer-08 Temmuz 2007 Pazar
Microsoft JET Database Engine (0x80040E10)
Gerekli bir veya daha fazla parametre için girilen değer yok.
/web/ziyaret_defteri/Kayitlar.asp, line 3
bu hatnın çozumu nedir?
#290.-fazli atmaca-20 Temmuz 2007 Cuma
Set rs=baglanti.execute("select * from mesajlar order by id desc")
şu satırda hata veriyor dediklerinizin hepsini yaptığım halde
#356.-ömöm-05 Ekim 2007 Cuma
bu ziyaretçi defterinin herhangi bir html sayfasında çalışabilme şansı varmı acaba?
@ömöm
maalesef yok, böyle bir uygulamayı yapabilmek için web programlama dillerinden birini kullanmak gerekiyor. html dinamik bir yapıya sahip değil.
#383.-Cannur Daşkıran-25 Ekim 2007 Perşembe
Elinize ve emeğinize sağlık çok teşekkür ederim.
#384.-sevket kaya-26 Ekim 2007 Cuma
slm arkadaşlar. front page ile kendime bir site yaptım.bir asp ziyaretçi defteri koymak istiyorum.nasıl yapabilirim.<!--#include file="default.asp"-->gibi kodlama anlatılıyor ama bu şekilde sonuca ulaşamıyorum. bunu açıklayabilirseniz sevinirim.asp klasörü web klasörü içerisinde.saygılar...
#385.-hakan-27 Ekim 2007 Cumartesi
@sevket kaya
Sorunu biraz daha açık şekilde aldığın hata mesajları ile sorarsan seni aydınlatabiliriz. Ayrıca forum açıldı http://forum.aspogren.net adresinden de bizlere ulaşabilirsin.
Kolay gelsin.
#411.-yusuf-17 Kasım 2007 Cumartesi
akadaşım çok teşekkürler ben www.sende-izle.com un sahibiyim bu paylaşım i sitemde paylaşacam
#413.-semih-18 Kasım 2007 Pazar
Sayfa görüntülenemiyor
Erişmeye çalıştığınız sayfayla ilgili bir sorun olduğundan sayfa görüntülenemiyor.
--------------------------------------------------------------------------------
Lütfen aşağıdakileri deneyin:
Yenile düğmesini tıklatın ya da daha sonra yeniden deneyin.
localhost anasayfasını açın ve istediğiniz bilgilere ilişkin bağlantıları arayın.
HTTP 500.100 - ıç Sunucu Hatası - ASP hatası
Internet Information Services
--------------------------------------------------------------------------------
Teknik Bilgiler (destek personeli için)
Hata Tipi:
Microsoft JET Database Engine (0x80004005)
'' dosyası kullanılamadı; dosya zaten kullanımda.
/aspsitemdene/baglanti.asp, line 5
Tarayıcı Tipi:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) )
Sayfa:
POST 70 bytes to /aspsitemdene/Kaydet.asp
POST Data:
isim=semih&mail=ssemihgerede@hotmail.com&mesaj=semihgerede+yasn+gerede
Saat:
18 Kasım 2007 Pazar, 18:37:05
Ek bilgi:
Microsoft Destek
DıREK BU SORUNU VERıYOR...?????
#423.-lodos liebe-24 Kasım 2007 Cumartesi
arkadaslar ben scripti bizzat denedim gayet olumlu bir şekilde çalıştı fakat bir suru guvenlik acıgı var örn: meta ile yönelndirelebiliyor
eger hata lan varsa msnyarismasi@hotmail.com a mail atsınalr
#446.-mehmet ali-20 Aralık 2007 Perşembe
bu kodlar zerinde satır atlatmayı nasıl yapabiliriz.şiir ekleme bölüğmü yapmayı düşünüyorum da.Satır atlatma olayı şart.şimdiden teşk.
#457.-sinan ozd-10 Ocak 2008 Perşembe
aspogren.com sitenizi yeni gordum valla cok begendim ben daha once bu siteye nasıl gormedim dedim 
diger asp siteleri biliyoru ama cok açıklamasız (emege saygı) ona bişi demicem de yani sitenizi gordum de valla her turlu destek cok guzel bundan sonra hep burdayım galiba :I
#480.-Faruk can-31 Ocak 2008 Perşembe
Asp.indir com'dan aldığım bilgilerle derme çatma bir site yaptım.Asp bilgim yok ....araştırıyorum.Balıkcının verdiği balıktan ziyade kendim tutup yemek arzum (çok zor biliyorum) ve siz bu bilgileri paylaşmaya çalışıyorsunuz.Sağolun var olun....
Ve sizin verdiğiniz değerleri aynen girdim...Mutlaka hata bende ....çalışmadı...sistem.
FTP ile aynen siteye yolladım...Hata nerede bildirirsen sevinirim.Bilgiler paylaşıldıkca güzelleşir ve çoğalır.
http://www.canakkalebest.com/ilk_defterim/mesajekle.asp
bu link
ama zannedersem ben hata yaptım..............ama nerde?
saygılarımla......
#490.-gaye tüze-08 Şubat 2008 Cuma
site çok başarılı tebrikler.emlak ve ilanlarınız için sitemize gelin yardımcı olalım
#516.-emre arslan-03 Mart 2008 Pazartesi
kardeş çok yeniyim kayıt.asp da 500 iç sunucu hatası dior
#530.-murat akgul-12 Mart 2008 Çarşamba
kardeş bu veritabanını nerde oluşturcaz ben yeniyim de
#542.-Fthrkl-23 Mart 2008 Pazar
hata almamak icin veritabanına yazma izni vermelisiniz.
html kodlarının islememesi icinde server.htmlencoe() fonksiyonunu kullanın
ornek
Response.Write "isim: " & server.htmlEncode(rs("isim")) & " <br>"
#560.-erhan karataş-04 Nisan 2008 Cuma
Sayfa görüntülenemiyor
Erişmeye çalıştığınız sayfayla ilgili bir sorun olduğundan sayfa görüntülenemiyor.
--------------------------------------------------------------------------------
Lütfen aşağıdakileri deneyin:
Yenile düğmesini tıklatın ya da daha sonra yeniden deneyin.
localhost anasayfasını açın ve istediğiniz bilgilere ilişkin bağlantıları arayın.
HTTP 500.100 - İç Sunucu Hatası - ASP hatası
Internet Information Services
--------------------------------------------------------------------------------
Teknik Bilgiler (destek personeli için)
Hata Tipi:
Microsoft JET Database Engine (0x80040E09)
Güncelleştirilemiyor. Veritabanı veya nesne salt okunur.
/aspdersleri/Kaydet.asp, line 10
Tarayıcı Tipi:
Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) )
Sayfa:
POST 18 bytes to /aspdersleri/Kaydet.asp
POST Data:
isim=&mail=&mesaj=
Saat:
04 Nisan 2008 Cuma, 02:40:12
Ek bilgi:
Microsoft Destek
#589.-Berkan AYDEMİR-30 Nisan 2008 Çarşamba
arkadaşlar db ye yazma izni veremedim yazma izni nasıl veriliyor biliyormusunuz yardımınızı bekliyorum gerekirse berkkaan_gs@hotmail.com adresini ekleyin host şifrem vb bilgilerimi verebilirim siz yaparsanız ozaman sevinirim HADİ KOLAY GELSİN ARKADAşLAR
