Line 41: .WriteElementString("copyright", "Copyright(c) " & StaticData.MainDomain)
Line 42: .WriteElementString("description", n & " احدث الموضوعات والأخبار من " & StaticData.SiteNameAr & " " & StaticData.MainDomain)
Line 43: If Not Entries.Rows.Count = 0 Then
Line 44:
Line 45: Dim dttt As DateTime = CDate(Entries.Select("", "PublishDate DESC")(0)("PublishDate"))
|