Asp Veritabanına (Access) Yeni Kayıt Girmek.

**Constantine** · 05-14-2009, 11:09 AM

Konu : Veritabanına (Access) Yeni Kayıt Girmek.
Seviye : Basit
Kaynak Dosyalar :Linkleri Üyelerimiz Görebilir. UslanmaM Üyeliği İçin Tıklayın

wwwroot içine DERS isimli Klasöre koyun ve unutmayın DERS klasörüne yazma izni verin.
Yazma izni nasıl veririm?
DERS klasörüne sağ tıklayın ve özelliklerden Web Paylaşımı sekmesine geçin. Bu klasörü Paylaşın radio düğmesini işaretleyiniz bir sihirbaz açılacak oradaki yazma vb. seçenekleri seçip uygulayın...

İlk önce bir form sayfasına ihtiyacımız var.

kayit_form.html

Kod:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

<html>
<head>
<title>Kayıt Formu</title>
<aaaa http-equiv="aaaaaaa-Type" aaaaaaa="text/html; charset=iso-8859-9">
</head>
<body>

<table align="center" border="0" cellpadding="0" cellspacing="0" width="300">

<form action="kayit_kaydet.asp" method="post">

<tr>
<td>Ad :</td>
<td><input type="text" name="txtAd" size="20" maxlength="15" value=""></td>
</tr>

<tr>
<td>Soyad :</td>
<td><input type="text" name="txtSoyad" size="20" maxlength="25" value=""></td>
</tr>

<tr>
<td>Mail :</td>
<td><input type="text" name="txtMail" size="20" maxlength="30" value=""></td>
</tr>

<tr>
<td>Şehir :</td>
<td>
<select name="txtSehir">
<option value="Adana">Adana</option>
<option value="Adıyaman">Adıyaman</option>
<option value="Afyon">Afyon</option>
<option value="Ağrı">Ağrı</option>
<option value="Amasya">Amasya</option>
<option value="Ankara">Ankara</option>
</select>
</td>
</tr>

<tr>
<td>Mesaj :</td>
<td><textarea rows="5" cols="30" name="txtMesaj"></textarea></td>
</tr>

<tr>
<td> </td>
<td><input type="submit" value="Kaydet"></td>
</tr>

</form>

</table>

</body>
</html>

formdan gelen bilgileri veritabanına kaydedecek asp sayfamız.

kayit_kaydet.asp

Kod:
<%
'Adovbs.inc dosyası içindeki sabitlerimiz. Kayıt işlemi yaparken lazım olacak....
const adCmdText = &H0001
const adExecuteNoRecords = &H00000080

'Form içindeki name="txtAd" isimli form elemanımızdan içine yazılmış olan ismi alıyor ve bu değeri strAd değişkenine atıyoruz(yüklüyoruz).
dim strAd
strAd = Request.Form("txtAd")

'Form içindeki name="txtSoyad" isimli form elemanımızdan içine yazılmış olan soyismi alıyor ve bu değeri strSoyad değişkenine atıyoruz(yüklüyoruz).
dim strSoyad
strSoyad = Request.Form("txtSoyad")

'Form içindeki name="txtMail" isimli form elemanımızdan içine yazılmış olan Mail adresini alıyor ve bu değeri strMail değişkenine atıyoruz(yüklüyoruz).
dim strMail
strMail = Request.Form("txtMail")

'Form içindeki name="txtSehir" isimli form elemanımızdan içine yazılmış olan Sehir ismini alıyor ve bu değeri strSehir değişkenine atıyoruz(yüklüyoruz).
dim strSehir
strSehir = Request.Form("txtSehir")

'Form içindeki name="txtMesaj" isimli form elemanımızdan içine yazılmış olan Mesajı alıyor ve bu değeri strMesaj değişkenine atıyoruz(yüklüyoruz).
dim strMesaj
strMesaj = Request.Form("txtMesaj")

'Veritabanına Bağlanıyoruz.
dim strConn
strConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("veritabani.mdb")

'Bağlantıyı açıyoruz.
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

'Bağlantıyı kapatıyoruz.
objConn.Close
set objConn = Nothing

'Yazdığımız kaydı gösteren sayfaya "kayit_oku.asp" yönlendiriyoruz..
Response.Redirect "kayit_oku.asp"
%>

konuyu açıklayıcı resimler aşağıda...

05-14-2009, 11:09 AM	#1 (permalink)
Constantine {♥_♥} sürgün..{♥_♥}	Asp Veritabanına (Access) Yeni Kayıt Girmek. Konu : Veritabanına (Access) Yeni Kayıt Girmek. Seviye : Basit Kaynak Dosyalar :Linkleri Üyelerimiz Görebilir. UslanmaM Üyeliği İçin Tıklayın wwwroot içine DERS isimli Klasöre koyun ve unutmayın DERS klasörüne yazma izni verin. Yazma izni nasıl veririm? DERS klasörüne sağ tıklayın ve özelliklerden Web Paylaşımı sekmesine geçin. Bu klasörü Paylaşın radio düğmesini işaretleyiniz bir sihirbaz açılacak oradaki yazma vb. seçenekleri seçip uygulayın... İlk önce bir form sayfasına ihtiyacımız var. kayit_form.html Kod: <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"> <html> <head> <title>Kayıt Formu</title> <aaaa http-equiv="aaaaaaa-Type" aaaaaaa="text/html; charset=iso-8859-9"> </head> <body> <table align="center" border="0" cellpadding="0" cellspacing="0" width="300"> <form action="kayit_kaydet.asp" method="post"> <tr> <td>Ad :</td> <td><input type="text" name="txtAd" size="20" maxlength="15" value=""></td> </tr> <tr> <td>Soyad :</td> <td><input type="text" name="txtSoyad" size="20" maxlength="25" value=""></td> </tr> <tr> <td>Mail :</td> <td><input type="text" name="txtMail" size="20" maxlength="30" value=""></td> </tr> <tr> <td>Şehir :</td> <td> <select name="txtSehir"> <option value="Adana">Adana</option> <option value="Adıyaman">Adıyaman</option> <option value="Afyon">Afyon</option> <option value="Ağrı">Ağrı</option> <option value="Amasya">Amasya</option> <option value="Ankara">Ankara</option> </select> </td> </tr> <tr> <td>Mesaj :</td> <td><textarea rows="5" cols="30" name="txtMesaj"></textarea></td> </tr> <tr> <td> </td> <td><input type="submit" value="Kaydet"></td> </tr> </form> </table> </body> </html> formdan gelen bilgileri veritabanına kaydedecek asp sayfamız. kayit_kaydet.asp Kod: <% 'Adovbs.inc dosyası içindeki sabitlerimiz. Kayıt işlemi yaparken lazım olacak.... const adCmdText = &H0001 const adExecuteNoRecords = &H00000080 'Form içindeki name="txtAd" isimli form elemanımızdan içine yazılmış olan ismi alıyor ve bu değeri strAd değişkenine atıyoruz(yüklüyoruz). dim strAd strAd = Request.Form("txtAd") 'Form içindeki name="txtSoyad" isimli form elemanımızdan içine yazılmış olan soyismi alıyor ve bu değeri strSoyad değişkenine atıyoruz(yüklüyoruz). dim strSoyad strSoyad = Request.Form("txtSoyad") 'Form içindeki name="txtMail" isimli form elemanımızdan içine yazılmış olan Mail adresini alıyor ve bu değeri strMail değişkenine atıyoruz(yüklüyoruz). dim strMail strMail = Request.Form("txtMail") 'Form içindeki name="txtSehir" isimli form elemanımızdan içine yazılmış olan Sehir ismini alıyor ve bu değeri strSehir değişkenine atıyoruz(yüklüyoruz). dim strSehir strSehir = Request.Form("txtSehir") 'Form içindeki name="txtMesaj" isimli form elemanımızdan içine yazılmış olan Mesajı alıyor ve bu değeri strMesaj değişkenine atıyoruz(yüklüyoruz). dim strMesaj strMesaj = Request.Form("txtMesaj") 'Veritabanına Bağlanıyoruz. dim strConn strConn = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("veritabani.mdb") 'Bağlantıyı açıyoruz. 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 'Bağlantıyı kapatıyoruz. objConn.Close set objConn = Nothing 'Yazdığımız kaydı gösteren sayfaya "kayit_oku.asp" yönlendiriyoruz.. Response.Redirect "kayit_oku.asp" %> konuyu açıklayıcı resimler aşağıda...

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder
Stil
Normal Hybrid-Şeklinde gösterime geç Ağaç şeklinde gösterime geç

Benzer Konular
Konu	Konuyu Başlatan	UslanmaM	Cevaplar	Son Mesaj
asp veritabanına kayıt	CaLaMiTy	ASP, Perl, Php, Html	0	04-15-2009 10:51 PM
yeni yıla yanlız girmek	LuxAeterna	Komik resimler & Linkler	1	03-05-2009 12:45 PM
Matso'ya Şubat'ta 31 Yeni Üye Kayıt Yaptırırkan 15 Üye Kayıt Sildirdi	SonKraL	Ekonomi Haberleri	0	03-03-2009 12:41 AM
'Yeni kayıt' iddiası	ALEV	Güncel HABERLER	0	02-28-2009 10:00 AM
Yeni yıla çarpıcı girmek için	ABYSS	Bakım ve Estetik	0	09-07-2007 03:52 AM

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)