Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Отправка текста через интернет, вопрос по VB 
:(
    Опции темы
VenSaitto
Дата 23.1.2010, 15:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 23.1.2010

Репутация: нет
Всего: нет
Здравствуйте, недавно начал изучать VB 6 создавать всякие мини- приложения. Пришло время создать приложение в котором имеется два текстовых поля которые заполняются пользователем, и босле нажатия определенной кнопки на форме, текст введенный в эти поля отсылался мне ( Не знаю как это риализовать и куда отправлять и возможна ли отправка на эмейл). Если кто то решал уже эту проблему прошу помоч мне=) Ну или подсказать где можно найти информацию по этой проблеме. Спасибо.
PM MAIL   Вверх
iff
Дата 24.1.2010, 12:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Администратор
**


Профиль
Группа: Участник
Сообщений: 949
Регистрация: 23.3.2007

Репутация: -1
Всего: 16
Про отправку e-mail было много тем.
e-mail



--------------------
DOS... Синей пеленой экран заполнил чистый DOS 
Мышь... Стала вдруг квадратной, потеряла форму мышь... 
Я разбил окно, девяностопятое мастдайное окно, 
И поставил DOS, и тогда увидел: Это счастье, — вот оно.  
PM MAIL WWW   Вверх
VenSaitto
Дата 25.1.2010, 14:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 23.1.2010

Репутация: нет
Всего: нет
Вообщем разобрался что тут к чему, ео есть одно большое НО  smile  После того как я скачал полностью рабочий исходник чата к себе на компьютер и решил затестить его мне вылетела такая ошибка  Run-time Error 10014 invalid argument. Немного погуглив что же это за ошибка натолкнулся на что типо это ошибка microsoft и что скачав что то она будет исправлена. Вообщем скачал пакет обновлений поставил Visual basic 6.0 sp 6 ошибка так и осталась =(
Код

Private Sub Form_Load()
  ' Имя Winsock элемента udpPeerA
    With udpPeerA
        ' Важно: правильно укажите значение RemoteHost
        ' компьютера, с которым предстоит соединение.
        .RemoteHost = "PeerB"
        .RemotePort = 1001 ' Имя порта для соединения.
        .Bind 1002 ' Привязка к локальному порту.
    End With
    frmPeerB.Show ' Показать вторую форму.
End Sub

Private Sub txtSend_Change()
   ' Послать текст, как только он будет набран.
    udpPeerA.SendData txtSend.Text
End Sub
Private Sub udpPeerA_DataArrival(ByVal bytesTotal As Long)
    Dim strData As String
    udpPeerA.GetData strData
    txtOutput.Text = strData
End Sub

2 форма

Код

Private Sub Form_Load()
   ' Имя Winsock элемента udpPeerB.
    With udpPeerB
        ' Будьте внимательны указывая имя или IP-адрес
        ' компьютера с которым предстоит соединение.
        .RemoteHost = "PeerA"
        .RemotePort = 1002 ' Номер порта для соединения.
        .Bind 1001 ' Привязка к локальному порту.
    End With
End Sub

Private Sub txtSend_Change()
' Пересылать текст, как только он будет набран в текстовом поле.
    udpPeerB.SendData txtSend.Text
End Sub
Private Sub udpPeerB_DataArrival(ByVal bytesTotal As Long)
    Dim strData As String
    udpPeerB.GetData strData
    txtOutput.Text = strData
End Sub

ошибкой выделяется  udpPeerA.SendData txtSend.Text когда пытаешься что то ввести в поле txtSend


Это сообщение отредактировал(а) Akina - 25.1.2010, 18:05
PM MAIL   Вверх
Akina
Дата 25.1.2010, 18:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454

M
Akina		Используйте тег "Код"!


Цитата(VenSaitto @  25.1.2010,  15:43 Найти цитируемый пост)
ошибкой выделяется  udpPeerA.SendData txtSend

Цитата(MSDN - Winsock Help)

When a UNICODE string is passed in, it is converted to an ANSI string before being sent out on the network.





--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.
PM MAIL WWW ICQ Jabber   Вверх
iff
Дата 25.1.2010, 22:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Администратор
**


Профиль
Группа: Участник
Сообщений: 949
Регистрация: 23.3.2007

Репутация: -1
Всего: 16
Цитата

текст введенный в эти поля отсылался мне 

Код, который вы изложили не будет работать если у вас выключен компьютер или не запущена программа. То. есть текст может и не дойти до адресата


--------------------
DOS... Синей пеленой экран заполнил чистый DOS 
Мышь... Стала вдруг квадратной, потеряла форму мышь... 
Я разбил окно, девяностопятое мастдайное окно, 
И поставил DOS, и тогда увидел: Это счастье, — вот оно.  
PM MAIL WWW   Вверх
VenSaitto
Дата 26.1.2010, 12:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 23.1.2010

Репутация: нет
Всего: нет
Цитата

Код, который вы изложили не будет работать если у вас выключен компьютер или не запущена программа

Дело в том что программа проверялась на одном компьютере + на компьютерах в сети.
Цитата

When a UNICODE string is passed in, it is converted to an ANSI string before being sent out on the network.

Жаль но мне это ничего не обьяснило , видимо не достаточно знаний. Можете в крации расказать что к чему?
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0632 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.