forumdan Konu çekmek

18-08-2007, 20:01:47

Kimlik doğrulama veya yönetimden onay bekliyor.

Selamlar,
Herhangı bır sıteme forumumdan konu başlıklarını çekebılıyorum ıstedığım kategorıdekı konuların başlıklarını ıstedığım sıtede gosterıyorum,

Ancak bana lazım olan bir sitemde istediğim bi kategorıdekı haberı çekmke komple, once rss yı ınceledım ama sadece tek bolum ıcın rss bulamadım rss son 50 - 60 konuyu verıyor eh ıstedığım bolumdede pek konu açılmayınca işe yaramıyor bunu nasıl yapabılırız fıkrı olan varmı veya daha onceden uygulayan ?

18-08-2007, 23:25:12

#2

NoNeTheLeSs

Misafir

Sorununuzu tam olarak anlayamadım net olarak anlatırsanız bilgilendirmeye çalışacağım sanırım sorun RSS ile ilgili ama karışık

18-08-2007, 23:30:47

#3

Onurss

Kurumsal Üye

http://www.siteadi.com/external.php?...SS2&forumid=xx şeklinde sanırım istediginiz... xx yerine konu almak istediginiz forumun id numarasını yazabilirsiniz.

19-08-2007, 00:51:11

#4

jackal

Onurss adlı üyeden alıntı: mesajı görüntüle

http://www.siteadi.com/external.php?...SS2&forumid=xx şeklinde sanırım istediginiz... xx yerine konu almak istediginiz forumun id numarasını yazabilirsiniz.

Teşekkurler tam oalrak aradığımda buydu zaten

birde şunu merak edıyorum mesela asp ile rss verısı çekıyorum kodlar şu şekılde :

Alıntı

<%
Call GelecekonlinerssNews("Chip Online","http://rssadresi.com")

' RSS Reader
Sub GelecekonlinerssNews(rssTitle, rssFile)

Dim objXML, objRoot, objItems
Set objXML = Server.CreateObject("Microsoft.XMLDOM")
objXML.Async = False
objXML.SetProperty "ServerHTTPRequest", True
objXML.ResolveExternals = True
objXML.ValidateOnParse = True
objXML.Load(rssFile)
If (objXML.parseError.errorCode = 0) Then
Set objRoot = objXML.documentElement
If IsObject(objRoot) = False Then
response.write "<li>Connection Error!"
End If
Set objItems = objRoot.getElementsByTagName("item")
If IsObject(objItems) = True Then
Dim objItem
For Each objItem in objItems
response.write "<b><a href='" & objItem.selectSingleNode("link").Text & "'>" & objItem.selectSingleNode("title").Text & "</a></b><br>" & vblf
response.write "<div class='Notices'>" & objItem.selectSingleNode("description").Text & "</div><br>" & vblf
Next
else
response.write "<li>Connection Error!"
exit sub
End If
Set objItems = Nothing
Set objRoot = Nothing
End If
Set objXML = Nothing
End sub

%>

bunun php kodları varmıdır acaba araştırdım ama bulamadım

19-08-2007, 02:38:03

#5