Yeni Kayıt
Konudaki Resimler
< Bu mesaj bu kişi tarafından değiştirildi tlp41 -- 6 Ağustos 2008; 2:34:33 > |
Hızlı 
Bildirim
<% 'Asp de Neler Yapabiliriz ?? %>
Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Daha Fazla 
Bu Konudaki Kullanıcılar:
Daha Az 
2 Misafir - 2 Masaüstü
Giriş
Mesaj
-
-
<% 'SQL Kullanımı %>
Sql Kodlamaları Tabiki Veri Tabanı İşlemlerinde Kullanıyoruz...
Kullanımına Dair Bir Kaç Örnek
SELECET ....
<%
Set db= Server.CreateObject("ADODB.Connection")
db.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("personel.mdb"))
%>
personel.mdb adında veritabanımızın oldugunu varsayarak işlemlerimizi yapalım
Veri Tabanından Her Hangi Bir Koşul Olmaksızın Tüm Alanları Seçelim..
<%set hepsinisec=db.execute ("SELECT * FROM PERSONEL") %>
Veri Tabanından Tüm Alanları Seçelim ve Personelin Maaşına Göre Azalan Sıralatalım
<%set azalaraksec=db.execute (" SELECT * FROM PERSONEL ORDER BY MAAS DESC ")%>
Veri Tabanından Tüm Alanları Seçelim ve Personelin Yaşına Göre Artarak Sıralatalım
<%set azalaraksec=db.execute (" SELECT * FROM PERSONEL ORDER BY YAS ASC ")%>
Veri Tabanından Tüm Alanları Seçelim ve Personelin Yaşı "30" Olanları ID Numarasına Göre Azalan Sıralatalım
<%set ahmetolanlarisec=db.execute (" SELECT * FROM PERSONEL WHERE='30' ORDER BY ID DESC")%>
Veri Tabanından Tüm Alanları Seçelim ve Maaşları 500 ile 600 YTL Olanları ID Numarasına Göre Artarak Sıralatalım
İlk Önce Maaşları Bir Değişkene Atayalım
maas1="500"
maas2="600"
<%set maas=db.execute(" SELECT * FROM PERSONEL WHERE MAAS BETWEEN # " & MAAS1 & " # AND # " & MAAS2 & " # ORDER BY ID ASC ")%>
Veri Tabanından Personel Adını Seçelim ve Son Eklenen 10 Kayıdı Sıralatalım
<%set pers=db.execute(" SELECT TOP 10 PERSAD FROM PERSONEL ORDER BY ID DESC")%>
Yetkili Tarafından Seçilen Personelin Tüm Bilgisini Gösterelim Birde..
<%set pers=db.execute(" SELECT * FROM PERSONEL WHERE ID="&REQUEST.QUERYSTRING("PERSID"))%>
ve Linki personelgor.asp?PERSID=5 (Personele Ait ID Değeri)
Hep Seçtirdik ; Birazda Farklı İşemler Yaptıralım Dimi :)
DELETE ....
Veri Tabanından Tüm Alanları Silelim
<%set sil=db.execute(" DELETE * FROM PERSONEL ")%>
Yukarıda Seçtirerek Yaptığımız Tüm Koşulları Silmek İçinde Yaptırabilirsiniz
INSERT INTO....
Veri Tabanına Yeni Personel Ekleyelim
<%set yeniekle=db.execute(" INSERT INTO PERSONEL(PERSAD,MAAS) VALUES('"&REQUEST.FORM("PERSAD")&"','"&REQUEST.FORM("MAAS")&"') ")%>
UPDATE....
Veri Tabanındaki Personellerin Maaşı 500 Ytl Olanlara Biraz Zam Yapalım :)
<%set zamyap=db.execute(" UPDATE PERSONEL SET MAAS='"&REQUEST.FORM("ZAMLIMAAS")&"' WHERE MAAS='500'")%>
Farklı Şartlar ve Koşullarla DELETE,INSERT INTO ve UPDATE Komutlarınıda Kullanabilirsiniz...
-
<% 'Array %>
Nedir ? =Birçok veriyi Bir Değişkene Tanımlamada Kullanılır...
Kullanımı = <%degisken=Array("veri1","veri2")%>
Örnek =
Arraya Biraz Değişik Bir Örnek Verelim,
Yapacagımız Örneğin Daha Kolayıda Var Ama Bazı Kodlamaları Kavrayabilmemiz İçin Ben Uzun Yoldan Yapıcam
1-- <%tarih=mid(date(),4,5)%>
2-- <%aylar= array ("bos","ocak","şubat","mart","nisan","mayıs","haziran","temmuz","agustos","eylul","ekim","kasım","aralık")%>
3-- <%ay=tarih%>
4-- <%response.write "Aylardan " & aylar(ay)%>
Açıklama...
1-- tarih değişkenine gunun tarihini atadık ve mid kullanarak tarihin 4. ve 5. karakterlerını aldık...4. ve 5. karakter GG.AA.YYYY olarak yazıldıgı ıcın Ayın oldugu degerler olmakta
2-- aylar degıskenıne 12 ayı yazdırdık...en bastada bos degerını yazdık , cunku array saymaya 0 dan baslıyo halıyle 0 degerınde herhangı bır ay olmadıgından oraya bos verısını kayıt ettırdık
3-- ay degiskenine daha once mid ile ay degerıne esıt gelen tarih degiskenini atadık
4-- ve ayları yazdırdık
cıktı olarak ornek vermek gerekırse
06.08.2008 tarihinde oldugunu varsayalım mid ile 08 kısmını sectık aldık ve tarih değişkenine atadık
sonra sectıgımız rakamı arrayda belırttıgımız ay verılerıne esıt olanını bulduk ve 8 ıncı ay olan AGUSTOS u yazdırdık =)
bu yontemle tamamıyle turkce tarıh yazdırabılırız
onemli olan calısma mantıgını cozmek
ama tabı bunun cok daha kısa yolları var
< Bu mesaj bu kişi tarafından değiştirildi tlp41 -- 6 Ağustos 2008; 2:56:55 >
-
<% 'bir Kaç Kodlama ve Donguyle Karıştırılmış Örnek : Verileri Yanyana Sıralama %>
<%
Set db= Server.CreateObject("ADODB.Connection")
db.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("resimler.mdb"))
%>
resimler.mdb adında bır verıtabanımız olsun ve resımlerımızı galerı seklınde gosterelım
ve buna bırazda html kodları katalım
<%set resimler=db.execute("select * from manzararesimleri order by resimid desc")%>
<table width="100%" border="0">
<%if resimler.eof then%>
<tr><td>
Resim Bulunmamakta !
</td></tr>
<%else%>
<tr><td>
<table width="100%" border="0">
<tr><td>
<%i=1%>
<%do while not resimler.eof%>
<%=resimler("resim")%>
</td>
<%if i mod 4=0 then%> '4 yerıne ne kadar sıralama yaptırmak ıstıyorsanız onu yazabılırsınız
<tr></tr>
<%end if%>
<%i=i+1%>
</tr>
<%resimler.movenext : loop%>
</table>
</td></tr>
<%end if%>
</table>
Açıklamasını yapayım :
en basta db mıze baglantı kodunu olusturduk (daha oncede bahsetmıstım)
sonra db mızden manzararesimleri adlı tablodan tum resımlerı secıp azalan degere gore sıralattık
sonrasında if - then ile tablo eger bossa dıyerekten mesaj yazdırdık
else ile degılse dıyerekten i degskenıne 1 degerını atadık ve dongumuzu baslatıp tum kayıtları sıralatmaya basladık
kayıtları yazıdırdık
sonra yine if ile i degerının ortalamasını alıp kosullandırdık , eger i 4 e bolundugu zaman sonucu 0 ıse yeni bir satır eklemesını ıstedık ve if dongusunu kapattık
akabınde i degerını 1 artırdık , nedenı toplam kayıt kadar deger alsın...
sonrasında resimler.movenext diyerek sonrakı kayıda gıtmesını sagladık ve loop ile donguyu devam ettırdık
ve en basta actıgımız verı varmı yokmu kosulunu kapattık ...
html table kodlamalarını kaldırıp kosuldakı <tr></tr> yerıne <br> yazarsanızda aynı sey olur ama
boylesı gorsel acıdan daha hos olur
ufak bır ornekle tablolu yanyana 4 erlı sıralama yaptık
Saat Epey Geç Oldu (03.24) ... sımdılık bu kadar
< Bu mesaj bu kişi tarafından değiştirildi tlp41 -- 6 Ağustos 2008; 13:00:21 >
-
<% 'with - end with%>
Nedir = Birden Fazla Methodu Yazılımını Kısaltmaya Yarar
Örnek =
Veritabanımızdaki Alanları Yazdıracagımızı Dusunursek
<%with response%>
<%.write db("alan1")%>
<%.write db("alan2")%>
<%.write db("alan3")%>
<%end with%>
response komudumuzu with ile bağlayıp herdafasından yazmadan db deki alanları yazdırdık
bu işlemi bir çok yerdede kullanabiliriz -
yeni başlayanlar bu kodları copy yapıp bi txt dosyasına paste yapsın ve görebilecekleri bir yere kaydetsin.elbet birgün işlerine yarayacak.
güzel kaynak olmuş. -
gerçekten güzel bir kaynak....keşke devamı gelseydi 
-
devamı gelicektir
internete kısa bir ara verdim de :):)
Sayfa:
1
Ip işlemleri
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
