Asp
 Webmaster Forumu | forum.websitem.biz | Programlama | Programlama Dilleri | Asp
Mesaj icon Konu: Asp ile Access veritabanına kayıt yapmak Yanıt Yaz Yeni Konu Gönder
Yazar Mesaj
Ömer YILDIRIM
Forum Yöneticisi
Forum Yöneticisi
Simge
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

Aktiflik
16%
Seviye
99%
Deneyim
60%
Alıntı Ömer YILDIRIM Cevaplabullet 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!
IP  Tesekkur Et
alenn34
Forum Üyesi
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

Aktiflik
46%
Seviye
46%
Deneyim
60%
Alıntı alenn34 Cevaplabullet Gönderim Zamanı: 16-Haziran-2013 Saat 15:45
teşekkürler güzel paylaşım
IP  Tesekkur Et
Yanıt Yaz Yeni Konu Gönder
Konuyu Yazdır Konuyu Yazdır

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

Bulletin Board Software by Web Wiz Forums version 8.03