aspforever
Asp Bileşenleri Asp Sözlük Asp Önemli Bilgiler Asp kodlamalar Asp Scriptler Asp Yardım Asp Sözlük Asp Bileşenleri
 Asp Forever Diyenlerin Sitesine Hoş Geldiniz  
Sitemap   İletişim    Reklam    Forum
 Kategoriler  
  Asp Kodlama
  Asp Sözlük
  Asp Bileşenleri
  Önemli Bilgiler

 Hazır Scriptler  
Alisveris
Anket
Arama Motoru
Blog
Diger
Dosya Yöneticileri
E-Kart
E-posta Formlari
E-posta Formlari
Forum
Haber Kontrol
Ilan
Link Panosu
Mesaj tahtasi
Oyun Eglence
Sayaç
Site yönetim
Sohbet
Toplist
Upload
Üyelik Sistemleri

 Asp veritabanına veri ekleme Bu Yazıyı bir Arkadaşına Gönder Basılabilir Hali 
5/1/2009 10:27:01 PM
Ekleyen: Kubilay Erkeç
268 defa okunduOkunma: 140


veritabanına kayıt eklemek için önce hangi tabloya ekleyeceğimizi yazıyoruz.
    <%set ks = server.createobject("adodb.recordset")
    sql = "select * from tablo1"
    ks.open sql, baglanti, 1, 3%>

eklemenin hangi sütuna ne olacağını yazıyoruz
    <%
    ks.addnew
    ks("metin") = metin
    ks.update
    %>

Ekleme mesajı yazıp recordset leri kapatıyoruz.
    <%response.write "başarıyla eklendi"
    response.write "<br>"
    
    ks.close
    set ks=nothi devamını okumak için tıklayınız...


Yorum Gönder

 Asp For Döngüsü Nedir Bu Yazıyı bir Arkadaşına Gönder Basılabilir Hali 
5/1/2009 10:23:53 PM
Ekleyen: Kubilay Erkeç
268 defa okunduOkunma: 135


<%for i = 1 to 20
response.write i
next%>


ile yapılan bir döngüdür. 1 den 20 ye kadar sayıların sıralanmasına yardımcı olur.

veritabanındaki veriler sıralanırkende next den önce rs.movenext eklenir.

örnek:
<%for i = 1 to 20
response.write i
rs.movenext
next%>


not: rs.movenext tanımlamaya göre ks.movenext ic.movenext gibi değişebilir.
devamını okumak için tıklayınız...


Yorum Gönder

 Asp Türkçe Karakter Bu Yazıyı bir Arkadaşına Gönder Basılabilir Hali 
3/4/2009 11:20:56 PM
Ekleyen: Kubilay Erkeç
268 defa okunduOkunma: 161


Sayfanızın başına aşağıdaki kodu eklemeniz yeterli

<% @ Language = VBScript CodePage=1254
Session.CodePage = 1254
Session.LCID = 1055
Response.Charset="ISO-8859-9"
Response.Charset="Windows-1254"
response.ContentType="text/HTML"
%>

devamını okumak için tıklayınız...


Yorum Gönder

 Üyelik Formlarinda güvenlik replace leri Bu Yazıyı bir Arkadaşına Gönder Basılabilir Hali 
2/17/2009 2:35:38 PM
Ekleyen: Kubilay Erkeç
268 defa okunduOkunma: 156


Kendi kullandigim güvenlik çeviricisidir. Eklenmesi gerekenleri sizde söylerseniz kusursuz bir güvenlik replace çalismasi olur.

Tesekkürler

<%
Function sansur(ByVal strEntry)
    strEntry = Replace (strEntry ,"`","",1,-1,1)
    strEntry = Replace (strEntry ,"}","",1,-1,1)
    strEntry = Replace (strEntry ,"{","",1,-1,1)
    strEntry = Replace (strEntry ,"+","",1,-1,1)
    strEntry = Replace (strEntry ,"%","",1,-1,1)
    strEntry = Replace (strEntry ,"!","",1,-1,1)
    strEntry = Replace (strEntry ,"#","",1,-1,1 devamını okumak için tıklayınız...


Yorum Gönder

 Fso ile klasördeki resimleri listelemek Bu Yazıyı bir Arkadaşına Gönder Basılabilir Hali 
11/27/2008 9:31:29 AM
Ekleyen: Kubilay Erkeç
268 defa okunduOkunma: 254


Klasördeki resimleri listelemeyi saglayan kodudur.

<%
'www.aspforever.com
strListelenecekKlasor = "aspforever"
Set ObjFSO=Server.CreateObject("Scripting.FileSystemObject")
Set strDosyalar=ObjFSO.GetFolder(Server.MapPath(strListelenecekKlasor))
RSayisi = strDosyalar.Files.Count - 1
response.write ""&RSayisi&"<hr>"
if RSayisi > "0" then
For each strBulunanDosya in strDosyalar.files
 if right(strBulunanDosya.Name,"3") = "gif" OR right(strBulunanDosya.Name,"3") = "GIF" OR right(strBulunanDosya.Name,"3") = "JPG" OR right(strBulunanDosya.Name,"3") = "jpg devamını okumak için tıklayınız...


Yorum Gönder

 ip adresi Gösterme Bu Yazıyı bir Arkadaşına Gönder Basılabilir Hali 
11/24/2008 7:55:45 PM
Ekleyen: Kubilay Erkeç
268 defa okunduOkunma: 190


sayfanizda ziyaretçinin ip adresini göstermeyi isteyenlere.


<%
Dim  temp, ip
temp = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If  temp<>""  Then  
ip = temp
Else
ip = Request.ServerVariables("REMOTE_ADDR")
End  If
Response.Write ip
%>

devamını okumak için tıklayınız...


Yorum Gönder

 Do while mantigi Bu Yazıyı bir Arkadaşına Gönder Basılabilir Hali 
11/15/2008 1:39:03 PM
Ekleyen: Kubilay Erkeç
268 defa okunduOkunma: 191


Do while ile döngü olusturabilirsiniz. Bu döngüler de do while den sonra sarti eklersiniz o sarta göre sirama yapar, gayet basit ve nettir.

Asagida örnegini ekledigim kodu direk olarak deneyebilirsiniz.

<%
sayi=1 'önce sayi degerini belirledik

Do While sayi<10 ' 10 dan küçükse saydir dedik

Response.Write sayi & "<br>"
sayi=sayi+1

Loop ' basa dönmesi için gerekli olan ek
%>

devamını okumak için tıklayınız...


Yorum Gönder

 Önceki Sonraki içerik linki (farkli id'lerle) Bu Yazıyı bir Arkadaşına Gönder Basılabilir Hali 
10/20/2008 5:01:57 AM
Ekleyen: Kubilay Erkeç
268 defa okunduOkunma: 280


Hemen hemen herkesin kullanacagina inandigim bi kodu sizlerle paylasmak istiyorum.

Bu soru msn de bana çok soruluyordu :)

Eger resim siteniz varsa resimler arasinda "sonraki resim" "önceki resim" olarak geçmek istersiniz, bunu çok basit bi kodla yapacagiz.

Sonraki içerik:

<%
Set rs1 = bag.Execute("Select * From tablo where id > " & goruntulenenresimid & "")
' goruntulenenresimid diye belirttigimiz id numarasi o an görüntülenen resimin numarasidir
if rs1.eof then
' eger sonraki resim yoksa buraya yazdirmak istedigimizi giriyoruz
else
' sonraki resimle ilgili bilg devamını okumak için tıklayınız...


Yorum Gönder

 XmlHTTP Türkçe Karakter Problemi Bu Yazıyı bir Arkadaşına Gönder Basılabilir Hali 
10/16/2008 7:34:04 AM
Ekleyen: Kubilay Erkeç
268 defa okunduOkunma: 315


XmlHTTP ile veri çektiginiz zaman türkçe karakter ler düzgün çikmamaktadir.Bunun nedeni veriyi alirken "text" yöntemi ile aliniyor olmasi.Bunun yerine "Body" biçiminde alicaz.Fakat bu veriyi ekrana yazdirirken sadece ? çiktigini görürsünüz.Bunun nedeni aldiginiz verinin Binary olmasidir.Bu binary'yi bir fonksiyon ile Text e çevirebilirsiniz.Bu sekilde kullanilirsa XmlHTTP de Türkçe karakter problemi ortadan kalkmaktadir.Çok fazla uzatmadan örnekle açiklayalim.

Normalde XmlHTTP ile veri alinirken :

<%
strURL = "http://www.aspforever.com/"
Dim objXmlHttp
Set objXmlHttp = Server.CreateObject("MSXML2.ServerXMLHTTP")
objXmlHttp.Open "GET" , strU devamını okumak için tıklayınız...


Yorum Gönder

 Asp RSS Sayfasi Yapimi Bu Yazıyı bir Arkadaşına Gönder Basılabilir Hali 
7/12/2008 8:22:48 PM
Ekleyen: Okan YILMAZ
268 defa okunduOkunma: 305


Çogu sitelerde RSS sayfalari görmekteyiz. RSS, XML ismiyle de bilinmektedir. RSS genellikle haber ve download siteleri gibi sürekli güncellenen sitelerde kullanilmaktadir. RSS ile sitemizde ki içerigin, ziyaretçilerimiz tarafindan yardimci bir program kullanilarak sitemize girmesine gerek kalmadan okuyabilmelerini saglayabiliriz. RSS sayfalarini okutmak için SharpReader adli programi kullanabilirsiniz. Bununla birlikte, baska bir sitede yer alan RSS sayfasindan ASP ile veri alip sitemiz içerisinde yayinlayabiliriz.

Kendi sitemde kullandigim RSS sayfasinin kodlarini sizlerle paylasmak istiyorum.

<%
Set devamını okumak için tıklayınız...


Yorum Gönder


 Copyright © 2008 AspForever.Com
 Yasal Uyarı, Kullanım Şartları & Gizlilik İlkesi
Kodlama: Kubilay Erkeç Tasarım: Scriptevi 
Barındırma: Kebilisim.com