Aksaray Yöresel Kültürel Kamusal Kurumsal Paylaşım sitesi Aksarayın en iyi Sitesi
Üyelik Giriş Yap | Üye Ol | Şifrem Neydi | Canlı Destek Facebook
Konu Açan fatih kurtbey kocapinar
9.04.2011 02:48:09
Normal Üye
fatih kurtbey kocapinar
 
Mutlumusun :
Nebim
Neden :
Bilmiom
SonKararinmi :
Ellam oyle

Evet arkadaşlar bu dersimizin sonunda otomatik tablo oluşturabileceğiz!

İlk önce merhabalar gerekli dosyalarımızı belirteyim.Dersimize başlayalım.
Bir "veri.mdb" adlı bir acces veritabani oluşturalım.İçine "tablom" adlı bir tablo
fieldlerimiz ise "id" Bunun değerini otomatik sayı yapalım.Daha Sonra sırasıyla
"width","height","cellspacing","cellpadding","align", alanları oluşturup değerlerini not olarak kaydetin.Birde "border" adlı bir field oluşturun onun değeride sayı yapın ve kaydedin.Şİmdi gerekli işlemler halledildikten sonra asp kodlamamıza geçelim.

ilk önce tablomuzu oluşturacağımız sayfamızı yapalım!

Default.asp


<html>
<head>
<meta content="Language" language="tr">
<title>Asp İle Tablo v1.0</title>
</head>
<body>
<table border="1" cellspacing="0" cellpadding="0" align="center" width="400" >
<form action="islem.asp" method="post">
<tr>
<td><b>Tablonun Genişliği:</b></td>
<td><input type="text" name="width"></td>
</tr>
<tr>
<td><b>Tablonun Yüksekliği:</b></td>
<td><input type="text" name="height"></td>
</tr>

<tr>
<td><b>Tablonun Dış Hücresine Uzaklığı:</b></td>
<td><input type="text" name="cellpadding"></td>
</tr>
<tr>
<td><b>Tablonun Hücreler Arası Uzaklığı:</b></td>
<td><input type="text" name="cellspacing"></td>
</tr>
<tr>
<td><b>Tablonun Hizası:</b></td>
<td><select name="align">
<option selected value="bos">----->Seçiniz</option>
<option value="center">Orta</option>
<option value="right">Sağ</option>
<option value="left">Sol</option>
</select></td>
</tr>
<tr>
<td><b>Tablonun Kalınlığı:</b></td>
<td><input type="text" name="border"></td>
</tr>
<tr>
<td>&nbsp;</td>
<td><input type="submit"  value="Oluştur!">&nbsp;<input type="reset" value="Temizle!"></td>
</tr>
</form>
</table>
</body>
</html>



Gelelim Bu Bilgilerin İşleneceği Ve tablomuzu Oluşturacağımız Sayfaya

islem.asp

<style type="text/css">
<!--
.tablo {
font-family:"Segoe UI";
font-size:13px;
font-color:#F4F4F4;
}

.tablo a:link{
font-family:"Segoe UI";
font-size:13px;
font-color:#F4F4F4;
text-decoration:none;
}
.tablo a:hover{
background-color:#F4F4F4;
font-color:#000000;
text-decoration:none;
}
-->
</style>
<%

width=Request.form("width")
height=Request.form("height")
cellpadding=Request.form("cellpadding")
cellspacing=Request.form("cellspacing")
align=Request.form("align")
border=Request.form("border")

Set conn=Server.Createobject("Adodb.Connection")
conn.Open "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & Server.MapPath("veri.mdb")

If width="" or height=""  or cellspacing=""  or cellpadding="" or align="bos" or border="" Then
Response.Write("<center><b>Lütfen Boş Alan Bırakma!")</b></center><br/>")
Response.Write("<center><b>Yönlendiriliyorsun</b></center>")%>
<meta http-equiv="refresh"  content="3;URL=default.asp">
<%
Response.End()
End If

Set tablo=Server.Createobject("Adodb.Recordset")
sql="select * from tablom"
tablo.Open conn,sql,1,3

tablo.AddNew
tablo("width")=width
tablo("height")=height
tablo("cellpadding")=cellpadding
tablo("cellspacing")=cellspacing
tablo("align")=align
tablo("border")=border
tablo.update

tablo.Close
Set tablo=Nothing
%>
<% Set tablom=baglanti.Execute("select id from tablom")%>
<table border="1" cellspacing="0" cellpadding="0" align="center" width="300">
<tr>
<td valign="top" width="300"><table border="1"  width="300" cellpadding="0" align="center">
<tr>
<td align="center" bgcolor="#990000" class="tablo"><<<---TABLONUZ OLUŞTURULDU--->>></td>
</tr>
</table>
<table border="0" width="300" cellpadding="0" cellspacing="0" align="center">
<tr>
<td align="center" class="tablo">Oluşturduğunuz Tablo Gitmek İçin <a href="tablogor.asp?tablo=<%=tablom("id")%>">Buraya Tıklayınız!</a></td>
<td align="center" class="tablo">Yeni Tablo Oluşturmak İçin<a href="default.asp">Buraya Tıklayınız!</a></td>
</tr>
</table>
</td>
</tr>
</table>
<%tablom.Close
Set tablom=Nothing

baglanti.Close
Set baglanti=Nothing%>



Tablomuzun verilerini işledik ama bir tek şey kaldı bu tabloyu göstereceğimiz sayfaya geçelim
tablogor.asp

<html>
<head>
<meta content="Language" language="tr">
<title>Tablom</title>
</head>
<body>
<%
Set conn=Server.Createobject("Adodb.Connection")
conn.Open "Provider=Microsoft.Jet.Oledb.4.0;Data Source=" & Server.MapPath("veri.mdb")

 tablo=Request.QueryString("tablo")
Set bag=baglanti.Execute("select * from tablom  id where="&tablo&"
%>
<div align="center"><h2>Tablonuz!</h2></div>
<table width="<%=bag("width")%>" height="<%=bag("height")%>" cellspacing="<%=bag("cellspacing")%>" cellpadding="<%=bag("cellpadding")%> align="<%=bag("align")%>" border="<%=bag("border")%>">
<tr>
<td><a href="default.asp">Yeni Tablo Oluştur!</a></td>
</tr>
</table>
<%bag.Close
Set bag=Nothing%>
</body>
</html>



Evet arkadaşlar Böylece Tablomuzu Oluşturmuş Bulunuyoruz!
Herkese İyi Çalışmalar...
 


İmza

aksaray

Cevap Yaz
Copyright
Bugün : 0 - 0 - 0 | Dün : 0 - 0 - 0 | Toplam : 182 - 1129 - 1311 | Üyeler : 0 - 2355 | Online : 0 - 1
Onlineler :
Neler Yaptık | Hakkımızda | İletişim | SiteMaps | Rss
2oo6-2o14 © Copyright Aksaray 68
Yazılım Tasarım
Aksaray 68

AKSARAY.TC - Bizimsite - Aksaray Bilisim - Ihlara - Aksaray Haberler- AxarayFm - siteni ekle
YASAL UYARI
Sitemiz, hukuka, yasalara, telif haklarına ve kişilik haklarına saygılı olmayı amaç edinmiştir. Sitemiz, 5651 sayılı yasada tanımlanan .yer sağlayıcı. olarak hizmet vermektedir. İlgili yasaya göre, site yönetiminin hukuka aykırı içerikleri kontrol etme yükümlülüğü yoktur. Bu sebeple, sitemiz .uyar ve kaldır. prensibini benimsemiştir. Telif hakkına konu olan eserlerin yasal olmayan bir biçimde paylaşıldığını ve yasal haklarının çiğnendiğini düşünen hak sahipleri veya meslek birlikleri, info@Aksaray.tc mail adresinden bize ulaşabilirler. Buraya ulaşan talep ve şikayetler Hukuk Müşavirimiz tarafından incelenecek, şikayet yerinde görüldüğü takdirde ihlal olduğu düşünülen içerikler sitemizden kaldırılacaktır.

Ping your blog, website, or RSS feed for Free
 

Hızlı Sohbet