Düğün Salonu Rezervasyon Sitesi – ASP.NET
Düğün Salanu Rezervasyon sitesi Visual Basic VB Asp net kodları kullanılarak yapılmıştır.Sitede Şifreli Kullanıcı girişi,Üye ol,rezervasyon yapma,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 sonra 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.

index.aspx Kodları;
[code lang=”html”]
<%@ Page Language="VB" MasterPageFile="~/admin.master" AutoEventWireup="false" CodeFile="index.aspx.vb" Inherits="index" title="Untitled Page" %>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<div>
<table style="width:100%;">
<tr>
<td class="style1">
</td>
<td>
ÜYE OLMAK İSTER MİSİNİZ?</td>
</tr>
<tr>
<td class="style1">
ad</td>
<td>
<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server"
ControlToValidate="TextBox1" ErrorMessage="boş bırakmayınız"></asp:RequiredFieldValidator>
</td>
</tr>
<tr>
<td class="style1">
soyad</td>
<td>
<asp:TextBox ID="TextBox2" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RequiredFieldValidator2" runat="server"
ControlToValidate="TextBox2" ErrorMessage="boş bırakmayınız"></asp:RequiredFieldValidator>
</td>
</tr>
<tr>
<td class="style2">
kullanıcı adı</td>
<td class="style3">
<asp:TextBox ID="TextBox3" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RequiredFieldValidator3" runat="server"
ControlToValidate="TextBox3" ErrorMessage="boş bırakmayınız"></asp:RequiredFieldValidator>
</td>
</tr>
<tr>
<td class="style1">
şifre</td>
<td>
<asp:TextBox ID="TextBox4" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RequiredFieldValidator4" runat="server"
ControlToValidate="TextBox4" ErrorMessage="boş bırakmayınız"></asp:RequiredFieldValidator>
</td>
</tr>
<tr>
<td class="style1">
email</td>
<td>
<asp:TextBox ID="TextBox5" runat="server"></asp:TextBox>
<asp:RequiredFieldValidator ID="RequiredFieldValidator5" runat="server"
ControlToValidate="TextBox5" ErrorMessage="boş bırakmayınız"></asp:RequiredFieldValidator>
<asp:RegularExpressionValidator ID="RegularExpressionValidator1" runat="server"
ErrorMessage="e postayı doğru girin"
ValidationExpression="\w+([-+.’]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*"
ControlToValidate="TextBox5"></asp:RegularExpressionValidator>
</td>
</tr>
<tr>
<td class="style4">
</td>
<td class="style5">
<asp:Button ID="Button1" runat="server" Text="kaydol" />
<asp:Label ID="Label1" runat="server"></asp:Label>
</td>
</tr>
</table>
</div>
</asp:Content>
[/code]
index.aspx.vb Kodları;
[code lang=”vb”]
Imports System.Data
Imports System.Data.OleDb
Partial Class index
Inherits System.Web.UI.Page
Dim baglanti As New OleDbConnection("provider=Microsoft.ace.oledb.12.0;data source=" & Server.MapPath("App_data\dugun.accdb"))
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
baglanti.Open()
Dim cmd As New OleDbCommand
cmd.CommandText = "insert into uyeler (ad,soyad,kadi,sifre,email) values(@ad,@soyad,@kadi,@sifre,@email)"
cmd.Connection = baglanti
cmd.Parameters.Add("@ad", OleDbType.VarChar).Value = TextBox1.Text
cmd.Parameters.Add("@soyad", OleDbType.VarChar).Value = TextBox2.Text
cmd.Parameters.Add("@kadi", OleDbType.VarChar).Value = TextBox3.Text
cmd.Parameters.Add("@sifre", OleDbType.VarChar).Value = TextBox4.Text
cmd.Parameters.Add("@email", OleDbType.VarChar).Value = TextBox5.Text
cmd.ExecuteNonQuery()
baglanti.Close()
Label1.Text = "Kayıt başarıyla gerçekleştirildi"
End Sub
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
End Sub
End Class
[/code]
hakkimizda.aspx Kodları;
[code lang=”html”]
<%@ Page Language="VB" MasterPageFile="~/admin.master" AutoEventWireup="false" CodeFile="hakkimizda.aspx.vb" Inherits="hakkimizda" title="Untitled Page" %>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<p style="font-size: x-large; color: #800000;">
<table style="width:100%;">
<tr>
<td>
<img src="2.jpg" style="height: 186px; width: 245px" /></td>
<td>
<img alt="" src="ankaradugunsalonlari.jpg"
style="width: 269px; height: 191px" /></td>
</tr>
</table>
</p>
<p style="font-size: x-large; color: #800000;">
P.N DÜĞÜN SALONUMUZDA </p>
<p>
700 kişilik havuzbaşı, 300 kişilik balo salonu, 100 kişilik Merhaba
Salonu ve profesyonel yönetim kadrosuyla düğün ve nişan törenleriniz, sünnet
düğünleriniz, doğum günü partileriniz, mezuniyet kutlamalarınız, bayii
toplantılarınız ve tüm özel günlerinizi sizlerle paylaş istiyor. Taç Spor
Tesisleri Anadolu yakasının en modern yerleşim merkezindeki konumuyla, en geniş
havuz başı organizasyonlarına ev sahipliği yapıyor. Avrupa yakasından ulaşımın
da kolay olduğu tesisimiz her bütçeye cevap verebilecek düğün ve nişan paketleri
ile özel günlerinizde çok özel alternatifler sunuyor. Taç Spor Tesisleri sıcak
atmosferinde sizlere dünya mutfağından seçkin alternatifler sunarken keyfini
doyasıya yaşayabileceğiniz huzurlu hafta sonlan teklif ediyor. Yıllardır, her
mevsim özel organizasyonlara imza atan tesisimizi görmeden karar vermeyin Gelin;
en güzel gününüzü, en özel seçeneklerle ve uzman kadromuzla Taç spor
Tesislerinde birlikte ölümsüzleştirelim.</p>
</asp:Content>
[/code]
hakkimizda.aspx.vb Kodları;
[code lang=”vb”]
Partial Class hakkimizda
Inherits System.Web.UI.Page
End Class
[/code]
galeri.aspx Kodları;
[code lang=”html”]
<%@ Page Language="VB" MasterPageFile="~/admin.master" AutoEventWireup="false" CodeFile="galeri.aspx.vb" Inherits="galeri" title="Untitled Page" %>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<table style="width:100%;" align="center">
<tr>
<td>
<asp:Image ID="Image8" runat="server" Height="274px" ImageAlign="AbsBottom"
Width="403px" />
</td>
</tr>
<tr>
<td>
<asp:Button ID="Button2" runat="server" Text="Geri" />
<asp:Button ID="Button1" runat="server" Text="İleri" />
</td>
</tr>
<tr>
<td>
</td>
</tr>
</table>
</asp:Content>
[/code]
galeri.aspx.vb Kodları;
[code lang=”vb”]
Imports System.Data
Imports System.Data.OleDb
Partial Class galeri
Inherits System.Web.UI.Page
Dim baglan As New OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Server.MapPath("app_data/dugun.accdb"))
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Session("sayfano") += 1
sayfayukle()
End Sub
Protected Sub sayfayukle()
baglan.Open()
Dim adp2 As New OleDbDataAdapter("select id from resim", baglan)
Dim dt2 As New DataTable
adp2.Fill(dt2)
For Each satir In dt2.Rows
Session("enson") = satir(0)
Next
Dim adp As New OleDbDataAdapter("select * from resim where id=" & Session("sayfano"), baglan)
Dim dt As New DataTable
adp.Fill(dt)
For Each satir In dt.Rows
Image8.ImageUrl = satir(1)
Next
baglan.Close()
End Sub
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Not IsPostBack = True Then
Session("sayfano") = 1
sayfayukle()
End If
End Sub
Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
Session("sayfano") -= 1
sayfayukle()
End Sub
End Class
[/code]
rezervasyon.aspx Kodları;
[code lang=”html”]
<%@ Page Language="VB" MasterPageFile="~/admin.master" AutoEventWireup="false" CodeFile="rezervasyon.aspx.vb" Inherits="rezervasyon" title="Untitled Page" %>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<table style="width:100%;">
<tr>
<td style="width: 163px">
E-mail</td>
<td style="width: 134px">
<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
</td>
<td style="width: 134px">
<asp:Button ID="Button1" runat="server" Text="Giriş" />
</td>
</tr>
<tr>
<td style="width: 163px">
Ad Soyad</td>
<td style="width: 134px">
<asp:TextBox ID="TextBox2" runat="server" Visible="False"></asp:TextBox>
</td>
<td style="width: 134px">
<asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server"
ControlToValidate="TextBox2" ErrorMessage="RequiredFieldValidator">Ad Soyad
Gerekli</asp:RequiredFieldValidator>
<asp:Label ID="Label1" runat="server"></asp:Label>
</td>
</tr>
<tr>
<td style="width: 163px">
Telefon</td>
<td style="width: 134px">
<asp:TextBox ID="TextBox3" runat="server" Visible="False"></asp:TextBox>
</td>
<td style="width: 134px">
<asp:RequiredFieldValidator ID="RequiredFieldValidator2" runat="server"
ControlToValidate="TextBox3" ErrorMessage="RequiredFieldValidator">Telefon
Gerekli</asp:RequiredFieldValidator>
</td>
</tr>
<tr>
<td style="width: 163px">
Saat</td>
<td style="width: 134px">
<asp:DropDownList ID="DropDownList1" runat="server" AutoPostBack="True"
Visible="False">
<asp:ListItem></asp:ListItem>
<asp:ListItem>13:00</asp:ListItem>
<asp:ListItem>14.00</asp:ListItem>
<asp:ListItem>15.00</asp:ListItem>
<asp:ListItem>19:00</asp:ListItem>
</asp:DropDownList>
</td>
<td style="width: 134px">
</td>
</tr>
<tr>
<td style="width: 163px">
Gün </td>
<td style="width: 134px">
<asp:DropDownList ID="DropDownList2" runat="server" AutoPostBack="True"
Visible="False">
<asp:ListItem></asp:ListItem>
<asp:ListItem>Pazartesi 30 mayıs 2011</asp:ListItem>
<asp:ListItem>Salı 31 mayıs 2011</asp:ListItem>
<asp:ListItem>Çarşamba 1 haziran 2011</asp:ListItem>
<asp:ListItem>Perşambe 2 haziran 2011</asp:ListItem>
<asp:ListItem>Cuma 3 haziran 2011</asp:ListItem>
<asp:ListItem>Cumartesi 4 haziran 2011</asp:ListItem>
<asp:ListItem>Pazar 5 haziran 2011</asp:ListItem>
<asp:ListItem>Pazartesi 6 haziran 2011</asp:ListItem>
<asp:ListItem>Salı 7 haziran 2011</asp:ListItem>
<asp:ListItem>Çarşamba 8 hairan 2011</asp:ListItem>
<asp:ListItem>Perşembe 9 haziran 2011</asp:ListItem>
<asp:ListItem>Cuma 10 haziran 2011</asp:ListItem>
<asp:ListItem>Cumartesi 11 haziran 2011</asp:ListItem>
<asp:ListItem>Pazar 12 haziran 2011</asp:ListItem>
<asp:ListItem>Pazartesi 13 haziran 2011</asp:ListItem>
<asp:ListItem>Salı 14 haziran 2011</asp:ListItem>
<asp:ListItem>Çarşamba 15 haziran 2011</asp:ListItem>
<asp:ListItem>Perşembe 16 haziran 2011</asp:ListItem>
<asp:ListItem>Cuma 17 haziran 2011</asp:ListItem>
<asp:ListItem>Cumartesi 18 haziran 2011</asp:ListItem>
<asp:ListItem>Pazar 19 haziran 2011</asp:ListItem>
</asp:DropDownList>
<td style="width: 134px">
</td>
<td>
</td>
</tr>
<tr>
<td style="width: 163px">
Salon</td>
<td style="width: 134px">
<asp:DropDownList ID="DropDownList3" runat="server" AutoPostBack="True"
Visible="False">
<asp:ListItem></asp:ListItem>
<asp:ListItem>1.Salon</asp:ListItem>
<asp:ListItem>2.Salon</asp:ListItem>
<asp:ListItem>3.Salon</asp:ListItem>
<asp:ListItem>4.Salon</asp:ListItem>
</asp:DropDownList>
</td>
<td style="width: 134px">
<asp:Label ID="Label3" runat="server"></asp:Label>
</td>
</tr>
<tr>
<td style="width: 163px; height: 23px;">
</td>
<td style="width: 134px; height: 23px;">
<asp:Label ID="Label2" runat="server"></asp:Label>
<asp:Button ID="Button2" runat="server" Text="VAZGEÇ" Visible="False"
Width="69px" />
</td>
<td style="height: 23px; width: 134px">
</td>
</tr>
<tr>
<td style="width: 163px">
<asp:HyperLink ID="HyperLink2" runat="server" NavigateUrl="rezkontrol.aspx">Rezervasyon
Kontrol</asp:HyperLink>
</td>
<td style="width: 134px">
</td>
<td style="width: 134px">
</td>
</tr>
</table>
<br />
</asp:Content>
[/code]
rezervasyon.aspx.vb Kodları;
[code lang=”vb”]
Imports System.Data
Imports System.Data.OleDb
Partial Class rezervasyon
Inherits System.Web.UI.Page
Dim baglan As New OleDbConnection("provider=microsoft.ace.oledb.12.0;data source=" & Server.MapPath("app_data/dugun.accdb"))
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
If (TextBox1.Text).Length < 1 Then
Label1.Text = "Lütfen bir mail adresi giriniz"
Else
DropDownList1.Visible = True
DropDownList2.Visible = True
DropDownList3.Visible = True
Button1.Text = "Kayıt"
TextBox1.Visible = False
TextBox2.Visible = True
TextBox3.Visible = True
Button2.Visible = True
End If
Catch
End Try
Dim adp As New OleDbDataAdapter("select * from rezervasyon where salon=’" & DropDownList3.SelectedValue & "’ and saat=’" & DropDownList1.SelectedValue & "’ and gun=’" & DropDownList2.SelectedValue & "’", baglan)
Dim dt As New DataTable
adp.Fill(dt)
Dim i As Integer = 0
For Each satir In dt.Rows
i = i + 1
Next
If i = 0 Then
baglan.Open()
Dim cmd As New OleDbCommand
cmd.Connection = baglan
cmd.CommandText = "insert into rezervasyon (adsoyad,telefon,saat,gun,salon) values (@adsoyad,@telefon,@saat,@gun,@salon)"
cmd.Parameters.Add("@adsoyad", OleDbType.VarChar).Value = TextBox2.Text
cmd.Parameters.Add("@telefon", OleDbType.VarChar).Value = TextBox3.Text
cmd.Parameters.Add("@gun", OleDbType.VarChar).Value = DropDownList1.SelectedValue
cmd.Parameters.Add("@saat", OleDbType.VarChar).Value = DropDownList2.SelectedValue
cmd.Parameters.Add("@salon", OleDbType.VarChar).Value = DropDownList3.SelectedValue
cmd.ExecuteNonQuery()
Label3.Text = "kayıt oldunuz"
baglan.Close()
Else
Label3.Text = "salonumuz doludur "
End If
End Sub
Protected Sub DropDownList3_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DropDownList3.SelectedIndexChanged
If DropDownList3.SelectedIndex = 1 Then
Label2.Text = "Fiyat 1.000 TL’dir"
End If
If DropDownList3.SelectedIndex = 2 Then
Label2.Text = "Fiyat 2.000 TL’dir"
End If
If DropDownList3.SelectedIndex = 3 Then
Label2.Text = "Fiyat 3.000 TL’dir"
End If
If DropDownList3.SelectedIndex = 4 Then
Label2.Text = "Fiyat 4.000 TL’dir"
End If
End Sub
Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
TextBox2.Text = Nothing
TextBox3.Text = Nothing
DropDownList1.SelectedIndex = Nothing
DropDownList2.SelectedIndex = Nothing
DropDownList3.SelectedIndex = Nothing
Label2.Visible = False
End Sub
End Class
[/code]
iletisim.aspx Kodları;
[code lang=”html”]
<%@ Page Language="VB" MasterPageFile="~/admin.master" AutoEventWireup="false" CodeFile="iletisim.aspx.vb" Inherits="iletisim" title="Untitled Page" %>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<p>
</p>
<p>
İstanbul’daki Nikah Daireleri<br />
• Altınpark Nikah Dairesi, Tel: +90232 482 31 01
<br />
• Balçova Nikah Dairesi, Tel: +90232 259 68 68<br />
• Bayraklı Nikah Dairesi, Tel: +90232 341 20 36<br />
• Eski İzmir Nikah Dairesi, Tel: +90232 271 04 04
<br />
• Gaziemir Nikah Dairesi, Tel: +90232 251 69 30
<br />
• Gültepe Nikah Dairesi, Tel: +90232 457 49 90
<br />
• Güzelbahçe Nikah Dairesi, Tel: +90232 234 06 06
<br />
• Karabağlar Nikah Dairesi, Tel: +90232 253 97 54
<br />
• Fuar Nikah Dairesi, Tel: +90232 425 24 60
<br />
• Karşıyaka Nikah Dairesi, Cemal Gürsel Cad. Karsiyaka Izmir, Tel: +90232 369 64
02
<br />
• Bornova Nikah Dairesi, Tel: +90232 388 29 64
<br />
• Çiğli Nikah Dairesi, Anadolu Cad. Çiğli Izmir, Tel: +90232 376 27 04/+90232
376 99 80 • Esrefpasa Nikah Dairesi, Tel: (0232) 261 38 73
<br />
• Buca Nikah Dairesi, Koşu Yolu Şirinyer- Buca Izmir, Tel: +90232 420 18 37/
+90232 4<br />
• Çankaya Beldeiyesi, Tel: +90312 434 09 33
<br />
• Yenimahalle Nikah Dairesi, Tel: +90312315 71 93
<br />
• Vedat Dalokay Nikah Dairesi, Tel: +90312 434 09 33
<br />
• Ulus Nikah Dairesi, Tel: +90312 310 16 34
<br />
• Altındağ Nikah Dairesi, Tel: +90312 310 16 34
<br />
• Bilkent Nikah Dairesi, Tel: +90312 431 16 67
<br />
• Etimesgut Nikah Dairesi, Tel: +90312 244 10 00
<br />
• Gölbaşı Nikah Dairesi, Tel: +90312 484 10 86
<br />
• Keçiören Nikah Dairesi, Tel: +90312 314 43 19
</p>
</asp:Content>
[/code]
iletisim.aspx.vb Kodları ;
[code lang=”vb”]
Partial Class iletisim
Inherits System.Web.UI.Page
End Class
[/code]
kina.aspx Kodları;
[code lang=”html”]
<%@ Page Language="VB" MasterPageFile="~/admin.master" AutoEventWireup="false" CodeFile="kina.aspx.vb" Inherits="kinagecelerimiz" title="Untitled Page" %>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<img src="na+gecesi.jpg" style="height: 121px; width: 142px" /><br />
P.N salonumuzda Kina geceleri,sünnet şölenleri,yemekli düğün
rezervasyonları,oyunlar,eğlenceler bi tür toplantılara acıktır.Haftasonu ve
haftaiçi fiyatları ikiye ayrılır.hafta içleri 1.menü grubu secılırse eger 500 tl
2. menü grubu secılırse eger 600 tl 3.menü secilirse 550 ve 4.menü seçilirse 700
tl ve limitsiz olma şartına cıkmaktadır bu sadece kına düğün rezervasyonlarında
gecerlıdır.Kinası olacak kişinin kina odası ile birlikte makyaj salonu
bulunmaktadır.kina düğün ssalonu 2 ye aittir.Salon ikinın fiyat ücreti yemeksiz
1.000 tl.Menü grubları ile birlıkte ise 1.500 ve 1.600 ü bulmaktadır.Kina düğün
salonunda yemek değilde çerez tarzı paketler dağıtılırsa eger fiyatlarımız yarı
yarıya inmektedir.Çerez paketi alındığında kına tepsisi ve ürünü de ekstra
verilmektedir.<br />
Düğün salonumuzda üç çesit kına tarzı bulunmaktadır.;<br />
-Ayak tarzı
<br />
-Baş tarzı
<br />
-El tarzı
<br />
bulunmaktadır.<br />
</asp:Content>
[/code]
kina.aspx.vb Kodları;
[code lang=”vb”]
Partial Class kinagecelerimiz
Inherits System.Web.UI.Page
End Class
[/code]
sunnet.aspx Kodları;
[code lang=”html”]
<%@ Page Language="VB" MasterPageFile="~/admin.master" AutoEventWireup="false" CodeFile="sunnet.aspx.vb" Inherits="sunnet" title="Untitled Page" %>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<p>
1-) Sandalye Giydirme : …….. 300 Adet Yapılacaktır. Ücret : ……. 2.5 -YTL Adedi
Toplam : …..-750.-YTL
<br />
2-) Masa Üstü Şamdan Çiçekli : …….. 30 Adet Tekli Ahşap Şamdan kullanılacaktır.
Ücret : …….. 30. -YTL Toplam: ……..-900.-YTL
<br />
3-) Yürüyüş Yolu Çiçekli Mumlu Ferforje : ……( 8) Adet Yapılacaktır. Aralara Tül
Şifon Atılacaktır. Ücret : ………(30).- YTL Toplam: ……. (240).-YTL. Kırmızı Halı
…….. 10 mt ücretsiz olarak verilecektir.Giriş için ..
<br />
4-) Kapı Girişi Çiçekli Tak : 1 Adet Yapılacaktır. ( 1 tane ilk girişe ) Ücret:
………..175.-YTL. Toplam:……….175.-YTL
<br />
5-) Barcovizyon Gösterisi : naklen Yayın gösterimi İSTENDİĞİ TAKDİRDE KLİP
GÖSTERİSİ HAZIRLANABİLİR. Ücret : ……….550.-YTL<br />
6-) Sünnet Çoçuğu Tahtı : 1 adet Sünnet Çocuğu Tahtı hazırlanacaktır. Ücret :
………..200.- YTL Ayrıca istendiği takdirde Sünnet çocuğu yatağı hazırlanabilir.
<br />
7-) Müzik Grubu ve Orkestra : …… 5 kişilik Müzik grubu ve orkestra gece boyunca
görev alacaktır. Ücret : …….. 850.- YTL Ses Düzeni : …….. 400.- YTL FASIL GRUBU
: ………550.- YTL …….5 kişilik grup Dj : ………250.- YTL
<br />
😎 Sünnet Çoçuğu Girişi Volkan : ……….8 adet kullanılacaktır. ÜcRET : ………20.-YTL
Adedi Toplam :……… 160.-YTL
<br />
9-) Anı DEFTERİ : 1 Adet anı defteri giriş bölümüne konulacaktır. Ücret :………..
125.-YTL</p>
<p>
<img src="sunett.jpg" style="height: 182px; width: 210px" /></p>
</asp:Content>
[/code]
sunnet.aspx.vb Kodları ;
[code lang=”vb”]
Partial Class sunnet
Inherits System.Web.UI.Page
End Class
[/code]
yemekli.aspx Kodları ;
[code lang=”html”]
<%@ Page Language="VB" MasterPageFile="~/admin.master" AutoEventWireup="false" CodeFile="yemekli.aspx.vb" Inherits="yemekli" title="Untitled Page" %>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<table style="width:100%;">
<tr>
<td>
Peri düğün salonumuzada 3 çeşit yemek menüsü bulunmaktadır.Yemeklerimiz Burcu
düğün salonundan gelmektedir.<br />
<img src="papatya.jpg" style="height: 319px; width: 583px" /><br />
1.menü listesi kişi sayısına göre bakılmıyor.<br />
Fiyatı ise :500 tl'dir.</td>
<td class="style5">
</td>
<td>
</td>
</tr>
<tr>
<td>
<img
src="lale.jpg" style="height: 289px; width: 582px" /><br />
2.menü listesi kişi sayısına göre bakılıyor.Kişi saysı olarak hesaplandığında
tek kişi 7. tl tutmaktadır 900 kişi ise 6.300 tutmaktadır.</td>
<td class="style5">
</td>
<td>
</td>
</tr>
<tr>
<td>
<img src="orkide.jpg"
style="height: 263px; width: 583px" /><br />
3.menü listesi kişi sayısına göre bakılmıyor.<br />
Fiyatı ise :700 tl'dir.</td>
<td class="style5">
<br />
</td>
<td>
</td>
</tr>
</table>
</asp:Content>
[/code]
yemekli.aspx.vb Kodları ;
[code lang=”vb”]
Partial Class yemekli
Inherits System.Web.UI.Page
End Class
[/code]
mail.aspx Kodları;
[code lang=”html”]
<%@ Page Language="VB" MasterPageFile="~/admin.master" AutoEventWireup="false" CodeFile="mail.aspx.vb" Inherits="mail" title="Untitled Page" %>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<table __designer:mapid="1a" style="width:100%;">
<tr>
<td style="width: 122px">
Gidecek Kişi</td>
<td>
<asp:TextBox ID="TextBox5" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td class="style6">
E-Posta Adresi</td>
<td style="height: 18px">
<asp:TextBox ID="TextBox6" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 122px">
Konu</td>
<td>
<asp:TextBox ID="TextBox4" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 122px">
Mesajınız</td>
<td>
<asp:TextBox ID="TextBox3" runat="server" Height="96px" TextMode="MultiLine"
Width="325px"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 122px">
</td>
<td>
<asp:Button ID="Button4" runat="server" Text="Mesajı Gönder" />
<asp:Label ID="Label5" runat="server"></asp:Label>
</td>
</tr>
<tr>
<td style="width: 122px">
</td>
<td>
</td>
</tr>
</table>
</asp:Content>
[/code]
mail.aspx.vb Kodları ;
[code lang=”vb”]
Imports System.Net
Imports System.Net.Mail
Partial Class mail
Inherits System.Web.UI.Page
Protected Sub Button4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button4.Click
Dim gonderici As New SmtpClient
Dim mail As New MailMessage
mail.To.Add(TextBox5.Text)
mail.From = New MailAddress(TextBox6.Text)
mail.Subject = TextBox4.Text
mail.Body = TextBox3.Text
Dim uyari As New NetworkCredential("e_mail@gmail.com", "sifre")
gonderici.Credentials = uyari
gonderici.Port = 587
gonderici.Host = "smtp.gmail.com"
gonderici.EnableSsl = True
Label5.Text = "Mesajınız Gönderildi…"
End Sub
End Class
[/code]
salonlar.aspx Kodları;
[code lang=”html”]
<%@ Page Language="VB" MasterPageFile="~/admin.master" AutoEventWireup="false" CodeFile="salonlar.aspx.vb" Inherits="salonlar" title="Untitled Page" %>
<asp:Content ID="Content1" ContentPlaceHolderID="ContentPlaceHolder1" Runat="Server">
<table style="width:100%;">
<tr>
<td style="width: 187px">
<img src="2.jpg" style="height: 200px; width: 200px" /><br />
4.salonumuzun dekarasyonu ahmet biçiciye aittir.Salonumuzun metre karesi 1000 m2
dir.kişi sayısı kişi sayısı 1 küsür üstünde almaktadır.
almaktadır.İstenildiğinde ek ücret karsılıgında m2 yükselebılmektedir.Fiyat
karsılığı ise 4.000 tl dir</td>
<td style="width: 200px">
<img src="3.jpg" style="height: 200px; width: 200px" /><br />
4.salonumuzun dekarasyonu ahmet biçiciye aittir.Salonumuzun metre karesi 1000 m2
dir.kişi sayısı kişi sayısı 1 küsür üstünde almaktadır.
almaktadır.İstenildiğinde ek ücret karsılıgında m2 yükselebılmektedir.Fiyat
karsılığı ise 4.000 tl dir<br />
</td>
</tr>
<tr>
<td style="width: 187px">
<img src="melisa1.jpg" width="200" height="200" /><br />
2.salonumuzun dekarasyonu Mehmet Aslan'a aittir.Salonumuz 650 m2 dir.kişi sayısı
750 kişi almaktadır.İstenildiğinde ek ücret karsılıgında m2
yükselebılmektedir.Fiyat karsılığı ise 2.000 tl dir</td>
<td style="width: 200px">
<img src="5.jpg" style="height: 200px; width: 200px" /><br />
3.salonumuzun dekarasyonu Uras Aygün'e aittir.Salonumuz 950 m2 dir.kişi sayısı
900 kişi almaktadır.İstenildiğinde ek ücret karsılıgında m2
yükselebılmektedir.Fiyat karsılığı ise 3.000 tl dir<br />
</td>
</tr>
<tr>
<td style="width: 187px">
<img src="kirdugunu.jpg" width="200" height="200" /><br />
1.salonumuzun dekarasyonu Lara As aittir.Salonumuz 500m2 dir.kişi sayısı
500 kişi almaktadır.İstenildiğinde ek ücret karsılıgında m2
yükselebılmektedir.Fiyat karsılığı ise 1.000 tl dir</td>
<td style="width: 200px">
<img src="9 (2).jpg" style="height: 200px; width: 200px" /><br />
1.salonumuzun dekarasyonu Lara As aittir.Salonumuz 500m2 dir.kişi sayısı
500 kişi almaktadır.İstenildiğinde ek ücret karsılıgında m2
yükselebılmektedir.Fiyat karsılığı ise 1.000 tl dir</td>
</tr>
</table>
</asp:Content>
[/code]
salonlar.aspx.vb Kodları;
[code lang=”vb”]
Partial Class salonlar
Inherits System.Web.UI.Page
End Class
[/code]









Paylaşımınız için çok teşekkür ediyorum.
Admin indirdim ama hiç çalıştıramadım nasıl çalışacak bişeyler söyleseniz…
mahmut :
Öncelikle indirdiğiniz dosyayı rar dan çıkartıyorsunuz. Visual Studio açıyorsunuz.File-Open-Web Site . Ekrana gelen menüden projenin olduğu klasörü (yani rar ı çıkardığınız klasörü ) seçip Open tıklıyorsunuz.Sağdaki Solution explorer dan aspx ve vb sayfalarına ulaşabilirsiniz.