|
|
| |
|
|
NTVMSNBC.COM Haberleri |
 |
3733 Görüntülenme |
Konular bölümünde anlatmyş olduğumuz ASPtear ile başka sayfalardan veri almak ile ilgili yazmyş olduğumuz NTVMSNBC.COM'dan teknoloji haber alma uygulamamyzy bu bölümde görüntüleyebilirsiniz.
Bu uygulamada hiç tasarym yapmadym.Çünkü kullanmak isterseniz tasarymynyza rahatlykla uydurabilirisiniz.
Tek sayfadan oluşan veri alma işlemimizin ve listelettirme işlemimizin olduğu sayfa olan asptear(ntvtechnews).asp asağydadyr.
<---------------------- asptear(ntvtechnews).asp Başlangyç ------------------->
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
<%
Server.ScriptTimeOut=0
strURL = "http://www.ntvmsnbc.com/news/BCList2.txt"
Dim tear
Set tear = Server.CreateObject("Softwing.AspTear")
strHTML = Tear.Retrieve(strURL,Request_Get, "","","")
strbasla = Instr(StrHTML,"tech_front.asp")
strbitis = Instr(StrHTML,"bilim_front.asp")
strhaberler = mid(strhtml,strbasla,strbitis-strbasla)
strhaberler = replace(strhaberler,"/news/","<br>/news/")
strhaberler = split(strhaberler,"/news/./")
for i=1 to 12
if i=12 then exit for
habergoster = split(strhaberler(i),"|")
response.write "<a target=_blank href=http://www.ntvmsnbc.com/news/" & habergoster(0) & ">" & habergoster(1)&"</a>"
next
%>
<---------------------- asptear(ntvtechnews).asp Bitiş -------------------->
Evet tek bu sayfamyzla düzenli bir biçimde link'lerimizi NTV adresine vererek syralyyoruz.
ÖNEMLY NOT : Bu uygulama ile NTVMSNBC.COM'un teknoloji haberlerini alyrsynyz.Fakat bunun dyşynda bir kategoriden almak için değiştirmeniz gerek 2 tane yer var.
Bu işlem için koddaki 7 ve 8 satyrdaki kategori isimlerini değiştirmeniz gerekiyor.7. satyrymyzdaki strbasla ile hangi kategoriyi alacağymyzy yazyyoruz.Değiştirmek için buraya almak istediğiniz kategori ismini "http://www.ntvmsnbc.com/news/BCList2.txt" adresinden bakarak hangi sayfa olduğunu alarak yazmanyz yeterli.
Bundan sonra 8. satyrdaki strbitis diye yazmyş olduğumuz değişkende ise almak istediğiniz kategorinin bir altyndaki kategorinin sayfa ismini alyp buraya tam olarak yazmanyz yeterli olacaktyr.Evet böylece istediğiniz kategoriyi bu uygulama ile alabilirsiniz.Eğer timeout hatasy alyrsanyz sayfayy alma işlemi yapana kadar refresh'lemeniz gerekir.Local Sunucuda bu sorunla karşylaşabilirsiniz.
Üstte kodlaryny vermiş olduğumuz uygulamayy indirmek istersenizde buraya tyklayabilirsiniz.
Örnek olarakda 09.0.2005 tarihinde alynmyş bilgileri görmek içinde buraya tyklayabilirsiniz. |
|
|
|
|
|
| |
|
| | |
|
Bu içerik hakkında 1 yorum yapılmış |
|
|
|
|
|
|
| Yorumlar(1) |
Not : Yorumlar zamana göre
son yorumdan ilk yoruma doğru(azalan) biçimde sıralanmıştır.
Yorumlarınız site yöneticileri tarafından onaylandıktan sonra eklenecektir. |
|
|
|
|
|
