Optik Sitesi – ASP.NET

Optik Satış sitesi Visual Basic VB Asp net kodları kullanılarak yapılmıştır.Sitede Şifreli Kullanıcı girişi,Üye ol,gözlük satımı,gözlük ekle,gözlük sil,gözlük düzenle,iletişim bölümü ile mail gönderme bilgisine ulaşabilirsiniz.Siteyi En altta bulunan Siteyi İNDİR linkinden bilgisayarınıza indirip kodları inceleyebilirsiniz.Siteyi indirdikten sonrar rar’dan çı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

index.aspx Kodları;

[code lang=”html”]

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

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

SelectCommand="SELECT [urunmarkasi], [urunadi], [urunfiyati], [urun] FROM [urunekle] ORDER BY [id] DESC">
</asp:SqlDataSource>
<br />
<asp:DataList ID="DataList1" runat="server" BorderColor="White"
DataSourceID="SqlDataSource1" GridLines="Horizontal" Height="395px"
RepeatColumns="3" RepeatDirection="Horizontal" Width="643px">
<ItemTemplate>
<br />
<table style="width:94%; height: 224px;">
<tr>
<td colspan="3">
<asp:Label ID="urunmarkasiLabel" runat="server"
Text='<%# Eval("urunmarkasi") %>’ ForeColor="#FF3300" />
</td>
</tr>
<tr>
<td colspan="3">
<asp:HyperLink ID="HyperLink5" runat="server" Font-Overline="False"
ForeColor="Black" NavigateUrl="urunler.aspx" Text='<%# Eval("urunadi") %>’></asp:HyperLink>
</td>
</tr>
<tr>
<td colspan="3">
          
<asp:Image ID="Image2" runat="server" Height="95px"
ImageUrl='<%# Eval("urun") %>’ Width="140px" />
<asp:Label ID="urunfiyatiLabel" runat="server" ForeColor="Red"
Text='<%# Eval("urunfiyati") %>’ />
</td>
</tr>
<tr>
<td>
 </td>
<td class="style11">
<asp:LinkButton ID="LinkButton2" runat="server" Font-Bold="True"
Font-Size="Large" Font-Strikeout="False" ForeColor="Black"
onclick="LinkButton2_Click">Sepete Ekle</asp:LinkButton>
</td>
<td class="style7">
<img alt="" src="incele.png" style="width: 42px; height: 36px" /><asp:HyperLink ID="HyperLink4" runat="server" Font-Strikeout="False"
ForeColor="Black"
NavigateUrl='<%# Eval("urun", "ozellik.aspx?urun={0}") %>’>İncele</asp:HyperLink>
</td>
</tr>
</table>
<br />
</ItemTemplate>
</asp:DataList>
<br />
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
<td><img src="spacer.gif" width="1" height="712" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="11"><img name="index_r6_c1_s1" src="index_r6_c1_s1.jpg" width="800" height="36" border="0" id="index_r6_c1_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="36" border="0" alt="" /></td>
</tr>
</table>
</form>
<p>
 </p>
</body>

</html>

[/code]

index.aspx.vb Kodları;

[code lang=”vb”]

Imports System.Data
Imports System.Data.OleDb
Partial Class index

Inherits System.Web.UI.Page
Dim baglan As New OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Server.mappath("app_data/gozlukveritabani.accdb"))
‘www.gorselprogramlama.com
Protected Sub LinkButton2_Click(ByVal sender As Object, ByVal e As System.EventArgs)
Dim adp As New OleDbDataAdapter("select * from urunekle ", baglan)
Dim tablo As New DataTable
adp.Fill(tablo)
For Each satir In tablo.Rows
Session("id") = satir(0)
Session("urunmarkasi") = satir(1)
Session("urunadi") = satir(2)
Session("fiyati") = satir(5)
Session("urunno") = satir(6)
Next
baglan.Open()
Dim cmnd As New OleDbCommand
cmnd.Connection = baglan
cmnd.CommandText = "insert into sepet(urunmarkasi,urunadi,fiyati,urunno) values (@urunmarkasi,@urunadi,@fiyati,@urunno)"
cmnd.Parameters.Add("@urunmarkasi", OleDbType.VarChar).Value = Session("urunmarkasi")
cmnd.Parameters.Add("@urunadi", OleDbType.VarChar).Value = Session("urunadi")
cmnd.Parameters.Add("@fiyati", OleDbType.VarChar).Value = Session("fiyati")
cmnd.Parameters.Add("@urunno", OleDbType.VarChar).Value = Session("urunno")
cmnd.ExecuteNonQuery()
baglan.Close()
End Sub ‘www.gorselprogramlama.com
End Class

[/code]

hakkimizda.aspx Kodları;

[code lang=”html”]

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

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

<tr>
<td colspan="12">
<table style="width:100%;">
<tr>
<td align="right" class="style1">
<asp:Image ID="Image1" runat="server" Height="30px" ImageUrl="~/indir.gif"
Width="39px" />
</td>
<td class="style2">
<asp:HyperLink ID="HyperLink1" runat="server" Font-Bold="True"
Font-Size="Large" Font-Strikeout="False" ForeColor="White"
NavigateUrl="sepetim.aspx">Alışveriş Sepetim</asp:HyperLink>
</td>
<td align="center" class="style3">
<asp:HyperLink ID="HyperLink2" runat="server" Font-Bold="True"
Font-Strikeout="False" ForeColor="White" NavigateUrl="uyegirisi.aspx">Üye
Girişi</asp:HyperLink>
</td>
<td>
 </td>
</tr>
</table>
</td>
<td><img src="spacer.gif" width="1" height="28" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="12"><img name="hakkimizda_r2_c1_s1" src="hakkimizda_r2_c1_s1.jpg" width="800" height="98" border="0" id="hakkimizda_r2_c1_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="98" border="0" alt="" /></td>
</tr>
<tr>
<td rowspan="3"><img name="hakkimizda_r3_c1_s1" src="hakkimizda_r3_c1_s1.jpg" width="32" height="298" border="0" id="hakkimizda_r3_c1_s1" alt="" /></td>
<td><a href="index.html" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’hakkimizda_r3_c2_s1′,’hakkimizda_r3_c2_s2.jpg’,’hakkimizda_r3_c2_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’hakkimizda_r3_c2_s1′,’hakkimizda_r3_c2_s3.jpg’,1);"><img name="hakkimizda_r3_c2_s1" src="hakkimizda_r3_c2_s1.jpg" width="69" height="25" border="0" id="hakkimizda_r3_c2_s1" alt="" /></a></td>
<td rowspan="3"><img name="hakkimizda_r3_c3_s1" src="hakkimizda_r3_c3_s1.jpg" width="1" height="298" border="0" id="hakkimizda_r3_c3_s1" alt="" /></td>
<td><a href="hakkimizda.html" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’hakkimizda_r3_c4_s1′,’hakkimizda_r3_c4_s2.jpg’,’hakkimizda_r3_c4_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’hakkimizda_r3_c4_s1′,’hakkimizda_r3_c4_s3.jpg’,1);"><img name="hakkimizda_r3_c4_s1" src="hakkimizda_r3_c4_s1.jpg" width="83" height="25" border="0" id="hakkimizda_r3_c4_s1" alt="" /></a></td>
<td rowspan="3"><img name="hakkimizda_r3_c5_s1" src="hakkimizda_r3_c5_s1.jpg" width="4" height="298" border="0" id="hakkimizda_r3_c5_s1" alt="" /></td>
<td rowspan="2"><a href="urunler.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’hakkimizda_r3_c6_s1′,’hakkimizda_r3_c6_s2.jpg’,’hakkimizda_r3_c6_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’hakkimizda_r3_c6_s1′,’hakkimizda_r3_c6_s3.jpg’,1);"><img name="hakkimizda_r3_c6_s1" src="hakkimizda_r3_c6_s1.jpg" width="65" height="26" border="0" id="hakkimizda_r3_c6_s1" alt="" /></a></td>
<td rowspan="2" colspan="2"><a href="satinal.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’hakkimizda_r3_c7_s1′,’hakkimizda_r3_c7_s2.jpg’,’hakkimizda_r3_c7_s4.jpg’,’hakkimizda_r4_c9_s1′,’hakkimizda_r4_c9_s2.jpg’,’hakkimizda_r4_c9_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’hakkimizda_r3_c7_s1′,’hakkimizda_r3_c7_s3.jpg’,’hakkimizda_r4_c9_s1′,’hakkimizda_r4_c9_s3.jpg’,1);"><img name="hakkimizda_r3_c7_s1" src="hakkimizda_r3_c7_s1.jpg" width="62" height="26" border="0" id="hakkimizda_r3_c7_s1" alt="" /></a></td>
<td colspan="2"><a href="iletisim.aspx" onmouseout="MM_swapImgRestore();" onmouseover="MM_swapImage(‘hakkimizda_r3_c9_s1′,”,’hakkimizda_r3_c9_s2.jpg’,1);"><img name="hakkimizda_r3_c9_s1" src="hakkimizda_r3_c9_s1.jpg" width="70" height="25" border="0" id="hakkimizda_r3_c9_s1" alt="" /></a></td>
<td rowspan="3" colspan="2"><img name="hakkimizda_r3_c11_s1" src="hakkimizda_r3_c11_s1.jpg" width="414" height="298" border="0" id="hakkimizda_r3_c11_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="25" border="0" alt="" /></td>
</tr>
<tr>
<td rowspan="2"><img name="hakkimizda_r4_c2_s1" src="hakkimizda_r4_c2_s1.jpg" width="69" height="273" border="0" id="hakkimizda_r4_c2_s1" alt="" /></td>
<td rowspan="2"><img name="hakkimizda_r4_c4_s1" src="hakkimizda_r4_c4_s1.jpg" width="83" height="273" border="0" id="hakkimizda_r4_c4_s1" alt="" /></td>
<td><a href="satinal.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’hakkimizda_r3_c7_s1′,’hakkimizda_r3_c7_s2.jpg’,’hakkimizda_r3_c7_s4.jpg’,’hakkimizda_r4_c9_s1′,’hakkimizda_r4_c9_s2.jpg’,’hakkimizda_r4_c9_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’hakkimizda_r3_c7_s1′,’hakkimizda_r3_c7_s3.jpg’,’hakkimizda_r4_c9_s1′,’hakkimizda_r4_c9_s3.jpg’,1);"><img name="hakkimizda_r4_c9_s1" src="hakkimizda_r4_c9_s1.jpg" width="8" height="1" border="0" id="hakkimizda_r4_c9_s1" alt="" /></a></td>
<td rowspan="2"><img name="hakkimizda_r4_c10_s1" src="hakkimizda_r4_c10_s1.jpg" width="62" height="273" border="0" id="hakkimizda_r4_c10_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="1" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="4"><img name="hakkimizda_r5_c6_s1" src="hakkimizda_r5_c6_s1.jpg" width="135" height="272" border="0" id="hakkimizda_r5_c6_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="272" border="0" alt="" /></td>
</tr>
<tr>
<td rowspan="2" colspan="11"> </td>
<td><img name="hakkimizda_r6_c12_s1" src="hakkimizda_r6_c12_s1.jpg" width="349" height="103" border="0" id="hakkimizda_r6_c12_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="103" border="0" alt="" /></td>
</tr>
<tr>
<td> </td>
<td><img src="spacer.gif" width="1" height="337" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="12"><img name="hakkimizda_r8_c1_s1" src="hakkimizda_r8_c1_s1.jpg" width="800" height="36" border="0" id="hakkimizda_r8_c1_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="36" border="0" alt="" /></td>
</tr>
</table>
</form>
</body>

</html>

[/code]

hakkimizda.aspx.vb Kodları;

[code lang=”vb”]

Partial Class hakkimizda
Inherits System.Web.UI.Page
‘www.gorselprogramlama.com
End Class

[/code]

urunler.aspx Kodları;

[code lang=”html”]

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

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

</html>

[/code]

urunler.aspx.vb Kodları;

[code lang=”vb”]

Imports System.Data
Imports System.Data.OleDb

Partial Class urunler
Inherits System.Web.UI.Page
Dim baglan As New OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Server.mappath("app_data/gozlukveritabani.accdb"))
‘www.gorselprogramlama.com
Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal e As System.EventArgs)
Dim adp As New OleDbDataAdapter("select * from urunekle", baglan)
Dim tablo As New DataTable
adp.Fill(tablo)
For Each satir In tablo.Rows
Session("id") = satir(0)
Session("urunmarkasi") = satir(1)
Session("urunadi") = satir(2)
Session("fiyati") = satir(5)
Session("urunno") = satir(6)
Next ‘www.gorselprogramlama.com
baglan.Open()
Dim cmnd As New OleDbCommand
cmnd.Connection = baglan
cmnd.CommandText = "insert into sepet(urunmarkasi,urunadi,fiyati,urunno) values (@urunmarkasi,@urunadi,@fiyati,@urunno)"
cmnd.Parameters.Add("@urunmarkasi", OleDbType.VarChar).Value = Session("urunmarkasi")
cmnd.Parameters.Add("@urunadi", OleDbType.VarChar).Value = Session("urunadi")
cmnd.Parameters.Add("@fiyati", OleDbType.VarChar).Value = Session("fiyati")
cmnd.Parameters.Add("@urunno", OleDbType.VarChar).Value = Session("urunno")
cmnd.ExecuteNonQuery()
baglan.Close()
‘www.gorselprogramlama.com
End Sub

Protected Sub DataList1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DataList1.SelectedIndexChanged

End Sub
End Class

[/code]

satinal.aspx Kodları;

[code lang=”html”]

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

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

<tr>
<td colspan="11">
<table style="width:100%;">
<tr>
<td align="right" class="style1">
<asp:Image ID="Image1" runat="server" Height="30px" ImageUrl="~/indir.gif"
Width="39px" />
</td>
<td class="style2">
<asp:HyperLink ID="HyperLink1" runat="server" Font-Bold="True"
Font-Size="Large" Font-Strikeout="False" ForeColor="White"
NavigateUrl="sepetim.aspx">Alışveriş Sepetim</asp:HyperLink>
                        
<asp:Button ID="Button3" runat="server" Text="Çıkış" Visible="False"
Width="91px" />
</td>
<td align="center" class="style3">
<asp:HyperLink ID="HyperLink2" runat="server" Font-Bold="True"
Font-Strikeout="False" ForeColor="White" NavigateUrl="uyegirisi.aspx">Üye
Girişi</asp:HyperLink>
</td>
<td>
 </td>
</tr>
</table>
</td>
<td><img src="spacer.gif" width="1" height="28" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="11"><img name="satinal_r2_c1_s1" src="satinal_r2_c1_s1.jpg" width="800" height="98" border="0" id="satinal_r2_c1_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="98" border="0" alt="" /></td>
</tr>
<tr>
<td rowspan="2"><img name="satinal_r3_c1_s1" src="satinal_r3_c1_s1.jpg" width="32" height="26" border="0" id="satinal_r3_c1_s1" alt="" /></td>
<td><a href="index.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’satinal_r3_c2_s1′,’satinal_r3_c2_s2.jpg’,’satinal_r3_c2_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’satinal_r3_c2_s1′,’satinal_r3_c2_s3.jpg’,1);"><img name="satinal_r3_c2_s1" src="satinal_r3_c2_s1.jpg" width="69" height="25" border="0" id="satinal_r3_c2_s1" alt="" /></a></td>
<td rowspan="2"><img name="satinal_r3_c3_s1" src="satinal_r3_c3_s1.jpg" width="1" height="26" border="0" id="satinal_r3_c3_s1" alt="" /></td>
<td><a href="hakkimizda.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’satinal_r3_c4_s1′,’satinal_r3_c4_s2.jpg’,’satinal_r3_c4_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’satinal_r3_c4_s1′,’satinal_r3_c4_s3.jpg’,1);"><img name="satinal_r3_c4_s1" src="satinal_r3_c4_s1.jpg" width="83" height="25" border="0" id="satinal_r3_c4_s1" alt="" /></a></td>
<td rowspan="2"><img name="satinal_r3_c5_s1" src="satinal_r3_c5_s1.jpg" width="4" height="26" border="0" id="satinal_r3_c5_s1" alt="" /></td>
<td rowspan="2"><a href="urunler.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’satinal_r3_c6_s1′,’satinal_r3_c6_s2.jpg’,’satinal_r3_c6_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’satinal_r3_c6_s1′,’satinal_r3_c6_s3.jpg’,1);"><img name="satinal_r3_c6_s1" src="satinal_r3_c6_s1.jpg" width="65" height="26" border="0" id="satinal_r3_c6_s1" alt="" /></a></td>
<td rowspan="2" colspan="2"><a href="satinal.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’satinal_r3_c7_s1′,’satinal_r3_c7_s2.jpg’,’satinal_r3_c7_s4.jpg’,’satinal_r4_c9_s1′,’satinal_r4_c9_s2.jpg’,’satinal_r4_c9_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’satinal_r3_c7_s1′,’satinal_r3_c7_s3.jpg’,’satinal_r4_c9_s1′,’satinal_r4_c9_s3.jpg’,1);"><img name="satinal_r3_c7_s1" src="satinal_r3_c7_s1.jpg" width="62" height="26" border="0" id="satinal_r3_c7_s1" alt="" /></a></td>
<td colspan="2"><a href="iletisim.aspx" onmouseout="MM_swapImgRestore();" onmouseover="MM_swapImage(‘satinal_r3_c9_s1′,”,’satinal_r3_c9_s2.jpg’,1);"><img name="satinal_r3_c9_s1" src="satinal_r3_c9_s1.jpg" width="70" height="25" border="0" id="satinal_r3_c9_s1" alt="" /></a></td>
<td rowspan="2"><img name="satinal_r3_c11_s1" src="satinal_r3_c11_s1.jpg" width="414" height="26" border="0" id="satinal_r3_c11_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="25" border="0" alt="" /></td>
</tr>
<tr>
<td><img name="satinal_r4_c2_s1" src="satinal_r4_c2_s1.jpg" width="69" height="1" border="0" id="satinal_r4_c2_s1" alt="" /></td>
<td><img name="satinal_r4_c4_s1" src="satinal_r4_c4_s1.jpg" width="83" height="1" border="0" id="satinal_r4_c4_s1" alt="" /></td>
<td><a href="satinal.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’satinal_r3_c7_s1′,’satinal_r3_c7_s2.jpg’,’satinal_r3_c7_s4.jpg’,’satinal_r4_c9_s1′,’satinal_r4_c9_s2.jpg’,’satinal_r4_c9_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’satinal_r3_c7_s1′,’satinal_r3_c7_s3.jpg’,’satinal_r4_c9_s1′,’satinal_r4_c9_s3.jpg’,1);"><img name="satinal_r4_c9_s1" src="satinal_r4_c9_s1.jpg" width="8" height="1" border="0" id="satinal_r4_c9_s1" alt="" /></a></td>
<td><img name="satinal_r4_c10_s1" src="satinal_r4_c10_s1.jpg" width="62" height="1" border="0" id="satinal_r4_c10_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="1" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="11">
<table style="width: 100%; height: 703px;">
<tr>
<td class="style13">
<asp:Panel ID="Panel1" runat="server" Height="750px">
<table style="width:114%; height: 673px;">
<tr>
<td class="style12">
<table style="width: 107%; height: 622px;">
<tr>
<td class="style9">
<asp:Label ID="Label1" runat="server" Text="Adres Tanımı"></asp:Label>
</td>
<td class="style10">
<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
Ör:    İş Adresim</td>
</tr>
<tr>
<td class="style7">
<asp:Label ID="Label2" runat="server" Text="İsim"></asp:Label>
</td>
<td class="style4">
<asp:TextBox ID="TextBox2" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style7">
<asp:Label ID="Label4" runat="server" Text="Soyad"></asp:Label>
</td>
<td class="style4">
<asp:TextBox ID="TextBox3" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style8">
<asp:Label ID="Label3" runat="server" Text="Adres"></asp:Label>
</td>
<td class="style6">
<asp:TextBox ID="TextBox4" runat="server" Height="103px" TextMode="MultiLine"
Width="234px"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style7">
<asp:Label ID="Label5" runat="server" Text="Şehir"></asp:Label>
</td>
<td class="style4">
<asp:TextBox ID="TextBox5" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style7">
<asp:Label ID="Label6" runat="server" Text="Posta Kodu"></asp:Label>
</td>
<td class="style4">
<asp:TextBox ID="TextBox6" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style7">
<asp:Label ID="Label7" runat="server" Text="Telefon"></asp:Label>
</td>
<td class="style4">
<asp:TextBox ID="TextBox7" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style7">
 </td>
<td class="style4">
<asp:Button ID="Button1" runat="server" Text="Devam" Width="93px" />
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="style12">
 </td>
</tr>
</table>
</asp:Panel>
</td>
<td class="style11">
<asp:Panel ID="Panel2" runat="server" Height="740px" Visible="False"
Width="382px">
<table style="width:116%; height: 740px;">
<tr>
<td>
<asp:Label ID="Label8" runat="server" Text="Kart Üzerindeki İsim"></asp:Label>
</td>
<td class="style14">
<asp:TextBox ID="TextBox8" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label9" runat="server" Text="Kredi Kartı Numarası"></asp:Label>
</td>
<td class="style14">
<asp:TextBox ID="TextBox9" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label10" runat="server" Text="Son Kullanma Tarihi"></asp:Label>
</td>
<td class="style14">
<asp:DropDownList ID="DropDownList3" runat="server">
<asp:ListItem>2010</asp:ListItem>
<asp:ListItem>2011</asp:ListItem>
<asp:ListItem>2012</asp:ListItem>
<asp:ListItem>2013</asp:ListItem>
<asp:ListItem>2014</asp:ListItem>
<asp:ListItem>2015</asp:ListItem>
<asp:ListItem>2016</asp:ListItem>
<asp:ListItem>2017</asp:ListItem>
<asp:ListItem>2018</asp:ListItem>
<asp:ListItem>2019</asp:ListItem>
<asp:ListItem>2020</asp:ListItem>
<asp:ListItem>2021</asp:ListItem>
<asp:ListItem>2022</asp:ListItem>
<asp:ListItem>2023</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
<tr>
<td class="style15">
<asp:Label ID="Label11" runat="server" Text="Güvenlik Numarası"></asp:Label>
</td>
<td class="style16">
<asp:TextBox ID="TextBox10" runat="server" Width="73px"></asp:TextBox>
<span class="Apple-style-span"
style="border-collapse: separate; color: rgb(0, 0, 0); font-family: ‘Times New Roman’; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-align: -webkit-auto; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0px; font-size: medium; ">
<span class="Apple-style-span"
style="border-collapse: collapse; font-family: Verdana; font-size: 12px; line-height: 30px; text-align: -webkit-left; -webkit-border-horizontal-spacing: 2px; -webkit-border-vertical-spacing: 2px; ">
(Kredi kartınızın arkasında bulunan 3 haneli numara)</span></span></td>
</tr>
<tr>
<td class="style17">
<asp:Label ID="Label12" runat="server" Text="Kart Tipi"></asp:Label>
</td>
<td class="style18">
<asp:DropDownList ID="DropDownList2" runat="server">
<asp:ListItem>Master</asp:ListItem>
<asp:ListItem>Visa</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label13" runat="server"></asp:Label>
</td>
<td class="style14">
<asp:Button ID="Button2" runat="server" Text="Sipariş Ver" Width="91px" />
</td>
</tr>
<tr>
<td>
 </td>
<td class="style14">
 </td>
</tr>
</table>
</asp:Panel>
</td>
</tr>
</table>
</td>
<td><img src="spacer.gif" width="1" height="713" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="11"><img name="satinal_r6_c1_s1" src="satinal_r6_c1_s1.jpg" width="800" height="35" border="0" id="satinal_r6_c1_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="35" border="0" alt="" /></td>
</tr>
</table>
</form>
</body>

</html>

[/code]

satinal.aspx.vb Kodları;

[code lang=”vb”]

Imports System.Data
Imports System.Data.OleDb
Partial Class satinal
Inherits System.Web.UI.Page
Dim baglanti As New OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Server.MapPath("App_Data\gozlukveritabani.accdb"))

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Panel2.Visible = True
Panel1.Visible = False

End Sub

Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click

Try

baglanti.Open()
Dim cmd As New OleDbCommand
cmd.CommandText = "insert into satinal(adrestanim,isim,soyad,adres,sehir,postakodu,tel,kartisim,kartno,kullanmatarihi,guvenlikno,karttipi) values (@adrestanim,@isim,@soyad,@adres,@sehir,@postakodu,@tel,@kartisim,@kartno,@kullanmatarihi,@guvenlikno,@karttipi)"
cmd.Connection = baglanti
cmd.Parameters.Add("@adrestanim", OleDbType.VarChar).Value = TextBox1.Text
cmd.Parameters.Add("@isim", OleDbType.VarChar).Value = TextBox2.Text
cmd.Parameters.Add("@soyad", OleDbType.VarChar).Value = TextBox3.Text
cmd.Parameters.Add("@adres", OleDbType.VarChar).Value = TextBox4.Text
cmd.Parameters.Add("@sehir", OleDbType.VarChar).Value = TextBox5.Text
cmd.Parameters.Add("@postakodu", OleDbType.VarChar).Value = TextBox6.Text
cmd.Parameters.Add("@tel", OleDbType.VarChar).Value = TextBox7.Text
cmd.Parameters.Add("@kartisim", OleDbType.VarChar).Value = TextBox8.Text
cmd.Parameters.Add("@kartno", OleDbType.VarChar).Value = TextBox9.Text
cmd.Parameters.Add("@kullanmatarihi", OleDbType.VarChar).Value = DropDownList3.SelectedValue
cmd.Parameters.Add("@guvenlikno", OleDbType.VarChar).Value = TextBox10.Text
cmd.Parameters.Add("@karttipi", OleDbType.VarChar).Value = DropDownList2.SelectedValue
cmd.ExecuteNonQuery()
Label13.Text = "En Yakın Zamanda Kapınızda"

baglanti.Close()

baglanti.Open()
Dim adp2 As New OleDbDataAdapter("select stok from urunekle ", baglanti)
Dim tablo2 As New DataTable
adp2.Fill(tablo2)
For Each satir2 In tablo2.Rows
Session("stok") = satir2(0)
Session("stok") = Session("stok") – 1
baglanti.Close()

baglanti.Open()
Dim cmd3 As New OleDbCommand
cmd3.Connection = baglanti
cmd3.CommandText = "update urunekle set stok=’" & Session("stok") & "’ where urunno=’" & Session("urunno") & "’"
cmd3.ExecuteNonQuery()
baglanti.Close()
baglanti.Open()
Dim cmnd As New OleDbCommand
cmnd.Connection = baglanti
cmnd.CommandText = ("delete * from sepet")
cmnd.ExecuteNonQuery()
baglanti.Close()

Next
Catch ex As Exception
Label13.Text = "hataa"
End Try
End Sub

Protected Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click
Session.Abandon()
Response.Redirect("uyegirisi.aspx")
End Sub
End Class

[/code]

iletisim.aspx Kodları;

[code lang=”html”]

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

<!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 runat="server">
<title>Untitled Page</title>
<style type="text/css">
.style1
{
width: 53px;
}
.style2
{
width: 475px;
}
.style3
{
width: 107px;
}
.style4
{
height: 23px;
}
.style5
{
height: 267px;
}
.style6
{
height: 21px;
}
.style7
{
height: 16px;
}
.style8
{
height: 84px;
}
.style9
{
height: 26px;
}
</style>
</head>
<body bgcolor="#3399ff"
onload="MM_preloadImages(‘iletisim_r3_c2_s2.jpg’,’iletisim_r3_c2_s4.jpg’,’iletisim_r3_c2_s3.jpg’,’iletisim_r3_c4_s2.jpg’,’iletisim_r3_c4_s4.jpg’,’iletisim_r3_c4_s3.jpg’,’iletisim_r3_c6_s2.jpg’,’iletisim_r3_c6_s4.jpg’,’iletisim_r3_c6_s3.jpg’,’iletisim_r3_c7_s2.jpg’,’iletisim_r3_c7_s4.jpg’,’iletisim_r4_c9_s2.jpg’,’iletisim_r4_c9_s4.jpg’,’iletisim_r3_c7_s3.jpg’,’iletisim_r4_c9_s3.jpg’,’iletisim_r3_c9_s2.jpg’);">
<form id="form1" runat="server">
<table style="display: inline-table;" border="0" cellpadding="0"
cellspacing="0" width="800" align="center">
<!– fwtable fwsrc="iletisim.png" fwpage="Page 1" fwbase="iletisim.jpg" fwstyle="Dreamweaver" fwdocid = "681112392" fwnested="0" –>
<tr>
<td><img src="spacer.gif" width="32" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="69" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="1" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="84" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="3" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="65" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="5" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="57" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="8" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="62" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="414" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="1" height="1" border="0" alt="" /></td>
</tr>

<tr>
<td colspan="11">
<table style="width:100%;">
<tr>
<td align="right" class="style1">
<asp:Image ID="Image1" runat="server" Height="30px" ImageUrl="~/indir.gif"
Width="39px" />
</td>
<td class="style2">
<asp:HyperLink ID="HyperLink1" runat="server" Font-Bold="True"
Font-Size="Large" Font-Strikeout="False" ForeColor="White"
NavigateUrl="sepetim.aspx">Alışveriş Sepetim</asp:HyperLink>
                         
<asp:Button ID="Button2" runat="server" Text="Çıkış" Width="95px" />
</td>
<td align="center" class="style3">
<asp:HyperLink ID="HyperLink2" runat="server" Font-Bold="True"
Font-Strikeout="False" ForeColor="White" NavigateUrl="uyegirisi.aspx">Üye
Girişi</asp:HyperLink>
</td>
<td>
 </td>
</tr>
</table>
</td>
<td><img src="spacer.gif" width="1" height="28" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="11"><img name="iletisim_r2_c1_s1" src="iletisim_r2_c1_s1.jpg" width="800" height="98" border="0" id="iletisim_r2_c1_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="98" border="0" alt="" /></td>
</tr>
<tr>
<td rowspan="2"><img name="iletisim_r3_c1_s1" src="iletisim_r3_c1_s1.jpg" width="32" height="26" border="0" id="iletisim_r3_c1_s1" alt="" /></td>
<td><a href="index.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’iletisim_r3_c2_s1′,’iletisim_r3_c2_s2.jpg’,’iletisim_r3_c2_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’iletisim_r3_c2_s1′,’iletisim_r3_c2_s3.jpg’,1);"><img name="iletisim_r3_c2_s1" src="iletisim_r3_c2_s1.jpg" width="69" height="25" border="0" id="iletisim_r3_c2_s1" alt="" /></a></td>
<td rowspan="2"><img name="iletisim_r3_c3_s1" src="iletisim_r3_c3_s1.jpg" width="1" height="26" border="0" id="iletisim_r3_c3_s1" alt="" /></td>
<td><a href="hakkimizda.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’iletisim_r3_c4_s1′,’iletisim_r3_c4_s2.jpg’,’iletisim_r3_c4_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’iletisim_r3_c4_s1′,’iletisim_r3_c4_s3.jpg’,1);"><img name="iletisim_r3_c4_s1" src="iletisim_r3_c4_s1.jpg" width="84" height="25" border="0" id="iletisim_r3_c4_s1" alt="" /></a></td>
<td rowspan="2"><img name="iletisim_r3_c5_s1" src="iletisim_r3_c5_s1.jpg" width="3" height="26" border="0" id="iletisim_r3_c5_s1" alt="" /></td>
<td rowspan="2"><a href="urunler.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’iletisim_r3_c6_s1′,’iletisim_r3_c6_s2.jpg’,’iletisim_r3_c6_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’iletisim_r3_c6_s1′,’iletisim_r3_c6_s3.jpg’,1);"><img name="iletisim_r3_c6_s1" src="iletisim_r3_c6_s1.jpg" width="65" height="26" border="0" id="iletisim_r3_c6_s1" alt="" /></a></td>
<td rowspan="2" colspan="2"><a href="satinal.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’iletisim_r3_c7_s1′,’iletisim_r3_c7_s2.jpg’,’iletisim_r3_c7_s4.jpg’,’iletisim_r4_c9_s1′,’iletisim_r4_c9_s2.jpg’,’iletisim_r4_c9_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’iletisim_r3_c7_s1′,’iletisim_r3_c7_s3.jpg’,’iletisim_r4_c9_s1′,’iletisim_r4_c9_s3.jpg’,1);"><img name="iletisim_r3_c7_s1" src="iletisim_r3_c7_s1.jpg" width="62" height="26" border="0" id="iletisim_r3_c7_s1" alt="" /></a></td>
<td colspan="2"><a href="iletisim.aspx" onmouseout="MM_swapImgRestore();" onmouseover="MM_swapImage(‘iletisim_r3_c9_s1′,”,’iletisim_r3_c9_s2.jpg’,1);"><img name="iletisim_r3_c9_s1" src="iletisim_r3_c9_s1.jpg" width="70" height="25" border="0" id="iletisim_r3_c9_s1" alt="" /></a></td>
<td rowspan="2"><img name="iletisim_r3_c11_s1" src="iletisim_r3_c11_s1.jpg" width="414" height="26" border="0" id="iletisim_r3_c11_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="25" border="0" alt="" /></td>
</tr>
<tr>
<td><img name="iletisim_r4_c2_s1" src="iletisim_r4_c2_s1.jpg" width="69" height="1" border="0" id="iletisim_r4_c2_s1" alt="" /></td>
<td><img name="iletisim_r4_c4_s1" src="iletisim_r4_c4_s1.jpg" width="84" height="1" border="0" id="iletisim_r4_c4_s1" alt="" /></td>
<td><a href="satinal.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’iletisim_r3_c7_s1′,’iletisim_r3_c7_s2.jpg’,’iletisim_r3_c7_s4.jpg’,’iletisim_r4_c9_s1′,’iletisim_r4_c9_s2.jpg’,’iletisim_r4_c9_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’iletisim_r3_c7_s1′,’iletisim_r3_c7_s3.jpg’,’iletisim_r4_c9_s1′,’iletisim_r4_c9_s3.jpg’,1);"><img name="iletisim_r4_c9_s1" src="iletisim_r4_c9_s1.jpg" width="8" height="1" border="0" id="iletisim_r4_c9_s1" alt="" /></a></td>
<td><img name="iletisim_r4_c10_s1" src="iletisim_r4_c10_s1.jpg" width="62" height="1" border="0" id="iletisim_r4_c10_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="1" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="11">
<br />
<table style="width: 97%; height: 607px;" align="center">
<tr>
<td colspan="2" class="style8">
<asp:Image ID="Image2" runat="server" Height="52px" ImageUrl="~/iletisim.jpg"
Width="774px" />
</td>
</tr>
<tr>
<td class="style7">
 </td>
<td class="style7">
 </td>
</tr>
<tr>
<td class="style7">
<asp:Label ID="Label7" runat="server" Text="Kime"></asp:Label>
</td>
<td class="style7">
<asp:TextBox ID="TextBox2" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style9">
<asp:Label ID="Label2" runat="server" Text="E-mail"></asp:Label>
</td>
<td class="style9">
<asp:TextBox ID="TextBox6" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style6">
<asp:Label ID="Label6" runat="server" Text="Konu"></asp:Label>
</td>
<td class="style6">
<asp:TextBox ID="TextBox5" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style5">
<asp:Label ID="Label3" runat="server" Text="Mesaj"></asp:Label>
</td>
<td class="style5">
<asp:TextBox ID="TextBox3" runat="server" Height="257px" TextMode="MultiLine"
Width="519px"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style4">
</td>
<td class="style4">
<asp:Button ID="Button1" runat="server" Font-Bold="True" ForeColor="#0000CC"
Height="33px" style="margin-left: 0px" Text="Gönder" Width="88px" />
<asp:Label ID="Label4" runat="server"></asp:Label>
</td>
</tr>
<tr>
<td>
 </td>
<td>
<span class="Apple-style-span"
style="border-collapse: separate; color: rgb(0, 0, 0); font-family: ‘Times New Roman’; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-align: -webkit-auto; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0px; font-size: medium; ">
<span class="Apple-style-span" lang="ada"
style="border-collapse: collapse; color: rgb(93, 95, 96); font-family: Verdana, Arial, sans-serif; font-size: 10px; text-align: -webkit-left; -webkit-border-horizontal-spacing: 2px; -webkit-border-vertical-spacing: 2px; ">
iBze atmış olduğunuz mailler gün içerisinde yanıtlanır. Telefonla 09:00 18:00
arası bize ulaşabilirsiniz.<br />
<br />
Her türlü soru ve sorunlarınızı yanıtlamaktan mutluluk duyarız..<br />
<br />
Tel no (332) 3539055 .<br />
<br />
Adres:Kazım Karabekir cad. 38/C<br />
<br />
istanbul/Bağcılar</span></span></td>
</tr>
</table>
</td>
<td><img src="spacer.gif" width="1" height="713" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="11"><img name="iletisim_r6_c1_s1" src="iletisim_r6_c1_s1.jpg" width="800" height="35" border="0" id="iletisim_r6_c1_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="35" border="0" alt="" /></td>
</tr>
</table>
</form>
</body>

</html>

[/code]

iletisim.aspx.vb Kodları;

[code lang=”vb”]

Imports System
Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Drawing
Imports System.Linq
Imports System.Text
Imports System.Net
Imports System.Net.Mail
‘www.gorselprogramlama.com
Partial Class iletisim
Inherits System.Web.UI.Page

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim client As New SmtpClient
Dim mesaj As New MailMessage
mesaj.To.Add(TextBox2.Text)
mesaj.From = New MailAddress(TextBox6.Text)
mesaj.Subject = TextBox5.Text
mesaj.Body = TextBox3.Text
Dim guvenlik As New NetworkCredential("mail adresi@gmail.com", "sifre")
client.Credentials = guvenlik
client.Port = 587
client.Host = "smtp.gmail.com"
client.EnableSsl = True
client.Send(mesaj)
Label4.Text = "Mailiniz Gönderildi"
‘www.gorselprogramlama.com
End Sub

Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
Session.Abandon()
Response.Redirect("uyegirisi.aspx") ‘www.gorselprogramlama.com
End Sub
End Class

[/code]

uyegirisi.aspx Kodları;

[code lang=”html”]

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

<!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 runat="server">
<title>Untitled Page</title>
<style type="text/css">
.style1
{
width: 52px;
}
.style2
{
width: 475px;
}
.style3
{
width: 107px;
}
.style4
{
width: 172px;
height: 51px;
}
.style7
{
width: 172px;
height: 64px;
}
.style8
{
height: 64px;
}
.style10
{
height: 64px;
width: 25px;
}
.style11
{
height: 51px;
}
.style12
{
}
.style14
{
height: 67px;
}
.style15
{
height: 51px;
}
.style16
{
height: 37px;
}
.style17
{
height: 51px;
width: 25px;
}
</style>
</head>
<body bgcolor="#3399ff"
onload="MM_preloadImages(‘uyegirisi_r3_c2_s2.jpg’,’uyegirisi_r3_c2_s4.jpg’,’uyegirisi_r3_c2_s3.jpg’,’uyegirisi_r3_c4_s2.jpg’,’uyegirisi_r3_c4_s4.jpg’,’uyegirisi_r3_c4_s3.jpg’,’uyegirisi_r3_c6_s2.jpg’,’uyegirisi_r3_c6_s4.jpg’,’uyegirisi_r3_c6_s3.jpg’,’uyegirisi_r3_c7_s2.jpg’,’uyegirisi_r3_c7_s4.jpg’,’uyegirisi_r4_c9_s2.jpg’,’uyegirisi_r4_c9_s4.jpg’,’uyegirisi_r3_c7_s3.jpg’,’uyegirisi_r4_c9_s3.jpg’,’uyegirisi_r3_c9_s2.jpg’);">
<form id="form1" runat="server">
<table style="display: inline-table;" border="0" cellpadding="0"
cellspacing="0" width="800" align="center">
<!– fwtable fwsrc="uyegirisi.png" fwpage="Page 1" fwbase="uyegirisi.jpg" fwstyle="Dreamweaver" fwdocid = "353756798" fwnested="0" –>
<tr>
<td><img src="spacer.gif" width="33" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="68" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="1" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="83" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="3" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="65" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="5" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="57" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="7" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="62" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="416" height="1" border="0" alt="" /></td>
<td><img src="spacer.gif" width="1" height="1" border="0" alt="" /></td>
</tr>

<tr>
<td colspan="11"><table style="width:100%;">
<tr>
<td align="right" class="style1">
<asp:Image ID="Image1" runat="server" Height="30px" ImageUrl="~/indir.gif"
Width="39px" />
</td>
<td class="style2">
<asp:HyperLink ID="HyperLink1" runat="server" Font-Bold="True"
Font-Size="Large" Font-Strikeout="False" ForeColor="White"
NavigateUrl="sepetim.aspx">Alışveriş Sepetim</asp:HyperLink>
                      
<asp:Button ID="Button2" runat="server" Text="Çıkış" Width="95px"
Visible="False" />
</td>
<td align="center" class="style3">
<asp:HyperLink ID="HyperLink2" runat="server" Font-Bold="True"
Font-Strikeout="False" ForeColor="White" NavigateUrl="uyegirisi.aspx">Üye
Girişi</asp:HyperLink>
</td>
<td>
 </td>
</tr>
</table>
</td>
<td><img src="spacer.gif" width="1" height="28" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="11"><img name="uyegirisi_r2_c1_s1" src="uyegirisi_r2_c1_s1.jpg" width="800" height="98" border="0" id="uyegirisi_r2_c1_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="98" border="0" alt="" /></td>
</tr>
<tr>
<td rowspan="2"><img name="uyegirisi_r3_c1_s1" src="uyegirisi_r3_c1_s1.jpg" width="33" height="26" border="0" id="uyegirisi_r3_c1_s1" alt="" /></td>
<td><a href="index.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’uyegirisi_r3_c2_s1′,’uyegirisi_r3_c2_s2.jpg’,’uyegirisi_r3_c2_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’uyegirisi_r3_c2_s1′,’uyegirisi_r3_c2_s3.jpg’,1);"><img name="uyegirisi_r3_c2_s1" src="uyegirisi_r3_c2_s1.jpg" width="68" height="25" border="0" id="uyegirisi_r3_c2_s1" alt="" /></a></td>
<td rowspan="2"><img name="uyegirisi_r3_c3_s1" src="uyegirisi_r3_c3_s1.jpg" width="1" height="26" border="0" id="uyegirisi_r3_c3_s1" alt="" /></td>
<td><a href="hakkimizda.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’uyegirisi_r3_c4_s1′,’uyegirisi_r3_c4_s2.jpg’,’uyegirisi_r3_c4_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’uyegirisi_r3_c4_s1′,’uyegirisi_r3_c4_s3.jpg’,1);"><img name="uyegirisi_r3_c4_s1" src="uyegirisi_r3_c4_s1.jpg" width="83" height="25" border="0" id="uyegirisi_r3_c4_s1" alt="" /></a></td>
<td rowspan="2"><img name="uyegirisi_r3_c5_s1" src="uyegirisi_r3_c5_s1.jpg" width="3" height="26" border="0" id="uyegirisi_r3_c5_s1" alt="" /></td>
<td rowspan="2"><a href="urunler.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’uyegirisi_r3_c6_s1′,’uyegirisi_r3_c6_s2.jpg’,’uyegirisi_r3_c6_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’uyegirisi_r3_c6_s1′,’uyegirisi_r3_c6_s3.jpg’,1);"><img name="uyegirisi_r3_c6_s1" src="uyegirisi_r3_c6_s1.jpg" width="65" height="26" border="0" id="uyegirisi_r3_c6_s1" alt="" /></a></td>
<td rowspan="2" colspan="2"><a href="satinal.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’uyegirisi_r3_c7_s1′,’uyegirisi_r3_c7_s2.jpg’,’uyegirisi_r3_c7_s4.jpg’,’uyegirisi_r4_c9_s1′,’uyegirisi_r4_c9_s2.jpg’,’uyegirisi_r4_c9_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’uyegirisi_r3_c7_s1′,’uyegirisi_r3_c7_s3.jpg’,’uyegirisi_r4_c9_s1′,’uyegirisi_r4_c9_s3.jpg’,1);"><img name="uyegirisi_r3_c7_s1" src="uyegirisi_r3_c7_s1.jpg" width="62" height="26" border="0" id="uyegirisi_r3_c7_s1" alt="" /></a></td>
<td colspan="2"><a href="iletisim.aspx" onmouseout="MM_swapImgRestore();" onmouseover="MM_swapImage(‘uyegirisi_r3_c9_s1′,”,’uyegirisi_r3_c9_s2.jpg’,1);"><img name="uyegirisi_r3_c9_s1" src="uyegirisi_r3_c9_s1.jpg" width="69" height="25" border="0" id="uyegirisi_r3_c9_s1" alt="" /></a></td>
<td rowspan="2"><img name="uyegirisi_r3_c11_s1" src="uyegirisi_r3_c11_s1.jpg" width="416" height="26" border="0" id="uyegirisi_r3_c11_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="25" border="0" alt="" /></td>
</tr>
<tr>
<td><img name="uyegirisi_r4_c2_s1" src="uyegirisi_r4_c2_s1.jpg" width="68" height="1" border="0" id="uyegirisi_r4_c2_s1" alt="" /></td>
<td><img name="uyegirisi_r4_c4_s1" src="uyegirisi_r4_c4_s1.jpg" width="83" height="1" border="0" id="uyegirisi_r4_c4_s1" alt="" /></td>
<td><a href="satinal.aspx" onmouseout="MM_nbGroup(‘out’);" onmouseover="MM_nbGroup(‘over’,’uyegirisi_r3_c7_s1′,’uyegirisi_r3_c7_s2.jpg’,’uyegirisi_r3_c7_s4.jpg’,’uyegirisi_r4_c9_s1′,’uyegirisi_r4_c9_s2.jpg’,’uyegirisi_r4_c9_s4.jpg’,1);" onclick="MM_nbGroup(‘down’,’navbar1′,’uyegirisi_r3_c7_s1′,’uyegirisi_r3_c7_s3.jpg’,’uyegirisi_r4_c9_s1′,’uyegirisi_r4_c9_s3.jpg’,1);"><img name="uyegirisi_r4_c9_s1" src="uyegirisi_r4_c9_s1.jpg" width="7" height="1" border="0" id="uyegirisi_r4_c9_s1" alt="" /></a></td>
<td><img name="uyegirisi_r4_c10_s1" src="uyegirisi_r4_c10_s1.jpg" width="62" height="1" border="0" id="uyegirisi_r4_c10_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="1" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="11">
<table align="center" style="width: 82%; height: 569px;">
<tr>
<td class="style11" colspan="4">
<asp:Image ID="Image2" runat="server" Height="49px" ImageUrl="~/uyegirisi.jpg"
Width="648px" />
</td>
</tr>
<tr>
<td class="style17">
</td>
<td align="right" class="style4">
<asp:Label ID="Label2" runat="server" Text="Kullanıcı Adı:"></asp:Label>
</td>
<td class="style15">
<asp:TextBox ID="TextBox1" runat="server" Width="176px"></asp:TextBox>
</td>
<td class="style15">
</td>
</tr>
<tr>
<td class="style10">
</td>
<td align="right" class="style7">
<asp:Label ID="Label3" runat="server" Text="Şifre:"></asp:Label>
</td>
<td class="style8">
<asp:TextBox ID="TextBox2" runat="server" Width="176px" TextMode="Password"></asp:TextBox>
</td>
<td class="style8">
</td>
</tr>
<tr>
<td class="style16" colspan="2">
<asp:Label ID="Label4" runat="server"></asp:Label>
</td>
<td class="style16">
<asp:Button ID="Button1" runat="server" Font-Bold="True" ForeColor="#0000CC"
Text="Giriş" Width="82px" style="height: 26px" />
</td>
<td class="style16">
</td>
</tr>
<tr>
<td class="style12" colspan="2">
<asp:HyperLink ID="HyperLink3" runat="server" Font-Bold="True"
Font-Size="Large" ForeColor="#FF3300" NavigateUrl="uyeol.aspx">Üye Olmak
İçin Tıklayın</asp:HyperLink>
</td>
<td class="style14">
<asp:HyperLink ID="HyperLink4" runat="server" Font-Bold="True"
ForeColor="#FF3300" NavigateUrl="parolamiunuttum.aspx">Parolamı Unuttum</asp:HyperLink>
</td>
<td class="style14">
</td>
</tr>
<tr>
<td class="style12" colspan="2">
 </td>
<td class="style14">
 </td>
<td class="style14">
 </td>
</tr>
<tr>
<td class="style12" colspan="4">
<table align="center" border="1" style="width: 100%; height: 249px;">
<tr>
<td align="left">
<span class="Apple-style-span"
style="border-collapse: separate; color: rgb(0, 0, 0); font-family: ‘Times New Roman’; font-style: normal; font-variant: normal; font-weight: normal; letter-spacing: normal; line-height: normal; orphans: 2; text-align: -webkit-auto; text-indent: 0px; text-transform: none; white-space: normal; widows: 2; word-spacing: 0px; -webkit-border-horizontal-spacing: 0px; -webkit-border-vertical-spacing: 0px; -webkit-text-decorations-in-effect: none; -webkit-text-size-adjust: auto; -webkit-text-stroke-width: 0px; font-size: medium; ">
<span class="Apple-style-span" lang="aa"
style="border-collapse: collapse; color: rgb(255, 255, 255); font-family: Verdana, Arial, sans-serif; font-size: medium; text-align: -webkit-left; -webkit-border-horizontal-spacing: 2px; -webkit-border-vertical-spacing: 2px;">
Üyelerimize sunduğumuz avantajlar tüm hızıyla devam ediyor.<br />
<br />
Ürünlerimizde %40 varan indirimler.<br />
<br />
Ücretsiz birbirinden şık hediye paketleri.<br />
<br />
Tüm alışverişleriniz yurt içi kargo tarafından ücretsiz.<br />
<br />
Hemen üye olun fırsatları kaçırmayın.</span></span></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
<td><img src="spacer.gif" width="1" height="712" border="0" alt="" /></td>
</tr>
<tr>
<td colspan="11"><img name="uyegirisi_r6_c1_s1" src="uyegirisi_r6_c1_s1.jpg" width="800" height="36" border="0" id="uyegirisi_r6_c1_s1" alt="" /></td>
<td><img src="spacer.gif" width="1" height="36" border="0" alt="" /></td>
</tr>
</table>
</form>
</body>
</html>

[/code]

uyegirisi.aspx.vb Kodları;

[code lang=”vb”]

Imports System.Data
Imports System.Data.OleDb

Partial Class uyegirisi
Inherits System.Web.UI.Page
Dim baglan As New OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Server.mappath("app_data/gozlukveritabani.accdb"))

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Button2.Visible = True ‘www.gorselprogramlama.com
baglan.Open()
Dim adp As New OleDbDataAdapter("select id,kul_adi,sifre,yetki from uyeler where kul_adi=’" & TextBox1.Text & "’ and sifre=’" & TextBox2.Text & "’", baglan)
Dim dt As New DataTable
adp.Fill(dt)
Dim i As New Integer
i = 0
For Each satir In dt.Rows
i += 1
Session("id") = satir(0)
Session("ad") = satir(1)
Session("soyad") = satir(2)
Session("yetki") = satir(3)
Next
If i = 0 Then
Label4.Text = "kullanıcı adı veya şifre yanlış"

End If
If Session("yetki") = "admin" Then
Response.Redirect("admin.aspx")
Else
Response.Redirect("index.aspx")
End If
baglan.Close() ‘www.gorselprogramlama.com
End Sub

Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
Session.Abandon()
Response.Redirect("uyegirisi.aspx")
End Sub
End Class

[/code]

Optik Sitesi – ASP.NET

Siteyi İNDİR

Yorumlar 1

Bir yanıt yazın