Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

Visual Basic.Net - новости, коды, статьи, форум


VBNet.Su - Visual Basic .NET. ASP .NET. Framework .NET.
RE: Свойство My.Application.Info.DirectoryPath (31 января 2010 г. / 14:46)
Dim a As String = System.Reflection.Assembly.GetExecutingAssembly().Location
Dim b As String = System.IO.Path.GetDirectoryName ( a )
http://vbnet.su/forum/single-351.html
RE: Свойство My.Application.Info.DirectoryPath (31 января 2010 г. / 13:36)
System.Windows.Forms.Application.StartupPath
System.Windows.Forms.Application.ExecutablePath
http://vbnet.su/forum/single-350.html
Свойство My.Application.Info.DirectoryPath (21 января 2010 г. / 11:12)
Необходимо получить каталог приложения (в VB6 было app.Path), но в пространстве имен My почему то отсутствует Application.
Пробовал по другому:
Dim pth As Microsoft.VisualBasic.ApplicationServices.AssemblyInfo
furn(0) = pth.DirectoryPath
Но в этом случае пустая строка ("").
Подскажите, пожалуйста, в чем моя ошибка.
http://vbnet.su/forum/thread-349.html
RE: Ошибка 403 (HttpWebRequest.GetResponce) (03 января 2010 г. / 09:17)
Ага. Сам разобрался. Спасибо за внимание.

  1. Imports System
  2. Imports System.IO
  3. Imports System.Net
  4.  
  5. Public Module Module1
  6.  
  7.     Public Sub Main()
  8.  
  9.        Dim client As New WebClient()
  10.        client.Headers.Add("user-agent", "Opera/9.80 (Windows NT 6.0; U; uk) Presto/2.2.15 Version/10.10")
  11.        Dim stream As Stream = Nothing
  12.        Dim reader As StreamReader = Nothing
  13.  
  14.        Try
  15.           stream = client.OpenRead("<noindex><a href="http://kitsemen.co.cc/rss.xml" target="_blank" rel="external nofollow">http://kitsemen.co.cc/rss.xml</a></noindex>")
  16.           reader = New StreamReader(stream, System.Text.Encoding.UTF8)
  17.           Console.Write(reader.ReadToEnd())
  18.           Console.ReadKey()
  19.        Catch ex As Exception
  20.           Console.Write(ex.ToString())
  21.           Console.ReadKey()
  22.        Finally
  23.           If reader isnot Nothing then reader.Close()
  24.           If stream isnot Nothing Then stream.Close()
  25.        End Try
  26.  
  27.     End Sub
  28.  
  29. End Module


То делаю читалку-писалку-агрегатор Rss-фидов. И через раз читаются.
http://vbnet.su/forum/single-346.html
Ошибка 403 (HttpWebRequest.GetResponce) (03 января 2010 г. / 05:41)
В ответ на запрос получаю ошибку 403

  1. Imports System
  2. Imports System.IO
  3. Imports System.Net
  4.  
  5. Module Module1
  6.  
  7.     Sub Main()
  8.  
  9.        Dim request As HttpWebRequest = HttpWebRequest.Create("<noindex><a href="http://kitsemen.co.cc/rss.xml" target="_blank" rel="external nofollow">http://kitsemen.co.cc/rss.xml</a></noindex>")
  10.        Dim stream As Stream = Nothing
  11.        Dim reader As StreamReader = Nothing
  12.        Try
  13.           Dim responce As HttpWebResponse = request.GetResponse() ' ошибка 403 !
  14.           stream = responce.GetResponseStream()
  15.           reader = New StreamReader(stream, System.Text.Encoding.UTF8)
  16.           Console.Write(reader.ReadToEnd())
  17.           Console.ReadKey()
  18.        Catch ex As Exception
  19.           Console.Write(ex.ToString)
  20.           Console.ReadKey()
  21.        Finally
  22.           if stream isnot nothing then stream.Close()
  23.        End Try
  24.  
  25.     End Sub
  26.  
  27. End Module


Как с этим бороцца?
http://vbnet.su/forum/thread-345.html
HTML-код цвета без ColorTranslator (25 мая 2009 г. / 01:42)
Пример прямого и обратного преобразования значений каналов RGB в "HTML-код" не прибегая к ColorTranslaror.
http://vbnet.su/sources/gdi/62.html
Позднее связывание (10 мая 2009 г. / 03:26)
Примеры полезны тем, кто озадачен вопросами позднего связывания.
Примеры отвечают на следующие вопросы:
- Как путем позднего связывания использовать классы, модули и структуры, динамически загружая их с другой dll при выполнении программы?
- Как путем позднего связывания использовать собственноручно разработанные элементы управления динамически их загружая с другой dll. И, главное, как добавить возможность обработки событий, инициируемых ими?
- Как при выполнении программы динамически загружать различные встроенные в другую dll ресурсы (изображения, звуки, курсоры и т.д.)?
- Как динамически (при выполнении программы) созать, добавить и использовать стандартные элементы управления Windows Forms?
- Как при выполнении программы динамически компилировать и выполнять код? Например, для организации поддержки макросов.
http://vbnet.su/sources/win-forms/60.html
Пример контрола (04 мая 2009 г. / 12:38)
Наверное, самый простейший пример использования UserControls
с использованием TextBox и Button.
http://vbnet.su/sources/default/59.html
Преобразование цвета в целое 32-битовое число и наоборот (24 января 2009 г. / 04:39)
Как преобразовать цвет в число и наоборот не прибегая к услугам структуры Color?
http://vbnet.su/sources/gdi/58.html
Новости VBNet.Su (26 декабря 2008 г. / 13:53)
Лимитный инвайт для тех, кто хочет присоединиться к VBNet.Su, но не может :)
vbnet-super
С наступающим!
join
http://vbnet.su/news/#9
Реализация пользовательского CheckBox (26 декабря 2008 г. / 09:50)
Простой пример реализации пользовательского CheckBox с использованием технологии Windows Presentation Foundation (WPF). В примере показано, как можно отображать надпись слева, либо справа относительно самого CheckBox.
http://vbnet.su/sources/wpf/57.html
Новости VBNet.Su (18 декабря 2008 г. / 09:34)
Увеличен размер поля для подписи. Разрешено использовать некоторые теги HTML.
Изменены правила форума, в подписи разрешено использовать партнерские ссылки. Ссылки в подписи могут использовать только те пользователи, которые разместили обратную ссылку на VBNet.Su на одном из сайтов, указанных в профиле. Проверка обратных ссылок производится в автоматическом режиме. Если у Вас возникнут какие-либо вопросы, обращайтесь к администратору.
http://vbnet.su/news/#8
Новости VBNet.Su (15 декабря 2008 г. / 09:37)
Открылась рассылка VBNet.Su!
Рассылка будет выходить автоматически, несколько раз в неделю. В рассылке будут содержаться последние обновления сайта (аналог RSS). Чтобы подписаться на рассылку VBNet.Su, перейдите по этой ссылке.
http://vbnet.su/news/#7
Наследование в VB.Net (07 декабря 2008 г. / 19:37)
Если кто-нибудь уже сталкивался с мелкомягким контролом DataGridView, то наверняка порадовался обилию возможностей, которые он предлагает. Однако, когда дело доходит до реального кодинга, начинаешь хотеть чего-то большего. Мне, к примеру, понадобилось, чтобы внутри таблицы был ComboBox – конечно, он там есть, но мне понадобилось, чтобы в нём можно было ЛИБО печатать, ЛИБО выбирать. Т.е., если в списке не оказалось нужной нам вещицы, то мы могли впечатать её и тем самым дополнить список.
http://vbnet.su/articles/default/7.html
Работа с XML средствами Visual Basic .NET (07 декабря 2008 г. / 19:28)
Статья на тему работы с XML-файлами средствами Visual Basic .NET.
http://vbnet.su/articles/xml/5.html
Использование XML.Serialization (07 декабря 2008 г. / 19:25)
В данном обзоре речь пойдет об использование XML.Serialization в .NET и ее применении на примере сохранения и считывания настроек программы с использованием синтаксиса языка Visual Basic .NET.
http://vbnet.su/articles/xml/4.html
Как сделать программку с поддержкой плагинов? (07 декабря 2008 г. / 17:57)
В статье рассказывается, как можно сделать программу с поддержкой плагинов на языке Visual Basic .NET.
http://vbnet.su/articles/default/2.html
Автоматизация поиска SQL Injection (07 декабря 2008 г. / 17:52)
SQL Injection (SQL-вторжение) довольно распространенная уязвимость web-сайтов, которая позволяет злоумышленнику выполнять свой SQL-код путем подстановки его в ожидаемые параметры страницы. Таким образом, злоумышленник может запросто получить доступ к секретным данным, добавить, изменить, либо удалить данные. В данной статье я расскажу и покажу на примерах языков PHP и C#, как написать программку, которая будет автоматически сканировать заданные сайты на предмет наличия в них уязвимости типа SQL Injection. Естественно, все это делается в благих целях. :)
http://vbnet.su/articles/other/1.html

В избранное