![]() |
Помогите пожалуйста!!!
Как написать програму в VB6. Например: Кинуть на форму 1 кнопку и 1 текстовое поле. И чтобы при нажатии на кнопку, текст (что будет написано в текстовом пеле) отсылался на мой Email: ... |
|
Вот тебе код с использованием API. Пусть на форме будет Text1 и CommandButton1:
Private Declare Function ShellExecute& Lib "shell32.dll" _ Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal _ lpOperation As String, ByVal lpFile As String, _ ByVal lpParameters As String, ByVal lpDirectory _ As String, ByVal nShowcmd As Long) Private Sub Command1_Click() Call ShellExecute(0&, "Open", "mailto:" + "user@host.ru" + _ "?Subject=" + "Theme..." + "&body=" + Text1.Text, "", "", 1) End Sub И усё!!! Твое письмо в почтовике! |
Время: 14:05. |
Время: 14:05.
© OSzone.net 2001-