attach text from html file

عزيزي نزار هنالك ما يدعى Web Service

اذا كنت تقصدها فالموضوع يتغير قليلا أما اذا كان طلبك هو فقط استحضار بيانات من موقع آخر فانتظر ساعة واحدة فقط وسأعود لأجيب عن سؤالك

آسف عليي الذهاب الآن

لتوضيح الموضوع عليك انا اعمل موقع اريد ان يكون به قسم للاخبار احضرها من موقع اخر فمثلا اريد ان تتجدد البيانات كل يوم لاحصل على اخبار جديدة واخزنها عندي حتى يصبح في النهاية املك ارشيف لهذه الاخبار

وبارك الله فيك و إن شاء الله احنا المبرمجين لبعض

يا اخوان انا في انتظاركم

وينك يا arwany

طيب عزيزي الكريم الموضوع أشبه ب RSS Feeds

لازم تقلي بس من وين بدك تجيب الأخبار مشان اقدر شوف شو المتطلبات

يا ريت تقي من وين بدك تجيب الأخبار بس

ولا يهمك كل شي بيصير لا تخاف

بدي اجيب table زواج من موقع www.6rb.com

او tabel اخبار من نفس الموقع

مممممممممممممممممم

الموضوع بدو شغل شوي خليني اليوم المسا اشرب متة عليه وشفلك اذا بلاقيلك شي حلة أو برمة معو وان شاء الله خير

بس في شغلة معقديتني

الشباب عندنا بالشركة عملوها ببساطة عالphp في عندهم function جاهز اسمه file.content و function ثاني للفلترة

طيب ولا يهمك لا تتعقد ولا على بالك

بعدين اذا انت تعقدت كيف بدنا نحلك :s

فهما عقد المشاريع بتنحل ... بس عقد الناس ما منقدر نحلها هون :>

ولا يهمك مرة تانية اليوم على كاسة المتة (وتوفيق من رب العالمين قبل كل شي) كل شي بينحل

وكمان بال ASP.NET في نفس الدوال

لا تخاف كل شي متوفر هون ولا يهمك

بس انت طمني بالك شوي وخلينا نحلل الموضوع اليوم المسا شوي شوي

لانو الحلول الجاهزة ما بتودي لنتيجة أبدا

انت كبداية حاول تفهم كيف بدنا نجيب (Text) من الملف المطلوب وبعدين فهام كيف بدنا نشيل منو اللي بدنا اياه ونترك اللي ما بدنا اياه

فهمت عليي كيف

وان شاء الله منلاقي الحل

يسلمو يا محترم وبوعدك من هون وطالع ما رح اتعقد بلاش ماحدا يعرف يفكني

بكرة الصبح بشوف شو طلع معك واذا طلع معي اشي بخبرك

خلاص ولا يهمك وان شاء الله اليوم بشفلك اياها

ماهو الخطأ في هذا الكود

<% Response.Expires = -1 ' =========== RSS2HTML.ASP for ASP/ASP.NET ========== ' copyright 2005-2007 © www.Bytescout.com ' version 1.22, 25 April 2007 ' =============================================== ' ############################################################## ' ####### CHECK OUR COMMERCIAL PRODUCTS FOR ASP/ASP.NET: ####### ' SWF Scout [ http://bytescout.com/swfscout.html ]- create, read, modify flash movies (SWF) ' PDFDoc Scout [ http://bytescout.com/pdfdocscout.html ]- generate PDF documents with security options (PDF) ' ############################################################## ' =========== configuration ===================== ' ##### URL to RSS Feed to display ######### URLToRSS = "http://bytescout.com/blog/feed" ' ##### max number of displayed items ##### MaxNumberOfItems = 7 ' ##### Main template constants MainTemplateHeader = "<table>" MainTemplateFooter = "</table>" ' ##### ' ###################################### Keyword1 = "" ' Keyword1 = "tech" - set non-empty keyword value to filter by this keyword Keyword2 = "" ' Keyword1 = "win" - set non-empty keyword value to filter by this 2nd keyword too' ################################# ' ##### Item template. ' ##### {LINK} will be replaced with item link ' ##### {TITLE} will be replaced with item title ' ##### {DESCRIPTION} will be replaced with item description ' ##### {DATE} will be replaced with item date and time ' ##### {COMMENTSLINK} will be replaced with link to comments (if you use RSS feed from blog) ' ##### {CATEGORY} will be replaced with item category ItemTemplate = "<tr><td><strong>{DATE}</strong><br/><strong>{CATEGORY}<br/></strong><a href=" & """{LINK}""" & ">{TITLE}</a><BR>{DESCRIPTION}</td></tr>" ' ##### Error message that will be displayed if not items etc ErrorMessage = "Error has occured while trying to process " &URLToRSS & "<BR>Please contact web-master" ' ================================================ Set xmlHttp = Server.CreateObject("MSXML2.XMLHTTP.3.0") xmlHttp.Open "Get", URLToRSS, false xmlHttp.Send() RSSXML = xmlHttp.ResponseText Set xmlDOM = Server.CreateObject("MSXML2.DomDocument.3.0") xmlDOM.async = False xmlDOM.validateOnParse = False xmlDom.resolveExternals = False If not xmlDOM.LoadXml(RSSXML) Then ErrorMessage = "Can not load XML:" & vbCRLF & xmlDOM.parseError.reason & vbCRLF & ErrorMessage End If Set xmlHttp = Nothing ' clear HTTP object Set RSSItems = xmlDOM.getElementsByTagName("item") ' collect all "items" from downloaded RSS RSSItemsCount = RSSItems.Length-1 ' if not <item>..</item> entries, then try to get <entry>..</entry> if RSSItemsCount = -1 Then Set RSSItems = xmlDOM.getElementsByTagName("entry") ' collect all "entry" (atom format) from downloaded RSS RSSItemsCount = RSSItems.Length-1 End If Set xmlDOM = Nothing ' clear XML ' writing Header if RSSItemsCount > 0 then Response.Write MainTemplateHeader End If j = -1 For i = 0 To RSSItemsCount Set RSSItem = RSSItems.Item(i) for each child in RSSItem.childNodes Select case lcase(child.nodeName) case "title" RSStitle = child.text case "link" If RSSLink = "" Then If child.Attributes.length>0 Then RSSLink = child.GetAttribute("href") if (RSSLink <> "") Then if child.GetAttribute("rel") <> "alternate" Then RSSLink = "" End If End If End If ' if has attributes If RSSLink = "" Then RSSlink = child.text End If End If case "description" RSSdescription = child.text case "content" ' atom format RSSdescription = child.text case "published"' atom format RSSDate = child.text case "pubdate" RSSDate = child.text case "comments" RSSCommentsLink = child.text case "category" Set CategoryItems = RSSItem.getElementsByTagName("category") RSSCategory = "" for each categoryitem in CategoryItems if RSSCategory <> "" Then RSSCategory = RSSCategory & ", " End If RSSCategory = RSSCategory & categoryitem.text Next End Select next' now check filter If (InStr(RSSTitle,Keyword1)>0) or (InStr(RSSTitle,Keyword2)>0) or (InStr(RSSDescription,Keyword1)>0) or (InStr(RSSDescription,Keyword2)>0) then j = J+1 if J<MaxNumberOfItems then ItemContent = Replace(ItemTemplate,"{LINK}",RSSlink) ItemContent = Replace(ItemContent,"{TITLE}",RSSTitle) ItemContent = Replace(ItemContent,"{DATE}",RSSDate) ItemContent = Replace(ItemContent,"{COMMENTSLINK}",RSSCommentsLink) ItemContent = Replace(ItemContent,"{CATEGORY}",RSSCategory) Response.Write Replace(ItemContent,"{DESCRIPTION}",RSSDescription) ItemContent = "" End ifEnd If Next ' writing Footer if RSSItemsCount > 0 then Response.Write MainTemplateFooter else Response.Write ErrorMessage End If' Response.End ' uncomment this for use in on-the-fly output%>

اقرأ الكود من هذا الملف

RSS2HTML_asp.htm

اه حج Arwany طلع معك اشي

والله شكلك طقعتلنا يا arwany

له يا غالي

بس طولي بالك شوي

هلأ الموضوع شوي فيه مشكلة وهيي انو عم جيب جزء من النص

بس عم يجبلي شوية نصوص زيادة

وجاري العمل على حل المشكلة...

ان شاء الله بتنحل

لحظة ... لحظة لحظة

أنا هلأ استوعبت الموضوع من كودك هادا

انت يا حبيب قلبي بدك تستحصل بيانات من RSS Feed وتحطهم بشكل منسق ... صح ولا لأ؟

اذا هادا هوي غرضك فالموضوع كتير بسيط الله يسامحك يا أخي الكريم أنا كنت مفكر انو لازم ملف html ودور بقلبو عن عنصر معين ودخت الألف دوخة مشانو ومشي الحالو

بس اذا الموضوع RSS وهادا اللي شفتك طالبو من الكود السابق فخلص الموضوع محلول بس انتظر حتى الصباح غدا وان شاء الله بتلاقي مثال تجريبي موجود في الملحقات

ولا يهمك كل شي مع الصبر بينحل

بدها صبر على قولة رفيقي الحمصي

طيب

هلأ الفكرة اللي وعدتك فيها مبارح بالليل هي التالي:

أنشئ صفحة جديدة (الكود ضمن الملف aspx) ونساخ عليها ما يلي:

<%@ Page Language="C#" AutoEventWireup="true"%>
<script runat="server">
 protected void Page_Load( object sender, System.EventArgs e )
 {
   System.Xml.XmlDocument doc = new System.Xml.XmlDocument();
   doc.Load(Request.QueryString["RSS"].ToString());
   XmlDataSource1.Data = doc.InnerXml;
   XmlDataSource1.XPath = "/rss/channel/item";
 }
</script>
<html xmlns="http://www.w3.org/1999/xhtml">
<body>
 <form id="form1" runat="server">
   <asp:GridView ID="GridView1" runat="server" DataSourceID="XmlDataSource1" AutoGenerateColumns="False" CellPadding="4" ForeColor="#333333" GridLines="None">
	 <Columns>
	   <asp:TemplateField HeaderText="RSS Reader">
		 <ItemTemplate>
		   <asp:HyperLink ID="HyperLink1" runat="server" Target="_blank" NavigateUrl='<%#XPath("link") %>'>
				<%#XPath("title")%>
		   </asp:HyperLink>

		 </ItemTemplate>
	   </asp:TemplateField>
	   <asp:TemplateField>
		<ItemTemplate>
			[<%# XPath("pubDate").ToString().Replace("GMT"," ") %>]
		</ItemTemplate>
	   </asp:TemplateField>
	 </Columns>
	   <FooterStyle BackColor="#507CD1" Font-Bold="True" ForeColor="White" />
	   <RowStyle BackColor="#EFF3FB" />
	   <EditRowStyle BackColor="#2461BF" />
	   <SelectedRowStyle BackColor="#D1DDF1" Font-Bold="True" ForeColor="#333333" />
	   <PagerStyle BackColor="#2461BF" ForeColor="White" HorizontalAlign="Center" />
	   <HeaderStyle BackColor="#507CD1" Font-Bold="True" ForeColor="White" />
	   <AlternatingRowStyle BackColor="White" />
   </asp:GridView>
   <asp:XmlDataSource ID="XmlDataSource1" runat="server"></asp:XmlDataSource>
 </form>
</body>
</html>

هلأ اذا بدك تطلب الصفحة لازم تمرر باراميتر للصفحة وهو مسار ال RSS كالتالي:

PageName.aspx?RSS=http://msdn.microsoft.com/asp.net/rss.xml

وهيك رح تشوف الأخبار بالصفحة

ورح تتحدث مباشرة

الشرح:

متل مانك شايف هيي عبارة مرة تانية عن Databind راجع موضوع Databind لمزيد من المعلومات

يا سيدي بارك الله فيك غلبتك معي بس انا كنت مستعجل والحمدلله حليتها وشكرا الك مرة تانية

أهلا وسهلا

آسف عالتأخير بالرد بس والله (والشباب بيعرفو شو يعني تشتغل بالشركة) انو ما في وقت عندي

وخصوصا انو عم بعلق بالزحمة كل يوم ساعات

فزرعها بدقني عالمرة (أو زرعها ببروفايلي :D ) وان شاء الله منعوضلك اياها