Asp | |
Webmaster Forumu | forum.websitem.biz | Programlama | Programlama Dilleri | Asp |
Konu: Asp ile Access veritabanına kayıt yapmak | |
Yazar | Mesaj | |||||||||||||||
Ömer YILDIRIM
Forum Yöneticisi Cahil Yönetici Kayıt Tarihi: 07-Temmuz-2012 Konum: Balıkesir Gönderilenler: 52 Tesekkür: 10 Rep: 24 Hak Puan : 30 Kidem : 9 OrtalamaHak : % 100 Itibar :5
|
Konu: Asp ile Access veritabanına kayıt yapmak Gönderim Zamanı: 14-Temmuz-2012 Saat 16:06 |
|||||||||||||||
Merhaba arkadaslar bugunkü asp dersimizde sizlere access veritabanini kayit yapmayi anlatacagim.
wwwroot içine DERS isimli Klasöre koyun ve unutmayin DERS klasörüne yazma izni verin. Klasöre Yazma izni nasil veririm? DERS klasörüne sag tiklayin ve özelliklerden Web Paylasimi sekmesine geçin. Bu klasörü Paylasin radio dügmesini isaretleyiniz bir sihirbaz açilacak oradaki yazma vb. seçenekleri seçip uygulayin... kayit_kaydet.asp Kod: <% Adovbs.inc dosyasi içindeki sabitlerimiz. Kayit islemi yaparken lazim olacak.... const adCmdText = &H0001 const adExecuteNoRecords = &H00000080 Form içindeki name="txtAd" isimli form elemanimizdan içine yazilmis olan ismi aliyor ve bu degeri strAd degiskenine atiyoruz(yüklüyoruz). dim strAd strAd = Request.Form("txtAd") Form içindeki name="txtSoyad" isimli form elemanimizdan içine yazilmis olan soyismi aliyor ve bu degeri strSoyad degiskenine atiyoruz(yüklüyoruz). dim strSoyad strSoyad = Request.Form("txtSoyad") Form içindeki name="txtMail" isimli form elemanimizdan içine yazilmis olan Mail adresini aliyor ve bu degeri strMail degiskenine atiyoruz(yüklüyoruz). dim strMail strMail = Request.Form("txtMail") Form içindeki name="txtSehir" isimli form elemanimizdan içine yazilmis olan Sehir ismini aliyor ve bu degeri strSehir degiskenine atiyoruz(yüklüyoruz). dim strSehir strSehir = Request.Form("txtSehir") Form içindeki name="txtMesaj" isimli form elemanimizdan içine yazilmis olan Mesaji aliyor ve bu degeri strMesaj degiskenine atiyoruz(yüklüyoruz). dim strMesaj strMesaj = Request.Form("txtMesaj") Veritabanina Baglaniyoruz. dim strConn strConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("veritabani.mdb") Baglantiyi açiyoruz. dim objConn set objConn = Server.CreateObject("ADODB.Connection") objConn.Open strConn strSql = "INSERT INTO tblUye(UYE_AD, UYE_SOYAD, UYE_MAIL, UYE_SEHIR, UYE_MESAJ) VALUES( " & strAd & " , " & strSoyad & " , " & strMail & " , " & strSehir & " , " & strMesaj & " )" objConn.Execute(strSql),,adCmdText + adExecuteNoRecords Baglantiyi kapatiyoruz. objConn.Close set objConn = Nothing Yazdigimiz kaydi gösteren sayfaya "kayit_oku.asp" yönlendiriyoruz.. Response.Redirect "kayit_oku.asp" %> |
||||||||||||||||
Hazır Profesyonel Web Site Paketleri WebSitem!
|
||||||||||||||||
alenn34
Forum Üyesi Kayıt Tarihi: 26-Nisan-2013 Gönderilenler: 351 Tesekkür: 0 Rep: 0 Hak Puan : 0 Kidem : 5 OrtalamaHak : % 0 Itibar :0
|
Gönderim Zamanı: 16-Haziran-2013 Saat 15:45 | |||||||||||||||
teşekkürler güzel paylaşım
|
||||||||||||||||
Forum Atla |
Kapalı Foruma Yeni Konu Gönderme Kapalı Forumdaki Konulara Cevap Yazma Kapalı Forumda Cevapları Silme Kapalı Forumdaki Cevapları Düzenleme Kapalı Forumda Anket Açma Kapalı Forumda Anketlerde Oy Kullanma |