Arşiv
ASP ile Dosya Oluşturma ve Düzenleme Tarihini Alma
Merhaba arkadaşlar,
Asp’de (klasik) oluşturulmuş (yeni oluşturduğunuz) bir dosyanın ne zaman oluşturulduğunu veya son düzenlemenin ne zaman yapıldığını bilgisine ulaşma ile kısa bir bilgi vereceğim. Öncelikle çok basit olduğunu ve yapmanız gereken sadece altı satır kod yazmak. Tabi bunu kısaltabilirsiniz. Örn : Dosya adını farklı bir yerde set etmiş iseniz benim birazdan göstereceğim örnek üzerinden bir satır daha düşebilirsiniz.
Öncelikle dosyanın oluşturulma tarihine nasıl ulaşırız ona bakalım. Şunu da söyleyeyim, bundan hemen sonra yapacağım düzenleme örneğinde sadece bir yer değişecek.
' Dosya ismimizi burada set ediyoruz.
strFileName = Server.MapPath("abc.txt")
' FileSystemObject nesnesi oluşturuyoruz.
Set objFileSystemObject = Server.CreateObject("Scripting.FileSystemObject")
' FileSystemObject nesnesinin fonksiyonu olan GetFile methodunu kullanıyoruz.
Set objFile = objFileSystemObject.GetFile(strFileName)
' Burada ise dosyanın oluşturulma tarihini alabileceğim DateCreated methodunu kullanıyoruz.
dtmLastModified = objFile.DateCreated
Set objFile = Nothing
Set objFileSystemObject = Nothing
Dosyanın oluşturulma tarihini almak bu kadar basit. Şimdi ise son düzenlenme tarihinin nasıl alınacağına bakalım.
' Dosya ismimizi burada set ediyoruz.
strFileName = Server.MapPath("abc.txt")
' FileSystemObject nesnesi oluşturuyoruz.
Set objFileSystemObject = Server.CreateObject("Scripting.FileSystemObject")
' FileSystemObject nesnesinin fonksiyonu olan GetFile methodunu kullanıyoruz.
Set objFile = objFileSystemObject.GetFile(strFileName)
' Burada ise dosyanın son düzenlenme tarihini alabileceğim DateLastModified methodunu kullanıyoruz.
dtmLastModified = objFile.DateLastModified
Set objFile = Nothing
Set objFileSystemObject = Nothing
Şimdi de dosya ile ilgili hangi bilgilere ulaşabileceğinize dair özellikleri yazıyorum. Bunlar ile ilgili detaylı örnek yapmama gerek yok diye düşünüyorum. Yukarı da zaten kullanımının nasıl olacağına dair örnekler bulunmakta. Yine de takıldığını bir yer olduğunda yardımcı olmaya çalışırım.
Attributes: Belirlenen dosyanın ayarlanmasına ve dönüştürülmesine katkı sağlar.
DateLastAccessed: Belirtilen dosyaya son giriş tarihini verir.
Drive: Belirtilen klasör için sürücü imzalama.
Name: Belirtilen dosya için isim verme ve ayarlama.
ParentFolder: Anadosya için ayarlama.
Path: Dosyanın fiziksel yol adresi.
ShortName: Dosya isminin DOS türünde ismi.
ShortPath: DOS versiyonunda dosya kısa yolu belirleme.
Size: Byte türünde dosyanın boyutu.
Type: Dosyanın türünün belirlenmesi. (.mdb, .doc gibi)
Umarım sıkmamışımdır, ve yararlı bir yazı olmuştur sizin için. 🙂
ASP’de Split Kullanımı
Merhaba arkadaşlar,
Bugün asp’de (klasik asp) split kullanımı üzerinde duracağım. Öncelikle split kelime anlamı olarak parçalamak, ayırmak anlamına gelmektedir. Burada üzerinde duracağım konu ise herhangi bir karakter ile ayrılmış string verimizi parçalara ayırmak olacak.
Şimdi split kullanımını bir örnek ile açılayalım.
veri = "masanın,üzerindeki,siyah,böcek"
Böyle bir string verimizin olduğunu düşenelim. İlk önce bu string içindeki siyah kelimesini almak isteyelim.
Burada yapmamız gereken şu.
veri = "masanın,üzerindeki,siyah,böcek"
veriParcala = Split(veri,",")
Response.Write veriParcala(2)
Bunu kodun çıktısı ekrana yukarıda da belirttiğimiz gibi siyah olacaktır. Peki buradaki kelimeleri parçalara ayırdıktan sonra hepsini alt alta yazdırmak için ne yapmamız gerek. Onun içinde aşağıdaki yöntemi izleyebilirsiniz.
veri = "masanın,üzerindeki,siyah,böcek"
veriParcala = Split(veri,",")
adet = Ubound(veriParcala)
For i = 0 To adet
Response.Write veriParcala(i)
Next
Yukarıdaki kod parçacığı ise bütün kelimeleri alt alta yazdırmanızı sağlayacaktır.
Çıktı :
masanın
üzerindeki
siyah
böcek
Burada farklı bir fonksiyon gördünüz (Ubound). Onu da kısaca açıklayayım. UBound belirtmiş olduğumuz dizi içerisindeki eleman sayısını verir. Yani bu örnekte bize üç değerini döndürecektir sıfırdan başladığı için.
Umarım bir yerlerde işinize yarar. 🙂
ASP String Fonksiyonları
Merhaba arkadaşlar,
Bugün asp de string fonksiyonları üzerinde duracağız. En çok kullanılan bir kaç fonksiyon üzerinde duracağım.
1 – LEN(strVeri) : Bu fonksiyon yazdığınız bir string verinin uzunluğunu sayısal olarak size verir.
Kullanımı :
value = "Selam"
Response.Write Len(value)
Ekran Çıktısı : value değişkeninin uzunluğu olan “5” olacaktır.
2 – LEFT(strVeri, değer) : Bu fonksiyon metinimizin solundan istediğimiz kadar karakter almamızı sağlar.
Kullanımı :
value = "Selam"
Response.Write Left(value, 2)
Ekran Çıktısı : value değişkeninin değeri “Se” olacaktır.
3 – RIGHT(strVeri, değer) : Bu fonksiyon metinimizin sağından istediğimiz kadar karakter almamızı sağlar.
Kullanımı :
value = "Selam"
Response.Write Right(value, 3)
Ekran Çıktısı : value değişkeninin değeri “lam” olacaktır.
4 – UCASE(strVeri) : Bu fonksiyon metinimizi büyük harfe çevirmek için kullanılır.
Kullanımı :
value = "Selam"
Response.Write Ucase(value)
Ekran Çıktısı : value değişkeninin değeri “SELAM” olacaktır.
5 – LCASE(strVeri) : Bu fonksiyon metinimizi küçük harfe çevirmek için kullanılır.
Kullanımı :
value = "SelAM"
Response.Write Lcase(value)
Ekran Çıktısı : value değişkeninin değeri “selam” olacaktır.
6 – TRIM(strVeri) : Bu fonksiyon metinimizin sağındaki ve solundaki boşlukları temizler. Ayrıca LTrim ve RTrim fonksiyonları da bulunmaktadır. Onları da ayrıca anlatmak yerine burada açıklayacağım. LTrim : Metnimizin solundaki boşlukları temizler. RTrim ise metnimizin sağındaki boşlukları temizler.
Kullanımı :
value = " Selam "
Response.Write Trim(value)
Ekran Çıktısı : value değişkeninin değeri “Selam” olacaktır.
7 – INSTR(strVeri, value) : Bu fonksiyon metnimizin içerisinde yer alan bir karakterin nerede yer aldığını (kaçıncı karakter olduğunu) bulmak için kullanabiliriz. Value değerine hangi karakteri veya kelimeyi aradığımızı vermemiz gerekmekte.
Kullanımı :
str = "Selam"
Response.Write InStr(str, "a")
Ekran Çıktısı : value değişkeninin değeri “4” olacaktır.
8 – MID(strVeri, baslangic_yeri, kopyalanacak_karakter_sayisi) : Bu fonksiyonu metnimizin içerisinde belirli bir aralığı kopyalamak için kullanabiliriz.
Kullanımı :
str = "Selam"
Response.Write Mid(str, 2, 3)
Ekran Çıktısı : value değişkeninin değeri “ela” olacaktır.
9 – REPLACE(strVeri, degisecek_metin, degistirilecek_metin) : Bu fonksiyon ile metnimizin bir karakteri veya metnini, başka bir karakter veya metin ile değiştirebiliriz.
Kullanımı :
str = "Merhaba Dünya"
Response.Write Replace(str, "Merhaba", "Selam")
Ekran Çıktısı : value değişkeninin değeri “Selam Dünya” olacaktır.
String fonksiyonlarına detaylı bakmak için w3schools ziyaret edebilirsiniz.
Kolay gelsin.
ASP ile cookie’ye değer atma ve silme
Merhaba arkadaşlar,
Bugün size asp ile cookieye değer atma ve işlemlerimizin bittiğinde cookieden değerleri boşaltma ile ilgili bir örnek paylaşacağım. Örneğin: Bir blog sitenizin olduğunu düşünün ve siz burada sürekli paylaşımlarda bulunuyorsunuz. Tabi bu paylaşımları bir panel üzerinden kullanıcı adı ve şifreniz ile yaptınızı düşünelim. Her seferinde panele kullanıcı adı ve şifreniz ile girerek paylaşımlarda bulunuyorsunuz.
Bunu şöyle çözebilirsiniz. Giriş sayfasından butona tıkladıktan sonra herşey tamam ise (kullanıcı kontrolü, giris kontrolü vs.) aşağıdaki kod parçacığı ile bilgilerinizi cookieye atın.
Response.Cookies("blogunuz")("email") = email
Response.Cookies("blogunuz")("password") = password
Response.Cookies("blogunuz").Expires = now() + 180
Yukarıdaki kod parçacığı blogunuz isminde bir cookie oluşturup, email ve password adında iki değişken tanımlar. Bunlara verdiğiniz bu değerleri ya sizin belirlediğiniz süre içerisinde ya da tarayıcıyı kapattığınız anda temizler. Cookieye Expires özelliği vermezseniz tarayıcıyı kapattığınız anda cookie temizlenir.
Bilgi gireceğiniz sayfa da ise şöyle bir kontrol yapabilirsiniz.
if not request.Cookies("blogunuz")("email") = "" then
response.redirect default.asp
else
response.redirect giris.asp
end if
Böyle bir kontrol yaparak da email alanı boş ise giris.asp‘ye, değil ise default.asp sayfasında yönlendirme işlemi yaptırabilirsiniz.
Son olarak da çıkış butonuna tıkladığınızda aşağıdaki kodu yazarsanız cookieyi temizlemiş olursunuz.
Response.cookies("blogunuz")("email") = ""
Response.cookies("blogunuz")("password") = ""
Umarım işinize yarar 🙂
ASP ile text dosya oluşturmak
Merhaba arkadaşlar,
Bugünkü yazımda sizlerle kolay ama bilmeyen biri için araştırılması gereken bir konuyu paylaşacağım. Asp içerisinde (Bu veritabanından çektiğimiz kayıtlar olur, diziden aldığımız kayıtlar olur vs.) kayıtları txt dosyasına nasıl yazarız bunun üzerinde duracağım.
Öncelikle yazmanız gereken kod aşağıdaki gibi detaylı açıklamayı alt kısmında yapacağım.
<%
Set file_object = CreateObject("Scripting.FileSystemObject")
Set file = file_object.CreateTextFile(Server.MapPath("kitaplar.txt"), True)
file.WriteLine("Bu bir denemedir.")
file.Close
%>
Aslında burada anlatılacak çok da fazla bir şey yok. İlk satır da bir dosya nesnesi oluşturuluyoruz. Bir sonraki satırda ise dosya ismimizi, nerede oluşturulacağını ve dosyanın üzerine yazılabilir mi, yazılamaz mı seçeneğini yazıyoruz. Bunu true, false diyerek belirtiyoruz. Daha sonra ise dosya içerisine “Bu bir denemedir.” yazdırıyoruz ve dosya değişkenimizi kapatıyoruz.
Aynı şekilde bir text dosyanın yanı sıra bir xml dosyası da oluşturabiliriz. Örneğin: Ben bu kod örneğini xml dosya oluşturmak için kullandım. Onunla ilgili de çok kısa bir örnek paylaşayım.
<%
Set file_object = CreateObject("Scripting.FileSystemObject")
Set file = file_object.CreateTextFile(Server.MapPath("kitaplar.xml"), True)
file.WriteLine("< kitapadi >Her Yönüyle C#< kitapadi >")
file.WriteLine("< kitapyazar >Sefer Algan</ kitapyazar>")
file.Close
%>
Tabi ben bunu burada el ile yazdım. Siz bunu veritabanından kayıt çekerek dinamik bir hale getirebilirsiniz.
Biraz daha fazla merak edenler aşağıdaki linkleri de inceleyebilirler.
Benden Gelenler 