ASP.NET ile Veri Tabanı İşlemleri...

Kodla Büyü

kobalt

Site Gezgini
Mesajlar
56
Arkadaşlar Ekteki dosyada basit bir veritabanı oluşturdum. İçinde bir tane tablo var. Ad ve soyad alanları mevcut. Birde Asp.net dosyası var. İki tane text kutusu ve kaydet düğmesi. Şimdi bana bu veritabanına bağlantı yapıp kaydet basınca text kutusuna girilenleri veritabanına kayıt edecek kodları yazacak bir arkadaş lazım.

Şimdiden çok teşekkürler...
 

Ekli dosyalar

  • web.rar
    web.rar
    7.1 KB · Görüntüleme: 322
<%@ page language="VB" debug="true" %>
<%@ import Namespace="System.Data.OleDb" %>

<script runat="server">

Sub ekle(sender As Object, e As EventArgs)
dim db_baglanti as OleDbConnection
dim ad as string
dim soyad as string
dim sinif as string

ad=ad1.text
soyad=soyad1.text
sinif=sinif1.text



db_baglanti = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; DATA Source=" & Server.MapPath("\data.mdb"))
db_baglanti.Open()

dim db_komut as OleDbCommand
db_komut= New OleDbCommand( "Insert INTO deneme ( ad, soyad,sinif) Values( '"& ad &"','"& soyad &"','"& sinif &"')", db_baglanti )
db_komut.ExecuteNonQuery
response.write("kaydınız eklendi")

db_baglanti.Close()

end sub





</script>

<html>
<head>
<title>Asp.net Veri tabanı kayıt Örneği</title>
</head>
<body>
<form runat="server">
<asp:label id="label1" text="Adınız :" runat="server" />
<asp:textbox id="ad1" runat="server"/>
<br/>
<asp:label id="label2" text="Soyadınız:" runat="server" />
<asp:textbox id="soyad1" runat="server"/>
<br/>

<asp:label id="label3" text="sınıfınız:" runat="server" />
<asp:textbox id="sinif1" runat="server"/>
<br/>
<asp:button text="kaydet" onclick="ekle" runat="server" />


</form>
</body>
</html>



----------------------------------------veri tabanından kayıt listeleme-datareader ile---------------------------

@ Import Namespace=”System.data” %>
<%@ Import Namespace=”System.data.oledb” %>
<script runat=”server”>
Sub Page_Load(Src As Object, E As EventArgs)
Dim sorgu as new OleDbCommand
Dim baglanti As New OleDbConnection
Dim veriler As OleDbDataReader
baglanti.ConnectionString = “Provider=Microsoft.jet.oledb.4.0;data source=” & Server.MapPath(“data.mdb”)
baglanti.Open()
sorgu.Connection = baglanti
sorgu.CommandText = “select * from uyeler”
veriler=sorgu.executereader()
While veriler.Read()
Response.Write(“ADI:” & veriler(“ad”) & “</br>”)
Response.Write(“SOYADI:” & veriler(“soyad”) & “</br>”)
Response.Write(“KULLANICI ADI:” & veriler(“kullaniciadi”) & “</br>”)
Response.Write(“ŞİFRE:” & veriler(“sifre”) & “</br>”)
Response.Write(“E MAİL:” & veriler(“mail”) & “</br>”)
Response.Write(“<p></p>”)
end while
baglanti.Close()
end sub
</script>
 
BBNET
Geri
Üst