Süt Satış Sitesi – ASP.NET

Süt Satış Sitesi  – ASP.NET

Süt satış sitesi Visual Basic VB Asp net kodları kullanılarak yapılmıştır.Sitede Şifreli Kullanıcı girişi,Üye ol,Süt satımı ve Satış Grafiği ( kim ne kadar süt sattı )  bilgisine ulaşabilirsiniz.Siteyi En altta bulunan Siteyi İNDİR linkinden bilgisayarınıza indirip kodları inceleyebilirsiniz.Siteyi indirdikten sonrar rar çıkartınız.Visual Studio programını açınız. File – Open – Web Site seçeneklerine tıklayarak ekrana gelen menüden sitenin bulunduğu klasörü seçip Open diyoruz.

anasayfa

anasayfa.aspx Kodları;

[code lang=”html”]
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="anasayfa.aspx.vb" Inherits="_Default" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Başlıksız Belge</title>
<style type="text/css">
<!–
body {
background-image: url(images/Arka%20plan.jpg);
}
.stil1 {
color: #FF0000;
font-weight: bold;
}
.stil2 {
color: #666666
}
.style3
{
width: 121px;
}
.style4
{
height: 23px;
width: 121px;
}
.style1
{
height: 23px;
}
–>
</style>
<script src="Scripts/AC_RunActiveContent.js" type="text/javascript"></script>
<script type="text/javascript">
<!–
function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//–>
</script>
</head>

<body onload="MM_preloadImages(‘Butonlar/anasayfa2.png’,’Butonlar/sutsatimi2.png’,’Butonlar/satisg2.png’,’Butonlar/kaydol2.png’)">
<form id="form1" runat="server">
<table width="1026" height="956" border="0" align="center">
<tr>
<td height="952" valign="top"><table width="576" border="0" align="center">
<tr>
<td width="109" height="38"><a href="anasayfa.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image1′,”,’Butonlar/anasayfa2.png’,1)"><img src="Butonlar/anasayfa1.png" name="Image1" width="77" height="20" border="0" id="Image1" /></a></td>
<td width="31"><img src="Butonlar/cizgi.png" width="11" height="36" /></td>
<td width="113"><a href="satis.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image3′,”,’Butonlar/sutsatimi2.png’,1)"><img src="Butonlar/sutsatimi1.png" name="Image3" width="84" height="17" border="0" id="Image3" /></a></td>
<td width="28"><img src="Butonlar/cizgi.png" alt="" width="11" height="36" /></td>
<td width="130"><a href="satisg.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image4′,”,’Butonlar/satisg2.png’,1)"><img src="Butonlar/satisg1.png" name="Image4" width="100" height="20" border="0" id="Image4" /></a></td>
<td width="35"><img src="Butonlar/cizgi.png" alt="" width="11" height="36" /></td>
<td width="100"><a href="kayit.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image7′,”,’Butonlar/kaydol2.png’,1)"><img src="Butonlar/kaydol1.png" name="Image7" width="55" height="19" border="0" id="Image7" /></a></td>
</tr>
</table>
<table width="852" height="377" border="0" align="center">
<tr>
<td width="92">&nbsp;</td>
<td width="750"><script type="text/javascript">
AC_FL_RunContent( ‘codebase’,’http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0′,’width’,’750′,’height’,’380′,’src’,’images/anima’,’quality’,’high’,’pluginspage’,’http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash’,’wmode’,’transparent’,’movie’,’images/anima’ ); //end AC code
</script>
<noscript>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0" width="750" height="380">
<param name="movie" value="images/anima.swf" />
<param name="quality" value="high" />
<param name="wmode" value="transparent" />
<embed src="images/anima.swf" width="750" height="380" quality="high" pluginspage="http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>
</noscript></td>
</tr>
</table>
<table width="1009" height="484" border="0">
<tr>
<td width="162" height="192"><img src="images.jpg" width="162" height="173" /></td>
<td width="248"><strong> </strong>
<div>
<div>
<div>
<div id="post_message_254634">
<div align="left">
<blockquote>
<p class="stil1">Sütün Faydaları</p>
<p class="stil2">Süt, başta gelişme çağındaki çocuklar olmak üzere, 7&#39;den 70&#39;e
herkesin vücudu için lüzumlu olan bütün besinleri dengeli olarak içinde
bulunduran, vazgeçilmez tek besin kaynağıdır.
<asp:LinkButton ID="LinkButton1" runat="server"
PostBackUrl="~/sütünyarari.aspx">Devamı Gör</asp:LinkButton>
</p>
</blockquote>
</div>
</div>
</div>
</div>
</div>
<strong></strong> </td>
<td width="291">
<table style="width:100%;">
<tr>
<td class="style3">
kullanıcı adı</td>
<td>
<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style4">
parola</td>
<td class="style1">
<asp:TextBox ID="TextBox2" runat="server" TextMode="Password"></asp:TextBox>
&nbsp;<asp:Label ID="Label2" runat="server"></asp:Label>
</td>
</tr>
<tr>
<td class="style4">
&nbsp;
</td>
<td class="style1">
&nbsp;<asp:HyperLink ID="HyperLink2" runat="server" NavigateUrl="~/kayit.aspx">üye
olmak istiyorum</asp:HyperLink>
</td>
</tr>
<tr>
<td class="style4">
&nbsp;</td>
<td class="style1">
<asp:Button ID="Button2" runat="server" Text="giriş yap" />
</td>
</tr>
</table>
</td>
<td width="292"><p>En Çok Sevdiğiniz Süt Türü Nedir ?ğiniz Süt Türü Nedir ?<br />
<asp:RadioButton ID="RadioButton1" runat="server" GroupName="2"
Text="Çilekli" />
<br />
<asp:RadioButton ID="RadioButton2" runat="server" GroupName="2" Text="Muzlu" />
<br />
<asp:RadioButton ID="RadioButton3" runat="server" GroupName="2"
Text="Çikolatalı" />
<br />
<asp:RadioButton ID="RadioButton4" runat="server" GroupName="2" Text="Sade" />
</p>
<p>
<asp:Button ID="Button1" runat="server" Text="Oyla" />
<asp:Label ID="Label1" runat="server"></asp:Label>
</p>
</td>
</tr>
<tr>
<td height="286">&nbsp;</td>
<td colspan="3"><table width="550" align="center">
<tr>
<td><script type="text/javascript">
AC_FL_RunContent( ‘codebase’,’http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0′,’width’,’550′,’height’,’200′,’src’,’images/mouse_sagsol’,’quality’,’high’,’pluginspage’,’http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash’,’wmode’,’transparent’,’movie’,’images/mouse_sagsol’ ); //end AC code
</script>
<noscript>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0" width="550" height="200">
<param name="movie" value="images/mouse_sagsol.swf" />
<param name="quality" value="high" />
<param name="wmode" value="transparent" />
<embed src="images/mouse_sagsol.swf" width="550" height="200" quality="high" pluginspage="http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>
</noscript></td>
</tr>
</table>
<p>&nbsp;</p>
<p>&nbsp;</p></td>
</tr>
</table>
<p>&nbsp;</p></td>
</tr>
</table>
</form>
</body>
</html>

[/code]

anasayfa.aspx.vb kodları

[code lang=”vb”]Imports System.Data
Imports System.Data.OleDb
Partial Class _Default
Inherits System.Web.UI.Page
Dim baglan As New OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Server.MapPath("app_data/vt.accdb"))
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
If RadioButton1.Checked Then
Session("puan") += "çilekli süt"
End If
If RadioButton2.Checked Then

Session("puan") += "muzlu süt"
End If
If RadioButton3.Checked Then

Session("puan") += "çikolatalı süt"
End If
If RadioButton4.Checked Then
Session("puan") += "sade süt"
End If
baglan.Open()
Dim cmd As New OleDbCommand
cmd.Connection = baglan
cmd.CommandText = "insert into anket(oy) values (@oy)"
cmd.Parameters.Add("@oy", OleDbType.VarChar).Value = Session("puan")
cmd.ExecuteNonQuery()
Label1.text = "oyunuz alındı"
baglan.Close()
End Sub

Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim kadi As String = TextBox1.Text
Dim sifre As String = TextBox2.Text
Dim adp As New OleDbDataAdapter("select * from uye where kuladi=’" & kadi & "’ and sifre=’" & sifre & "’", baglan)
Dim dt As New DataTable
adp.Fill(dt)
Dim i As Integer = 0
For Each satir In dt.Rows
i += 1
Session("id") = satir(0)
Session("ad") = satir(1)
Session("soyad") = satir(2)
Session("yetki") = satir(8)
Next
If i = 0 Then
Label2.Text = "kullanıcı adı ve şifre hatalı"
Else
Response.Redirect("satis.aspx")

End If

End Sub
End Class
[/code]

sütün faydaları

sütünyararı.aspx Kodları;

[code lang=”html”]
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="sütünyarari.aspx.vb" Inherits="sütünyarari" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Başlıksız Belge</title>
<style type="text/css">
<!–
body {
background-image: url(images/Arka%20plan.jpg);
}
.stil1 {
color: #FF0000;
font-weight: bold;
}
–>
</style>
<script type="text/javascript">
<!–
function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//–>
</script>
</head>

<body onload="MM_preloadImages(‘Butonlar/anasayfa2.png’,’Butonlar/sutsatimi2.png’,’Butonlar/satisg2.png’,’Butonlar/kaydol2.png’)">
<table width="576" border="0" align="center">
<tr>
<td width="109" height="38"><a href="anasayfa.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image1′,”,’Butonlar/anasayfa2.png’,1)"><img src="Butonlar/anasayfa1.png" alt="anasayfa" name="Image1" width="77" height="20" border="0" id="Image1" /></a></td>
<td width="31"><img src="Butonlar/cizgi.png" alt="s" width="11" height="36" /></td>
<td width="113"><a href="satis.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image3′,”,’Butonlar/sutsatimi2.png’,1)"><img src="Butonlar/sutsatimi1.png" alt="s" name="Image3" width="84" height="17" border="0" id="Image3" /></a></td>
<td width="28"><img src="Butonlar/cizgi.png" alt="s" width="11" height="36" /></td>
<td width="130"><a href="satisg.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image4′,”,’Butonlar/satisg2.png’,1)"><img src="Butonlar/satisg1.png" alt="s" name="Image4" width="100" height="20" border="0" id="Image4" /></a></td>
<td width="35"><img src="Butonlar/cizgi.png" alt="s" width="11" height="36" /></td>
<td width="100"><a href="kayit.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image7′,”,’Butonlar/kaydol2.png’,1)"><img src="Butonlar/kaydol1.png" alt="s" name="Image7" width="55" height="19" border="0" id="Image7" /></a></td>
</tr>
</table>
<table width="960" border="0" align="center">
<tr>
<td width="134" valign="top"><p class="stil1">&nbsp;</p>
<p class="stil1"><a href="anasyfa.aspx"><a href="anasyfa.aspx"><img src="images/asda.png" width="130" height="65" /></a></a></p>
<p class="stil1">&nbsp;</p></td>
<td width="816"><p class="stil1">Sütün Faydaları</p>
<div>
<div>
<div>
<div id="post_message_">
<blockquote><strong>Süt, başta gelişme çağındaki çocuklar olmak üzere, 7’den 70’e herkesin vücudu için lüzumlu olan bütün besinleri dengeli olarak içinde bulunduran, vazgeçilmez tek besin kaynağıdır.<br />
<br />
Süt, büyüme ve gelişmenin temel yapı taşlarını içerir. Vücudun birçok hayati fonksiyonunu sağlayan kalp, sinir ve kas hücreleri için gerekli unsurlara sahiptir. Sütte, kalsiyumun yanı sıra, potasyum, fosfor ve protein bulunur.<br />
<br />
Süt, hücre dokularının oluşmasında, yıpranan kısımların yenilenmesinde önemli rol alırken, uzun ve sağlıklı bir hayat için ideal bir besindir.<br />
<br />
Bilhassa, 2 yaşın altındaki çocuklara tam yağlı süt verilmelidir.<br />
<br />
Faydaları saymakla bitmeyen sütün veya sütten yapılan yiyeceklerin günde en az yarım litre tüketilmesi gerekmektedir. Ancak Türkiye’de, kişi başına yıllık süt tüketimi, sadece 5-6 litre düzeyindedir. Dünya yıllık süt tüketimi ortalaması ise 18-20 litredir. Yıllık süt tüketimi, AB ülkelerinde 80-90 litre, ABD’de ise 120 litreye kadar çıkmaktadır.<br />
<br />
Yarım kilo süt, günlük ihtiyacımız olan; kalsiyumun % 75’ini, fosforun % 60’ını, iyotun % 25’ini, B2 ve B12 vitaminlerinin % 77’sini, C vitamininin % 15’ini, A vitamininin % 23’ünü, D vitamininin ise % 16’sını karşılar.<br />
<br />
Dengeli ve sağlıklı beslenmenin en temel öğelerinden birisi olan sütün diğer bazı faydaları şöyle özetlenebilir:<br />
<br />
-Büyüme ve gelişmeyi sağlar,<br />
<br />
-Dişleri korur ve çürükleri önler. Yemek arası içecek olarak dişleri de korur,<br />
<br />
-Hücre ve doku oluşumunda rol alır,<br />
<br />
-Saç ve tırnak oluşumunda rol alır,<br />
<br />
-Yağsız süt, kolesterolü düşürür,<br />
<br />
-A, B, C, D, E, K vitaminlerni içerir,<br />
<br />
-Yaraların çabuk kapanmasını sağlar,<br />
<br />
-Kanın çabuk pıhtılaşmasını sağlar,<a href="http://www.baktabul.net/" title="baktabul">baktabul</a><br />
<br />
-Kasları güçlendirir,<br />
<br />
-Hücreleri onarır,<br />
<br />
-Kemikleri sertleştirir,<br />
<br />
-Kronik bronşiti önler,<br />
<br />
-Kemik erimesini önler (yaşlanmanın doğal bir sonucu olarak kemiklerdeki kalsiyum ve proteini hızlı kaybederiz. Böylece kemikler yavaş yavaş kuvvetini kaybedip, daha kırılgan hale gelir),<br />
<br />
-Beynin gelişmesi ile çalışmasında faydalıdır</strong></blockquote>
</div>
</div>
</div>
</div></td>
</tr>
</table>
<p>&nbsp;</p>
</body>
</html>

[/code]

admin satış
satis.aspx Kodları;

[code lang=”html”]
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="satisg.aspx.vb" Inherits="satis" Debug="true" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Başlıksız Belge</title>
<style type="text/css">
<!–
body {
background-image: url(images/Arka%20plan.jpg);
}
.stil1 {
color: #FF0000;
font-weight: bold;
}
.stil2 {
color: #666666
}
.style1
{}
.style2
{
height: 25px;
}
.style3
{
height: 21px;
}
–>
</style>
</head>
<form id="form1" runat="server">
<html xmlns="http://www.w3.org/1999/xhtml">
<body onload="MM_preloadImages(‘Butonlar/anasayfa2.png’,’Butonlar/sutsatimi2.png’,’Butonlar/satisg2.png’,’Butonlar/kaydol2.png’)">
<table width="1026" height="956" border="0" align="center">
<tr>
<td height="952" valign="top"><table width="576" border="0" align="center">
<tr>
<td width="109" height="38"><a href="anasayfa.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image1′,”,’Butonlar/anasayfa2.png’,1)"><img src="Butonlar/anasayfa1.png" name="Image1" width="77" height="20" border="0" id="Image1" /></a></td>
<td width="31"><img src="Butonlar/cizgi.png" width="11" height="36" /></td>
<td width="113"><a href="satis.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image3′,”,’Butonlar/sutsatimi2.png’,1)"><img src="Butonlar/sutsatimi1.png" name="Image3" width="84" height="17" border="0" id="Image3" /></a></td>
<td width="28"><img src="Butonlar/cizgi.png" alt="" width="11" height="36" /></td>
<td width="130"><a href="satisg.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image4′,”,’Butonlar/satisg2.png’,1)"><img src="Butonlar/satisg1.png" name="Image4" width="100" height="20" border="0" id="Image4" /></a></td>
<td width="35"><img src="Butonlar/cizgi.png" alt="" width="11" height="36" /></td>
<td width="100"><a href="kayit.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image7′,”,’Butonlar/kaydol2.png’,1)"><img src="Butonlar/kaydol1.png" name="Image7" width="55" height="19" border="0" id="Image7" /></a></td>
</tr>
</table>
<table width="852" height="377" border="0" align="center" class="style2">
<tr>
<td width="92" class="style3">&nbsp;</td>
<td width="750" class="style3"><script type="text/javascript">
AC_FL_RunContent( ‘codebase’,’http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0′,’width’,’750′,’height’,’380′,’src’,’images/anima’,’quality’,’high’,’pluginspage’,’http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash’,’wmode’,’transparent’,’movie’,’images/anima’ ); //end AC code
</script>
<noscript>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0" width="750" height="380">
<param name="movie" value="images/anima.swf" />
<param name="quality" value="high" />
<param name="wmode" value="transparent" />
<embed src="images/anima.swf" width="750" height="380" quality="high" pluginspage="http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>
</noscript></td>
</tr>
</table>
<table width="1009" height="484" border="0">
<tr>
<td width="162" height="192">&nbsp;</td>
<td class="style1"><strong> </strong>
<strong></strong> <p>Adınız :&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
<br />
Soyadınız:&nbsp;
<asp:TextBox ID="TextBox2" runat="server"></asp:TextBox>
&nbsp;
<asp:Button ID="Button1" runat="server" Text="ara" />
</p>
<p>
<asp:DataList ID="DataList1" runat="server"
DataSourceID="SqlDataSource1">
<ItemTemplate>
<table style="width:100%;">
<tr>
<td class="style2">
Ad</td>
<td class="style2">
<asp:Label ID="adLabel" runat="server" Text='<%# Eval("ad") %>’ />
</td>
<td class="style2">
</td>
</tr>
<tr>
<td>
Soyad</td>
<td>
<asp:Label ID="soyadLabel" runat="server" Text='<%# Eval("soyad") %>’ />
</td>
<td>
&nbsp;</td>
</tr>
<tr>
<td>
Sattığı Süt Miktarı</td>
<td style="margin-left: 80px">
<asp:Label ID="sutltLabel" runat="server" Text='<%# Eval("sutlt") %>’ />
</td>
<td>
&nbsp;</td>
</tr>
<tr>
<td>
Kazanç</td>
<td style="margin-left: 80px">
<asp:Label ID="kazandigiparaLabel" runat="server"
Text='<%# Eval("kazandigipara") %>’ />
</td>
<td>
&nbsp;</td>
</tr>
</table>
<br />
</ItemTemplate>
</asp:DataList>
</p>
<p>
<asp:SqlDataSource ID="SqlDataSource1" runat="server"
ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>"

SelectCommand="SELECT DISTINCT [ad], [kazandigipara], [sutlt], [soyad] FROM [satis] WHERE (([ad] = ?) AND ([soyad] = ?))">
<SelectParameters>
<asp:SessionParameter Name="ad" SessionField="ad" Type="String" />
<asp:SessionParameter Name="soyad" SessionField="soyad" Type="String" />
</SelectParameters>
</asp:SqlDataSource>
</p>
<p>&nbsp;</p> </td>
</tr>
<tr>
<td height="286">&nbsp;</td>
<td><table width="550" align="center">
<tr>
<td><script type="text/javascript">
AC_FL_RunContent( ‘codebase’,’http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0′,’width’,’550′,’height’,’200′,’src’,’images/mouse_sagsol’,’quality’,’high’,’pluginspage’,’http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash’,’wmode’,’transparent’,’movie’,’images/mouse_sagsol’ ); //end AC code
</script>
<noscript>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0" width="550" height="200">
<param name="movie" value="images/mouse_sagsol.swf" />
<param name="quality" value="high" />
<param name="wmode" value="transparent" />
<embed src="images/mouse_sagsol.swf" width="550" height="200" quality="high" pluginspage="http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>
</noscript></td>
</tr>
</table>
<p>&nbsp;</p>
<p>&nbsp;</p></td>
</tr>
</table>
<p>&nbsp;</p></td>
</tr>
</table>
</form>
</body>
</html>

[/code]

satis.aspx.vb kodları

[code lang=”vb”]Imports System.Data
Imports System.Data.OleDb
Partial Class _Default
Inherits System.Web.UI.Page
Dim baglanti As New OleDbConnection("Provider=Microsoft.ACE.OleDB.12.0;Data Source=" & Server.MapPath("App_Data\vt.accdb"))

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim para As Double = 2
Dim miktar As Double = TextBox1.Text
Dim toplam As Double
toplam = para * miktar
Session("sut") += miktar
Session("para") += toplam
baglanti.Open()
Dim cmd As New OleDbCommand
cmd.Connection = baglanti
cmd.CommandText = "update satis set sutlt=’" & Session("sut") & "’ , kazandigipara=’" & Session("para") & "’ where id=" & Session("id") & ""
cmd.ExecuteNonQuery()
baglanti.Close()
Label1.Text = "sut satıldı"
Label2.Text = " Kazandıgınız Para : "
Label3.Text = Val(para * miktar)
Label4.Text = " tl"
baglanti.Close()
End Sub

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Session("yetki") = Nothing Then Response.Redirect("anasayfa.aspx")
‘ElseIf Session("yetki") = 0 Then
‘ Response.Redirect("satis.aspx")
‘End If
Response.Write(Session("yetki"))
Dim adp As New OleDbDataAdapter("select id,ad,soyad,sutlt,kazandigipara from satis", baglanti)
Dim dt As New DataTable
adp.Fill(dt)
For Each satir In dt.Rows
Session("id") = satir(0)
DropDownList1.Items.Add(satir(1))
DropDownList2.Items.Add(satir(2))
Session("sut") = satir(3)
Session("para") = satir(4)
Next

End Sub

Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
Session("id") = 0
Response.Redirect("anasayfa.aspx")
End Sub

End Class
[/code]

özsüt_1

satisg.aspx kodları ;

[code lang=”html”]

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="kayit.aspx.vb" Inherits="kayit" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Başlıksız Belge</title>
<style type="text/css">
<!–
body {
background-image: url(images/Arka%20plan.jpg);
}
.stil1 {
color: #FF0000;
font-weight: bold;
}
.stil2 {
color: #666666
}
.style1
{
width: 82px;
}
.style2
{
width: 402px;
}
.style3
{
width: 118px;
margin-left: 80px;
}
–>
</style>
<script src="Scripts/AC_RunActiveContent.js" type="text/javascript"></script>
<script type="text/javascript">
<!–
function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//–>
</script>
</head>

<body onload="MM_preloadImages(‘Butonlar/anasayfa2.png’,’Butonlar/sutsatimi2.png’,’Butonlar/satisg2.png’,’Butonlar/kaydol2.png’)">
<form id="form1" runat="server">
<table width="1026" height="956" border="0" align="center">
<tr>
<td height="952" valign="top"><table width="576" border="0" align="center">
<tr>
<td width="109" height="38"><a href="anasayfa.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image1′,”,’Butonlar/anasayfa2.png’,1)"><img src="Butonlar/anasayfa1.png" name="Image1" width="77" height="20" border="0" id="Image1" /></a></td>
<td width="31"><img src="Butonlar/cizgi.png" width="11" height="36" /></td>
<td width="113"><a href="satis.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image3′,”,’Butonlar/sutsatimi2.png’,1)"><img src="Butonlar/sutsatimi1.png" name="Image3" width="84" height="17" border="0" id="Image3" /></a></td>
<td width="28"><img src="Butonlar/cizgi.png" alt="" width="11" height="36" /></td>
<td width="130"><a href="satisg.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image4′,”,’Butonlar/satisg2.png’,1)"><img src="Butonlar/satisg1.png" name="Image4" width="100" height="20" border="0" id="Image4" /></a></td>
<td width="35"><img src="Butonlar/cizgi.png" alt="" width="11" height="36" /></td>
<td width="100"><a href="kayit.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image7′,”,’Butonlar/kaydol2.png’,1)"><img src="Butonlar/kaydol1.png" name="Image7" width="55" height="19" border="0" id="Image7" /></a></td>
</tr>
</table>
<table width="852" height="377" border="0" align="center">
<tr>
<td width="92">&nbsp;</td>
<td width="750"><script type="text/javascript">
AC_FL_RunContent( ‘codebase’,’http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0′,’width’,’750′,’height’,’380′,’src’,’images/anima’,’quality’,’high’,’pluginspage’,’http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash’,’wmode’,’transparent’,’movie’,’images/anima’ ); //end AC code
</script>
<noscript>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0" width="750" height="380">
<param name="movie" value="images/anima.swf" />
<param name="quality" value="high" />
<param name="wmode" value="transparent" />
<embed src="images/anima.swf" width="750" height="380" quality="high" pluginspage="http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>
</noscript></td>
</tr>
</table>
<table width="1009" height="628" border="0">
<tr>
<td width="162" height="336"><img src="images.jpg" width="162" height="173" /></td>
<td class="style2">
<br />
<br />
<table style="width:100%;">
<tr>
<td class="style1">
Adınız</td>
<td class="style3">
<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
</td>
<td>
&nbsp;</td>
</tr>
<tr>
<td class="style1">
Soyadınız</td>
<td class="style3">
<asp:TextBox ID="TextBox2" runat="server"></asp:TextBox>
</td>
<td>
&nbsp;</td>
</tr>
<tr>
<td class="style1">
Kullanıcı adı</td>
<td class="style3">
<asp:TextBox ID="TextBox3" runat="server"></asp:TextBox>
</td>
<td>
&nbsp;</td>
</tr>
<tr>
<td class="style1">
Şifre</td>
<td class="style3">
<asp:TextBox ID="TextBox4" runat="server"></asp:TextBox>
</td>
<td>
&nbsp;</td>
</tr>
<tr>
<td class="style1">
E-posta</td>
<td class="style3">
<asp:TextBox ID="TextBox5" runat="server"></asp:TextBox>
</td>
<td>
&nbsp;</td>
</tr>
<tr>
<td class="style1">
Yaşınız </td>
<td class="style3">
<asp:TextBox ID="TextBox6" runat="server"></asp:TextBox>
</td>
<td>
&nbsp;</td>
</tr>
<tr>
<td class="style1">
Adresiniz</td>
<td class="style3">
<asp:TextBox ID="TextBox7" runat="server" TextMode="MultiLine"></asp:TextBox>
</td>
<td>
&nbsp;</td>
</tr>
<tr>
<td class="style1">
&nbsp;</td>
<td class="style3">
<asp:Button ID="Button1" runat="server" Text="Kayıt ol" />
<asp:Label ID="Label1" runat="server"></asp:Label>
</td>
<td>
&nbsp;</td>
</tr>
</table>
</td>
<td width="291">&nbsp;</td>
<td width="292"><p>&nbsp;</p>
</td>
</tr>
<tr>
<td height="286">&nbsp;</td>
<td colspan="3"><table width="550" align="center">
<tr>
<td><script type="text/javascript">
AC_FL_RunContent( ‘codebase’,’http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0′,’width’,’550′,’height’,’200′,’src’,’images/mouse_sagsol’,’quality’,’high’,’pluginspage’,’http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash’,’wmode’,’transparent’,’movie’,’images/mouse_sagsol’ ); //end AC code
</script>
<noscript>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0" width="550" height="200">
<param name="movie" value="images/mouse_sagsol.swf" />
<param name="quality" value="high" />
<param name="wmode" value="transparent" />
<embed src="images/mouse_sagsol.swf" width="550" height="200" quality="high" pluginspage="http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>
</noscript></td>
</tr>
</table>
<p>&nbsp;</p>
<p>&nbsp;</p></td>
</tr>
</table>
<p>&nbsp;</p></td>
</tr>
</table>
</form>
</body>
</html>

[/code]

satis.aspx.vb kodları

[code lang=”vb”]
Partial Class satis
Inherits System.Web.UI.Page
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Session("ad") = TextBox1.Text
Session("soyad") = TextBox2.Text
End Sub

End Class
[/code]

özsüt_2

kayit.aspx kodları ;

[code lang=”html”]

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="satis.aspx.vb" Inherits="_Default" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>Başlıksız Belge</title>
<style type="text/css">
<!–
body {
background-image: url(images/Arka%20plan.jpg);
}
.stil1 {
color: #FF0000;
font-weight: bold;
}
.stil2 {
color: #666666
}
.style1
{
width: 157px;
}
.style2
{
width: 157px;
height: 59px;
}
.style3
{
height: 59px;
}
–>
</style>
<script src="Scripts/AC_RunActiveContent.js" type="text/javascript"></script>
<script type="text/javascript">
<!–
function MM_swapImgRestore() { //v3.0
var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}
function MM_preloadImages() { //v3.0
var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
var p,i,x; if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//–>
</script>
</head>

<body onload="MM_preloadImages(‘Butonlar/anasayfa2.png’,’Butonlar/sutsatimi2.png’,’Butonlar/satisg2.png’,’Butonlar/kaydol2.png’)">
<table width="1026" height="956" border="0" align="center">
<tr>
<td height="952" valign="top"><table width="576" border="0" align="center">
<tr>
<td width="109" height="38"><a href="anasayfa.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image1′,”,’Butonlar/anasayfa2.png’,1)"><img src="Butonlar/anasayfa1.png" name="Image1" width="77" height="20" border="0" id="Image1" /></a></td>
<td width="31"><img src="Butonlar/cizgi.png" width="11" height="36" /></td>
<td width="113"><a href="satis.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image3′,”,’Butonlar/sutsatimi2.png’,1)"><img src="Butonlar/sutsatimi1.png" name="Image3" width="84" height="17" border="0" id="Image3" /></a></td>
<td width="28"><img src="Butonlar/cizgi.png" alt="" width="11" height="36" /></td>
<td width="130"><a href="satisg.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image4′,”,’Butonlar/satisg2.png’,1)"><img src="Butonlar/satisg1.png" name="Image4" width="100" height="20" border="0" id="Image4" /></a></td>
<td width="35"><img src="Butonlar/cizgi.png" alt="" width="11" height="36" /></td>
<td width="100"><a href="kayit.aspx" onmouseout="MM_swapImgRestore()" onmouseover="MM_swapImage(‘Image7′,”,’Butonlar/kaydol2.png’,1)"><img src="Butonlar/kaydol1.png" name="Image7" width="55" height="19" border="0" id="Image7" /></a></td>
</tr>
</table>
<table width="852" height="377" border="0" align="center">
<tr>
<td width="92">&nbsp;</td>
<td width="750"><script type="text/javascript">
AC_FL_RunContent( ‘codebase’,’http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0′,’width’,’750′,’height’,’380′,’src’,’images/anima’,’quality’,’high’,’pluginspage’,’http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash’,’wmode’,’transparent’,’movie’,’images/anima’ ); //end AC code
</script>
<noscript>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0" width="750" height="380">
<param name="movie" value="images/anima.swf" />
<param name="quality" value="high" />
<param name="wmode" value="transparent" />
<embed src="images/anima.swf" width="750" height="380" quality="high" pluginspage="http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>
</noscript></td>
</tr>
</table>
<table width="1009" height="484" border="0">
<tr>
<td width="162" height="192">&nbsp;</td>
<td><strong> </strong>
<div>
<div>
<div>
<div id="post_message_254634">
<div align="left">
<blockquote>
<form id="form1" runat="server">
<div>

<br />

<table style="width:100%;">
<tr>
<td class="style2">
Ad</td>
<td class="style3">
<asp:DropDownList ID="DropDownList1" runat="server" AutoPostBack="True"
DataSourceID="SqlDataSource1" DataTextField="ad" DataValueField="ad"
Width="137px">
</asp:DropDownList>
<asp:SqlDataSource ID="SqlDataSource1" runat="server"
ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>"
SelectCommand="SELECT DISTINCT [ad] FROM [satis]"></asp:SqlDataSource>
</td>
</tr>
<tr>
<td class="style1">
Soyad</td>
<td>
<asp:DropDownList ID="DropDownList2" runat="server"
DataSourceID="SqlDataSource2" DataTextField="soyad" DataValueField="soyad"
Width="141px">
</asp:DropDownList>
<asp:SqlDataSource ID="SqlDataSource2" runat="server"
ConnectionString="<%$ ConnectionStrings:ConnectionString %>"
ProviderName="<%$ ConnectionStrings:ConnectionString.ProviderName %>"
SelectCommand="SELECT DISTINCT [soyad] FROM [satis] WHERE ([ad] = ?)">
<SelectParameters>
<asp:ControlParameter ControlID="DropDownList1" Name="ad"
PropertyName="SelectedValue" Type="String" />
</SelectParameters>
</asp:SqlDataSource>
</td>
</tr>
<tr>
<td class="style1">
Satıcağı Sütün Litresi</td>
<td>
<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
&nbsp;<asp:Button ID="Button1" runat="server" Text="Sat" />
<br />
<asp:Label ID="Label1" runat="server"></asp:Label>
<br />
<asp:Label ID="Label2" runat="server"></asp:Label>
&nbsp;<asp:Label ID="Label3" runat="server"></asp:Label>
&nbsp;<asp:Label ID="Label4" runat="server"></asp:Label>
</td>
</tr>
<tr>
<td class="style1">
<asp:Button ID="Button2" runat="server" Text="Çıkış" />
</td>
<td>
&nbsp;</td>
</tr>
</table>

</div>
</form>
<p class="stil1">&nbsp;</p>
</blockquote>
</div>
</div>
</div>
</div>
</div>
<strong></strong> <p>&nbsp;</p></td>
</tr>
<tr>
<td height="286">&nbsp;</td>
<td><table width="550" align="center">
<tr>
<td><script type="text/javascript">
AC_FL_RunContent( ‘codebase’,’http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0′,’width’,’550′,’height’,’200′,’src’,’images/mouse_sagsol’,’quality’,’high’,’pluginspage’,’http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash’,’wmode’,’transparent’,’movie’,’images/mouse_sagsol’ ); //end AC code
</script>
<noscript>
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,28,0" width="550" height="200">
<param name="movie" value="images/mouse_sagsol.swf" />
<param name="quality" value="high" />
<param name="wmode" value="transparent" />
<embed src="images/mouse_sagsol.swf" width="550" height="200" quality="high" pluginspage="http://www.adobe.com/shockwave/download/download.cgi?P1_Prod_Version=ShockwaveFlash" type="application/x-shockwave-flash" wmode="transparent"></embed>
</object>
</noscript></td>
</tr>
</table>
<p>&nbsp;</p>
<p>&nbsp;</p></td>
</tr>
</table>
<p>&nbsp;</p></td>
</tr>
</table>
</body>
</html>

[/code]

kayitaspx.vb kodları

[code lang=”vb”]Imports System.Data
Imports System.Data.OleDb
Partial Class kayit
Inherits System.Web.UI.Page
Dim baglan As New OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Server.MapPath("app_data/vt.accdb"))
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
baglan.Open()
Dim cmd As New OleDbCommand
cmd.Connection = baglan
cmd.CommandText = "insert into uye(ad,soyad,kuladi,sifre,eposta,yas,adres,yetki) values (@ad,@soyad,@kuladi,@sifre,@eposta,@yas,@adres,@yetki)"
cmd.Parameters.Add("@ad", OleDbType.VarChar).Value = TextBox1.Text
cmd.Parameters.Add("@soyad", OleDbType.VarChar).Value = TextBox2.Text
cmd.Parameters.Add("@kuladi", OleDbType.VarChar).Value = TextBox3.Text
cmd.Parameters.Add("@sifre", OleDbType.VarChar).Value = TextBox4.Text
cmd.Parameters.Add("@eposta", OleDbType.VarChar).Value = TextBox5.Text
cmd.Parameters.Add("@yas", OleDbType.VarChar).Value = TextBox6.Text
cmd.Parameters.Add("@adres", OleDbType.VarChar).Value = TextBox7.Text
cmd.Parameters.Add("@yetki", OleDbType.VarChar).Value = 0
cmd.ExecuteNonQuery()
Label1.Text = "Kayıtınız Tamamlandı"
baglan.Close()
baglan.Open()
Dim cmd2 As New OleDbCommand
cmd2.Connection = baglan
cmd2.CommandText = "insert into satis(ad,soyad,sutlt,kazandigipara) values (@ad,@soyad,@sutlt,@kazandigipara)"
cmd2.Parameters.Add("@ad", OleDbType.VarChar).Value = TextBox1.Text
cmd2.Parameters.Add("@soyad", OleDbType.VarChar).Value = TextBox2.Text
cmd2.Parameters.Add("@sutlt", OleDbType.VarChar).Value = "0"
cmd2.Parameters.Add("@kazandigipara", OleDbType.VarChar).Value = "0"
cmd2.ExecuteNonQuery()

baglan.Close()
End Sub
End Class
[/code]

Siteyi İNDİR

Yorumlar 1

Bir yanıt yazın

E-posta adresiniz yayınlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir

➤