LEADERSOFT.ru Разработка на заказ программ и сайтов
Интернет книги по информационным технологиям

Разработка виджета

«17 300 рублей» за работу

Для раскрутки сайта необходимо периодически на нем обновлять информацию.
Это возможно сделать вручную, написав статью в текстовом редакторе, а можно создать некий сервис, который будет «парсить» информацию для Вас из Интернета. Например, получать новости в формате ленты новостей (rss), сохранять в базе данных, а потом отображать их в виде блоков на сайте.
Такой технологией пользуются представители информационных сайтов, газет и журналов.
Стоимость разработки такой программы составляет 17 300 рублей. Технология разработки сервиса - Microsoft NET и ASP.NET.
Перейти к оформлению заказа ...
Данная книга содержит информацию по статьям IT технологий по разным направлениям

ASP.NET Изменение стандартных html элементов

Иногда при работе в ASP.NET требуется изменить стандартные элементы типа div, a, img и т.п. в коде C# или VB.NET. Например, изменить текстовое содержание или стиль. Сразу это выполнить не получится, необходимо этим элементам присвоить атрибут "выполнить на сервере". Выглядит это для ссылок так: <a id="WidgetImage_href" href="#1" runat="server" >




Рассмотрим простой пример. Есть форма. В ней находятся элементы div и другие, которые не привязаны к базе данных. Таким образом, в дизайнере формы мы видим реальную картину отображения шаблона на сайте. Это удобно. Кроме этого код получается более "чистым", т.е. свободным от вспомогательных элементов (смотрите выделение на картинке). Но нам необходимо изменить у картинки(img) ссылку на файл(src), добавить всплывающую подсказку (Alt).  Все это легко сделать из кода. Ниже указаны примеры на эту тему. P.S Post1 - это класс с набором данных полученных из базы данных или из интернета.

Public Sub FormView1_ItemCreated(sender As Object, e As EventArgsHandles FormView1.ItemCreated
           Dim Post1 As Post = DirectCast(sender, System.Web.UI.WebControls.FormView).DataItem
           ' ... Для других элементов CreateItem(sender.Row, Post1)
           Dim err As String = CreateItemByHtml(sender.Row, Post1)
           If err <> "" Then
               Response.Write(err)
           End If
 
      End Sub

Public Function CreateItemByHtml(item As Object, post1 As PostAs String
      ' Находим объекты из HtmlGenericControl
      Try
          ' Обработка картинок
          Dim img As HtmlImage = TryCast(item.FindControl("WidgetImage_src"), HtmlImage)
          If img IsNot Nothing Then
              img.Src = post1.Image
              img.Alt = post1.Caption
              'img.ViewStateMode = UI.ViewStateMode.Disabled
          End If
 
          ' Обработка ссылок
          For Each name1 As String In {"WidgetHeader""WidgetDate"}
              Dim c1 As HtmlAnchor = TryCast(item.FindControl(name1), HtmlAnchor)
              If c1 IsNot Nothing Then
                  c1.HRef = post1.Url
                  c1.Title = post1.Caption
                  'c1.ViewStateMode = UI.ViewStateMode.Disabled
                  Select Case name1
                      Case "WidgetDate" : c1.InnerText = post1.DateCreated.ToString("dd.MM.yyyy")
                      Case "WidgetHeader" : c1.InnerText = post1.Caption
                  End Select
              End If
          Next
          Return ""
      Catch ex As Exception
          Return ex.Message
      End Try
 
 
  End Function