ASP Mid fonksiyonu
7 Ağustos 2007ASP de en çok kullanılan fonksiyonlardan bir diğeri de Mid fonksiyonudur.
Mid (Metin, Başlangıç, [Uzunluk])
Gönderilen ifade de belirtilen karekter pozisyonundan itibaren istenilen kadar değeri geri gönderir.
Mid (string_ifade, başlangıç_noktası,[alınacak karakter sayısı])
Alıcanacak karakter sayısı opsiyoneldir. Eğer belirtilmezse ifadenin sonuna kadar alacaktır.
Mid ("HAKAN ŞEN", 4, 2)
ifadesinde geriye dönen değer AN olacaktır.
Devamı
Yorumlar (1)
Tarih : 7 Ağustos 2007 Salı Saat: 20:43:27
Kategoriler : Makale, Programlama
Etiketler : mid, asp, vb, function, fonksiyon
ASP inStr fonksiyonu
7 Ağustos 2007ASP de çok sık kullanılan fonksiyonlardan bir tanesi inStr`dir.
InStr ([Kaçınıcı Harften,] Neyinİçinde, Neyi, Nasıl)
Bir string ifade içindeki aranacak olan başka bir string ifadenin kaçıncı pozisyonda olduğunu belirler.
Kullanımı;
InStr (Başlangıç, aranacak ifade, aranan_ifade)
Örneğin;
HAKAN ŞEN kelimesi içinde ş harfinin kaçıncı pozisyonda olduğunu bulalım;
Deger=InStr (1, "HAKAN ŞEN", "Ş")
Geri dönen değer 7 dir. Burada HAKAN ŞEN ifadesi içinde 1. harfden başlayarak Ş harfinin kaçıncı eleman olduğunu bulduruyoruz.
Devamı
Yorumlar (1)
Tarih : 7 Ağustos 2007 Salı Saat: 20:40:26
Kategoriler : Makale, Programlama
Etiketler : instr, asp, vb, function, fonksiyon
xmlHTTP ile url kontrolü
6 Ağustos 2007xmlHTTP Kullanarak sorgulanmak istenen URL`nin var olup olmadığını kontrol etmek mümkündür.
kayit.kisaltiyor.us adresinde kısaltılacak urller girildiğinde öyle bir adresin var olup olmadığını kontrol etmek için kullanıyordum, bir yerlerde işinize yarayabilir.
Function GETHTTP(adres)
On Error Resume Next
Set StrHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP")
StrHTTP.Open "GET" , adres, False
StrHTTP.sEnd
If Err.Number = -2147012889 Then
Mesaj = "<font style=""color:red;"">DNS Yanıt vermiyor, Siteye ulaşılamadı</font>"
ElseIf Err.Number = -2147012867 Then
Mesaj = "<font style=""color:red;"">Url Bulunamadı</font>"
Else
Mesaj = "Url Bulundu Çalışıyor"
End If
GETHTTP = Mesaj
Set StrHTTP = Nothing
End Function
strUrl = Request("url")
If strUrl = "" Then strUrl = "www.hakansen.com"
If Mid(strUrl,1,7) <> "http://" Then strUrl = "http://"&strUrl
Veri = GETHTTP(strUrl)
Response.Write Veri
strUrl değişkenini request("url") nesnesi ile aldık ama bunu başka bir siteden input değeri ile post veya get methodu ile bir formdan gönderip de işlem yapabilirsiniz.
Devamı
Yorumlar (1)
Tarih : 6 Ağustos 2007 Pazartesi Saat: 21:14:49
Kategoriler : Makale, Programlama
Etiketler : xml, xmlhttp, asp, url kontrolü, fonksiyon,
BinaryToString Fonksiyonu
6 Ağustos 2007Binary verileri stringlere çevirmeye yarayan bir fonksiyon, xmlHTTP ile veri çektiğimizde gelen binary verileri süzmemize yarayacaktır.
Private Function BinaryToString(Binary)
Dim cl1, cl2, cl3, pl1, pl2, pl3
Dim L
cl1 = 1
cl2 = 1
cl3 = 1
L = LenB(Binary)
Do While cl1<=L
pl3 = pl3 & Chr(AscB(MidB(Binary,cl1,1)))
cl1 = cl1 + 1
cl3 = cl3 + 1
If cl3>300 Then
pl2 = pl2 & pl3
pl3 = ""
cl3 = 1
cl2 = cl2 + 1
If cl2>200 Then
pl1 = pl1 & pl2
pl2 = ""
cl2 = 1
End If
End If
Loop
BinaryToString = pl1 & pl2 & pl3
End Function
Devamı
Yorumlar (0)
Tarih : 6 Ağustos 2007 Pazartesi Saat: 20:12:05
Kategoriler : Makale, Sorun Giderme, Programlama
Etiketler : BinaryToString, xmlhttp, binary, string, fonksiyon, asp
xmlHTTP ile başka siteden veri çekmek
6 Ağustos 2007xmlHTTP nedir?
xmlHTTP windows sunucularda kullanılan bir componenttir, görevi ise başka sitelere veri göndererek karşılık almaktır.
(Yani ben böyle tarif ediyorum) xmlHTTP componenti elinizde yok ise buradan indirebilirsiniz.
Şimdi vereceğim örnek fonksiyon ile başka sitelerden gönlünüzce veri alabilirsiniz.
Function GETHTTP(adres)
On Error Resume Next
Set StrHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP")
StrHTTP.Open "GET" , adres, False
StrHTTP.sEnd
GETHTTP = StrHTTP.Responsetext
Set StrHTTP = Nothing
End Function
Kullanım şekli ise
URL = "http://www.youtube.com/"
Veri = GETHTTP(Url)
Response.Write Veri
Şeklinde kullanabilirsiniz, ileriki derslerde veriler üzerinde nasıl oynanacağını göstereceğim.
Kolay gelsin.
Devamı
Yorumlar (2)
Tarih : 6 Ağustos 2007 Pazartesi Saat: 19:29:16
Kategoriler : Makale, Programlama
Etiketler : xml, xmlhttp, asp, başka siteden veri çekmek
