Программирование (VB,C#,ASP,.NET): новости, советы, примеры (comp.soft.prog.vbaspsharpnet) : Рассылка : Subscribe.Ru

Открылся персональный сайт Немиро Алексея.
На сайте собраны авторские работы Немиро Алексея: статьи и обзоры по программированию и дизайну, программы и компоненты, информация о Web-проектах. Также на сайте вы найдете полезные программы и бесплатные компоненты .NET, каталог полезных сайтов и многое другое.

Адрес сайта: http://aleksey.nemiro.ru

Все новости Kbyte.Ru

Наверх

Система ЭКСПЕРТ

Система «Эксперт» - уникальная система, которая поможет решить, если не все, то многие Ваши проблемы с программированием и разработкой! Если у Вас есть какой-либо вопрос по программированию или разработке, то Вы всегда можете задать его нашим Экспертам! При этом каких-либо особых действий от Вас не потребуется! Просто отправьте Ваш вопрос на адрес mailto:expert@kbyte.ru, в теме письма укажите тему вопроса, в тексте – сам вопрос, и все! Эксперты дадут Вам ответ в течение 12-24 часов, на тот адрес, с которого Вы отправите вопрос. Все проще простого! Никакой регистрации и заполнение бесконечных форм, никаких наездов, оскорблений и насмешек со стороны гуру, просто спросите и получите ответ ;-)

Вопрос #000482: Отправка_почты_из_программы_(VB_6_)

Автор вопроса: das dsadsa // 24.09.2007 / 21:03

Как сделать из программы на VB6 отправку почты,через http или smtp
 (желательно с вложением).
 Просьба дать пример кода или линк). Я долго искал в гугле но там везде скопирована одна и таже статья,при этом с неработающим кодом

Отвечает: Алексей Немиро // 25.09.2007 / 04:03

Здравствуйте!
 
 Через HTTP почту не отправляют :)
 HTTP (HyperText Transfer Protocol) - сетевой протокол прикладного уровня для передачи файлов. В стеке TCP/IP для HTTP зарезервированы[1] порты 80 и 8080 транспортных протоколов TCP и UDP (на практике используется только первый).
 Основным назначением протокола HTTP является передача веб-страниц (текстовых файлов с разметкой HTML), хотя с помощью него с 
 успехом передаются и другие файлы, как связанные с веб-страницами (изображения и приложения), так и не связанные с ними (в этом HTTP конкурирует с более сложным FTP).
 HTTP предполагает, что клиентская программа — веб-браузер — способна отображать гипертекстовые веб-страницы и файлы других типов в удобной для пользователя форме.
 Для правильного отображения HTTP позволяет клиенту узнать язык и кодировку веб-страницы и/или запросить версию страницы в нужных языке/кодировке, используя обозначения из
стандарта MIME.

 
 Что касается SMTP, то Вам нужно изучить этот протокол, и используя
 соккеты, Вы сможете отправлять почту. Для приема почты придется
 разбираться с протоколом POP3. Эти протоколы довольно не сложные.
 В википедии есть список команд SMTP с описанием на русском языке: http://ru.wikipedia.org/wiki/SMTP
 
 
 
 -- 
 С наилучшими пожеланиями, 
 Немиро Алексей

Вопрос #000477: Баланс абонентской платы в DSL

Автор вопроса: rozhkovamariae // 24.09.2007 / 04:39

Как проверить баланс абонентской
платы в DSL?

Отвечает: Алексей Немиро // 24.09.2007 / 04:46

Здравствуйте!
 
 В операционной системе это сделать не возможно. Данный сервис должен
 предоставлять Ваш провайд
 ер (поставщик услуг), обычно, через
 Web-интерфейс. Вся информация об этом также должна быть на официальном
 сайте Вашего провайдера, если ее нет, то обратитесь в службу технической поддержки Вашего провайдера.
 
 Также, существуют специальные программы, которые считают трафик, и при
 правильной настройке способны выводить стоимость трафика, но как
 правило, 100% точно сказать, сколько надо платить, не сможет ни одна
 программа.
 
 -- 
 С наилучшими пожеланиями,

 Немиро Алексей

Вопрос #000469: Ошибка при выполнении программы на C#

Автор вопроса: "Abu Ali" // 19.09.2007 / 07:04

Здравствуйте уважаемые эксперты!

У меня такой вопрос:

Имеется программа на C# которая запускает CorelDraw и выполняет в нем
некоторые действия.

Фрагмент кода следующий:

1. CorelDRAW.Application draw= new CorelDRAW.Application();
2. draw.Visible = true;
3. CorelDRAW.Document doc = draw2.OpenDocument(pathTemplate +
"\\Template.cdr", 1);

При выполнении программа выдает ошибку на строке 2:

"Unable to cast COM object of type 'CorelDRAW.ApplicationClass to
interface type 'CorelDRAW.IDRAWApplication'. This operation failed
because the QueryInterface call on the COM component for the interface
with IID'{398C0002-8D24-11D2-89E7-0000861EBBD6}' failed due to the
following error: No such interface supported (Exception from
HRESULT:0x80004002(E_NOINTERFACE)).

Причем вчера все работало нормально.

Заранее благодарен.

Отвечает: EROS // 19.09.2007 / 08:29

No such interface supported

 Эта ошибка говорит о том, что программа не может создать экземпляр COM-объекта ввиду того, что не найден интерфейс. По всей видимости, какая-то из библиотек приложения "потеряла регистрацию". Какая то из программ внесла в реестр некоректные изменения.. такое иногда случается при установке/удалении программ. Поп
 робуйте удалить CorelDRAW и установить его заново.

Вопрос #000464: Работа с таймером

Автор вопроса: balu // 16.09.2007 / 05:44

Здравствуйте уважаемые эксперты! Не откажите в помощи начинающему. Вобщем суть проблемы:
- Как привязать таймер к часам, чтоб в определённое время выполнялась некая команда (например отключение компьютера). Заранее премного благодарен!
 
 --------------------------------------
 Категория: --- Visual Basic 5.0/6.0

Отвечает: Алексей Немиро // 16.09.2007 / 05:51

Здравствуйте, balu!
 
 Для реализации этого достаточно расположить на форме один элемент
 Timer, установить свойство Interval равное 1000 (~1 сек.) и вставить
 примерно следующий код:
 
 001:
002:
003:
004:
005:
Private Sub Timer1_Timer()
 If DateDiff("s", Now, "16.09.2007 12:49:00") = 0 Then
  MsgBox "Пора мыть ноги :)", vbInformation
 End
If
End Sub

 
 Подробнее про функию DateDiff можно почитать тут, про функцию [/b]Now[/b] - тут.
 
 -- 
 С наилучшими пожеланиями, 
 Немир
 о Алексей

Вопрос #000454: Работа_с_файлами

Автор вопроса: weltkind // 08.09.2007 / 21:13

Добрый день experts
 Возникла очередная проблема вот к вам и обращаюсь ..
 есть файл с содержание даты и дня
недели вот такого вида
 03.07.2007;Вт
 04.07.2007;Ср
 05.07.2007;Чт
 06.07.2007;Пт
 07.07.2007;Сб
 09.07.2007;Пн
 11.09.2007;Вт
 12.09.2007;Ср
 13.09.2007;Чт
 как мне проверить есть ли в этом файле одинаковые даты и если да то удалить 
 их...
 Зарание блогадарен!
    
 
 --------
 Все магазины - тут: http://shop.tut.by/

Отвечает: Алексей Немиро // 09.09.2007 / 05:42

Здравствуйте!
 
 Самый простой вариант, на мой взгляд, просто считать весь файл,
 загнать его в ArrayList, сортировать (метод Sort) и
 затем циклом удалить дубликаты :)
 
 ЗЫ: На будущее, указывайте
язык, на котором вы собираетесь это делать,
 иначе вряд ли вы получите ответ на ваш вопрос ;)
 
 -- 
 С наилучшими пожеланиями, 
 Немиро Алексей

Чтобы задать Ваш вопрос, отправьте его на адрес expert@kbyte.ru

Раздел Эксперт на сайте Kbyte.Ru

Наверх

Последнее на форумах

XML формат преобразовать в HTML формат (в VB.NET) | Автор: sabina
Добавлено: 27.09.2007 / 18:33 | ответов: 0 | просмотров: 11

возможно ли XML формат преобразовать в HTML формат в VB.NET? если да то как? (какую нибудь информацию пожалуиста)

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Хомячок | Автор: Алексей
Добавлено: 27.09.2007 / 13:21 | ответов: 3 | просмотров: 34

Завел себе хомяка :)
Ваши вопросы, жалобы и предложения можете писать в этот топик, или сюда: http://aleksey.nemiro.ru/ Projects/Web-Projects/AlekseyDotNemiroDotRu.nspx

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 1 | Автор: Berd
Добавлено:27.09.2007 / 13:55
У меня были - задолбался ежедневно стружку менять - воняет...
Сейчас интелектуальная крыса Анфиса (фото ты видел) - намного умнее и пахнет не так...
Пишу - а она сидит на п лече!
Но дело вкуса (вернее обоняния) :)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 2 | Автор: EROS
Добавлено:27.09.2007 / 14:37
Я плакалЪ !!!! :-)))))))))))
Хомяк - это сленг... от слова Home Page

Весьма рекомендую ознакомиться с этим документом

Добавить ответ | Посмотреть эту те му на сайте | Форум Kbyte.Ru

Ответ # 3 | Автор: Berd
Добавлено:27.09.2007 / 15:14
Пусть все плачут - хто хомячков завел...
Мог бы и сам догадаться, что речь о том же.
Обясняю для плачущих:
Результат: http://acm.tju.edu.cn/toj/ranklist.html
получен благодаря тому что около 40% решений моя Анфиса у хомяков и позабирала :)
Вот так-то!!!
Хорошо смеется тот - кто смеется последним, или как говорил мой шеф "И те, к кому позже доходит!"
Без обид - шеф со мной пошутил, я могу шутку и продать однополчанам...
С уважением: АВП

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Группа символов | Автор: Constantin
Добавлено: 25.09.2007 / 10:22 | ответов: 1 | просмотров: 33

Здравствуйте! Опять я со своим супер-блокнотом :)
Еще одна проблема, подскажите, как выделить определенную группу символов в RichTextBox по клику мышки, или изменению позиции курсора?
У меня есть текст, я его преобразовал в шестнадцатеричные символы, получилось примерно так:

001:
002:
0A FF A1 10 20 FF AA
1B AF CC 13 10 01 02

И надо чтобы по клику мышки в определенное место RichTextBox выделялись два символа, например если я кликну в районе первых двух символов, то выделить их, и так далее. Пробелы вообще выделять не надо. Как это можно сделать?

______________ ___
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 1 | Автор: EROS
Добавлено:25.09.2007 / 15:26
SelectionStart & SelectionLength

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Буква в Биты | Автор: Constantin
Добавлено: 25.09.2007 / 10:08 | ответов: 5 | просмотров: 77

Здравствуйте!
Делаю супер-блокнот, застрял на преобразовании буквы в биты, например,
английская буква "A" должна превратиться в 1000 00100.
Как это сделать? Помогите пожалуйста :[

Пишу на VB .NET 2005

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 1 | Автор: Berd
Добавлено:25.09.2007 / 10:43
Неккоректно (не полно) сформулировано условие.
Причина - 9 бит не может отводится на символ.
Уточните, сколько бит 8, 16 или 32 отводится в вашей программе на символ.
Это принципиально и важно для написания полного ответа на Ваш вопрос.
Стандартно в ДОС на символ отводится 8 бит...
С уважением - АВП

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 2 | Автор: Constantin
Добавлено:25.09.2007 / 12:12
Ой! Извините, конечно 8 бит в одном символе :[

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 3 | Автор: Алексей
Добавлено:26.09.2007 / 04:49
В универсальных кодах у нас есть пример как это сделать на Visual Basic 6.0:

Как преобразовать десятичное число в бинарное?

Данный пример показывает, как можно преобразовать десятичное число в бинарное, в данном случае число 255 преобразуется в 1111 1111.

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
Public Function ConvertToBin(ByVal bByte As Byte) As String
Dim i As Integer
For i = 0 To 7
  If bByte And 2 ^ i Then
   ConvertToBin = 1 & ConvertToBin
  Else
   ConvertToBin = 0 & ConvertToBin
  End If
Next i
End Function

Private Sub Form_Load()
MsgBox "255 = &H" & Hex(255) & " = " & ConvertToBin(255)
End Sub

_______________________
Colorized by: Eros.CodeSyntaxColor Engine

В принципе, в VB .NET код будет практически такой же.
Если возникнут проблемы с переписыванием под .NET, пишите, поможем чем можем :)

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 4 | Автор: Алексей
Добавлено:26.09.2007 / 04:53
Совсем забыл, чтобы получить код символа, нужно использовать функцию Asc.

В данном случае, будет что-то типа этого:

001:
002:
003:
004:
MsgBox(ConvertToBin(Asc("A")))

_______________________
Colorized by: Eros.CodeSyntaxColor Engine

_________________
Это сообщение добавлено через Kbyte.Ru Forum Mail Conference (FMC)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 5 | Автор: 5acred Phoenix
Добавлено:26.09.2007 / 13:41
001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
   Me.Text = ConvertToBin("я")
End Sub

Public Function ConvertToBin(ByVal chr As String) As String
   If (chr.Length <> 1) Then Throw New System.ArgumentException("Length of chr must be equal to 1.")
   ' Get byte representation of char
   Dim a As Byte = System.Text.Encoding.Default.GetBytes(chr)(0)
   ' Convert it to bits
   Return System.Convert.ToString(a, 2).Padleft(8, "0"c)
End Function
м? :-)

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Маршаллинг | Автор: 5acred Phoenix
Добавлено: 23.09.2007 / 21:48 | ответов: 1 | просмотров: 64

Доброе время суток!

Я таки пытаюсь написать плагин под QIP Infium на .net'е. Точка старта — QIP Infium SDK, переписанный под C++, который я, в свою очередь, переписываю под VB.NET.

Так вот, меня интересует следующий момент. Код из SDK:

001:
002:
003:
004:
void __stdcall CreateInfiumPLUGIN(IQIPPlugin** retval, IQIPPluginService* pluginService)
{
 *retval = new QipPlugin(pluginSe
 rvice);
}

И объявление функции у меня

001:
002:
003:
004:
005:
Public Shared Function CreateInfiumPLUGIN(ByVal pluginService As IntPtr) As IntPtr
  ' ???
End Function

Colorized by: Eros.CodeSyntaxColor Engine

Вопрос в следующем: можно ли и, если да, как получить объект, который передаёт QIP и который имеет следующее описание? (В CreateInfiumPLUGIN указатель передаётся)

001:
002:
003:
004:
005:
006:
class IQIPPluginService : public IUnknown
{
public:
    virtual PluginSpecific* __stdcall PluginOptions(HMODULE dllHandle) = 0;
    virtual void   __stdcall OnPluginMessage(PluginMessage* plugMsg) = 0;
};

Вот моя попытка переписать это же под .net:

001:
002:
003:
004:
005:
006:
007:
008:
009:
010:
011:
012:
013:
014:
015:
016:
017:
018:
019:
020:
021:
022:
023:
024:
025:
026:<
 br />Public Enum HRESULT As Integer
  E_FAIL = &H80004005
End Enum

<StructLayout(LayoutKind.Sequential)> _
Public Structure
REFIID
  Public Data1 As UInteger
  Public Data2 As Short
  Public Data3 As Short
  Public Data4 As UInteger
End Structure

<ComImport(), Guid("00000000-0000-0000-C000-000000000046")> _
Public Interface IUnknown
  Function QueryInterface(<[In]()> ByVal riid As REFIID, <Out()> ByVal
ppvObject As IntPtr) As HRESULT
  Function AddRef() As UInteger
  Function Release() As UInteger
End Interface

' QIP gi
 ves to plugin this interface
Public Interface IQIPPluginService : Inherits IUnknown
  Function PluginOptions(ByVal dllHandle As IntPtr) As PluginSpecific
  Sub OnPluginMessage(ByVal plugMsg As
PluginMessage)
End Interface

Colorized by: Eros.CodeSyntaxColor Engine

Всё ли верно?

Ответить на это сообщение | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Ответ # 1 | Автор: 5acred Phoenix
Добавлено:24.09.2007 / 16:10
Насколько я понимаю, мне нужны IID'ы интерфейсов IQIPPlugin и IQIPPluginService. Но где и как их узнать..?

Добавить ответ | Посмотреть эту тему на сайте | Форум Kbyte.Ru

Наверх

Последние статьи

Взаимодействие с другими сайтами через HTTP (HttpWebRequest и HttpWebResponse)
Автор: Немиро Алексей | добавлено: 27.07.2007 / 14:01 | просмотров: 823

В данной статье речь пойдет о том, как можно программно заполнить и отправить Web-форму, а также получить результат с использованием довольно простых классов - HttpWebRequest и HttpWebResponse.

Работа с SQL – Запросы
Автор: Хабибулин А. (aka Bille Gates) | добавлено: 22.07.2007 / 04:43 | просмотров: 1412

В данной статье рассмотрены часто используемые SQL-запросы и приведены примеры их использования.

Использование XML.Serialization
Автор: Немиро Алексей | добавлено: 19.07.2007 / 15:38 | просмотров: 404

В данном обзоре речь пойдет об использование XML.Serialization в .NET и ее применении на примере сохранения и считывания настроек программы с использованием синтаксиса языка Visual Basic .NET.

Выбор языка программ ирования для научных работ (2-я редакция)
Автор: Юдин С. Ю. | добавлено: 15.03.2007 / 02:49 | просмотров: 2283

Идея написания этой статьи возникла после того, как на одном из сайтов по физике http://physics.nad.ru/aniboard/messages/291.html я обнаружил интересный алгоритм моделирования движения тела в поле постоянной напряженности по различным направляющим. Вернее, меня заинтересовал не весь алгоритм, т.к. основа их всех одна (принцип Даламбера, если не считать квазиалгоритма с применением уравнений Лагранжа 2-го рода) и различаются они только способом определения реакций в месте соприкосновения тел. ...

Работаем с MIME
Автор: Немиро Алексей | добавлено: 29.11.2006 / 14:46 | просмотров: 2167

Не так давно мне пришлось немного поработать MIME (Multipurpose Internet Mail Extension) - это стандарт почтовых сообщений, в РуНете (Russian Internet) я не нашел нормального описания спецификации MIME, и посему решил написать небольшую статейку на эту тему. В данной статье вы узнаете об основных особенностях и стандартах MIME, а также научитесь «читать» MIME с использованием синтаксиса языка Visual Basic .NET 2005.

Статьи на Kbyte.Ru

Наверх

Интерес ные коды и решения

Как получить текущее системное время?
Дата добавления: 16.08.2006 / 20:18 | просмотров: 1159 | платформа: VB

Анализ чисел
Дата добавления: 24.03.2007 / 11:09 | просмотров: 415 | платформа: RegEx

Как добавить новые данны е в базу данных?
Дата добавления: 31.07.2006 / 18:33 | просмотров: 794 | платформа: ASP

Как получить данные из базы данных?
Дата добавления: 31.07.2006 / 12:50 | просмотров: 1648 | платформа: VB

Как получить содержимое каталога?
Дата добавления: 31.07.2006 / 17:31 | просмотров: 687 | платформа: ASP .NET (VB)

Как удалить данные из базы данных?
Дата добавления: 31.07.2006 / 12:48 | просмотров: 750 | платформа: VB

Как узнать IP-адрес посетителя?
Дата добавления: 01.09.2006 / 12:20 | просмотров: 1190 | платформа: ASP

Как перевести посетителя на другую страницу?
Дата добавления: 31.07.2006 / 14:37 | просмотров: 558 | платформа: ASP .NET (VB)

Анализ тэгов
Дата добавления: 24.03.2007 / 11:10 | просмотров: 480 | платформа: RegEx

DataGridView: Как добавить новую строку?
Дата добавления: 02.08.2006 / 09:31 | просмотров: 1594 | платформа: VB .NET

Универсальные коды на Kbyte.Ru

Наверх

Юмор на Kbyte.Ru

Ты мне сегодня во сне пpиснилась!
- В эpотическом?
- Hет, в обычном.
- А как ты их вообще pазличаешь?
- А у эpотических pасшиpение *.JPG

Рейтинг: 112
Всего голосов: 188