|
31-07-2008, 11:37
|
#1 | ||
|
Senior Member
Üyelik tarihi: 29-07-2008
Mesajlar: 1.000
|
Visual Basic kullanarak geliştirebilen COM bileşeni ile daha önceleri belirtiğimiz bir adresi msinet.ocx dosyasını kullarak string olarak alabiliyorduk. Peki o zaman neden ASPtear var ki? Cevap açık, ASPtear size sadece bu özelliği değil daha birçok fonksiyonalite sunuyor, ayrıca sizi VB’de kod yazmaktan kurtarıp sadece bir nesne yaratarak bu özelliği kullanabilmenizi sağlıyor.
ASPtear Internet Programcılığı, Ağ ve Bilgisayar güvenliği konularında tanıdığımız AplhaSierraPapa firması tarafından geliştirilen bileşenlerden biri. Bulunan son sürümü 1.50. Bu bileşen ile yapılabilecekleri şu şekilde listelemek mümkün: - Online dökümanların string olarak alınması - Sabit diske kayıt - SSL desteği - Proxy Server desteği - Sayfa Tamponlama Özelliği - Yönlendirme desteği - Geliştirilmiş Cookie fonksiyonalitesi Online dökümanların string olarak alınması dışında olan tüm özellikler 15 günlük bir deneme sürümü olarak geliyor. Eğer memnun kalırsanız yazılımı satın almanız gerekiyor. Öncelikle asptear.dll adlı dosyayı sisteminize register etmeniz gerekiyor. Bu işlem için özellikle oluşturduğunuz bir klasör mevcut ise aşağıda da linkini verdiğimiz adreslerden bu dll dosyasını download ederek o klasöre kopyalayınız. Benim size önerim bu dosyayı diğer dll’ler ie aynı klasöre yani windows’un altındaki system32 klasörü altına kopyalamanız olacaktır.  Orjinal Boyutunda Açmak İçin ( 661x328 ve 9KB ) Buraya Tıklayın Yapmanız gereken dll dosyasının bulunduğu klasörde regsvr32 asptear.dll yazarak sisteme dll’i register etmenizdir.  Biz bir örnek ile web sayfalarından nasıl bilgi alabileceğimizi inceleyelim: HTML-Kodu:
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=windows-1254"> <title>ASPnedir?com - Hava Durumu</title> </head> <body> <% ' Meteoroloji sayfasının günlük tahminleri ' yayınladığı herkese açık olan bir döküman adresi adres = "http://www.meteor.gov.tr/pages/sonhavat.htm" On Error Resume Next ' ASPtear bileşenini yaratıyoruz Set Tear = Server.CreateObject("Softwing.AspTear") ' Verdiğimiz adresi bir string olarak alıyoruz strVeri = Tear.Retrieve(adres,2, "","","") if Err <> 0 then Response.Write "Bir hata oluştu, açıklaması: "& Err.Description Response.End end if ' Aldığımız string içerisinde başlamasını istediğimiz yeri buluyoruz tahminler = Instr(1,strVeri,"SICAKLIKLARI DA SOYLE OLACAK") ' Bulduğumuz konumdan itibaren ne kadar karaktere ihtiyamız varsa alıyoruz strHava_Durumu = Mid(veri,tahminler+38,157) %> <font size="2" face="Verdana"><b><%=Date()%></b> tarihli Hava Tahmini şöyledir: <p> <b><%=strHava_Durumu%></b> </font> </body> </html> |
||
|
|
 |
| Seçenekler | |
| Stil | |
|
|
ASPtear Bileşenin'ın Kullanımı
Normal
