| Вопрос: How to recive mail | Добавлено: 12.06.02 17:28 |
Автор вопроса:  Keith Flint | Web-сайт: www.flint7.nm.ru
|
|
Люди знающие, как мня почту с помощью VB приняти можно? |
| Ответы | Всего ответов: 5 |
|
Номер ответа: 1 Автор ответа:  User Unknown Вечный Юзер! ICQ: uu@jabber.cz Вопросов: 120 Ответов: 3302 |
Профиль | | #1 | Добавлено: 12.06.02 17:49 |
|
Погляди на это.... Из двух - можешь сделать одну
http://freevbcode.com/source/CS_POP3_Email_Deleter.zip http://freevbcode.com/code/E-Checker.zip
*********Forms************ Как прилепить одно окно к другому: 'Нужно: 2 формы, и АПИ вьювер. Public OldWindowProc As Long
Public Function WindowProc(ByVal hWnd As Long, ByVal uMsg As Long, ByVal wParam As Long, ByVal lParam As Long)
Dim retVal As Long
If uMsg = WM_MOVE Then
Form2.Move Form1.Left, Form1.Top + Form1.Height
End If
retVal = Call WindowProc(OldWindowProc, hWnd, uMsg, wParam, lParam) WindowProc = retVal
End Function
'пример Private Sub Form_Load() OldWindowProc = SetWindowLong(Form1.hWnd, GWL_WNDPROC, AddressOf WindowProc) Form2.Show End Sub
Private Sub Form_Unload() Unload Form2 SetWindowLong Form1.hWnd, GWL_WNDPROC, OldWindowProc End Sub
Все писал "на живую" - ищите глюки и ляпы
**************************
|
||
|
Номер ответа: 2 Автор ответа:  SmithICQ: adamis@list.ru Вопросов: 153 Ответов: 3632 |
Профиль | | #2 | Добавлено: 12.06.02 18:28 |
| Здесь winsock нужен | ||
|
Номер ответа: 3 Автор ответа:  j3d1 ICQ: 8370005 Вопросов: 34 Ответов: 466 |
Профиль | | #3 | Добавлено: 12.06.02 18:34 |
|
Сирус ты просто гений |
||
|
Номер ответа: 4 Автор ответа: SmithICQ: adamis@list.ru Вопросов: 153 Ответов: 3632 |
Профиль | | #4 | Добавлено: 12.06.02 18:37 |
|
Скажешь нет? |
||
|
Номер ответа: 5 Автор ответа:  VbStarterICQ: 357911808 Вопросов: 118 Ответов: 1340 |
Web-сайт: Профиль | | #5 | Добавлено: 16.08.10 20:54 |
давно искал... и меня никто не отсылал сюда, на самую первую тему... 
|
||
Страница: 1 |