Не работает отправка SMS через PDU - VB

Узнай цену своей работы

Формулировка задачи:

Через GSM модем отправляю смс. В текстовом режиме все нормально, но там латынь!!!
Листинг программы
  1. comm.Output = "AT+CMGF=1" & vbCrLf
  2. comm.Output = "AT+CMGS=" & Chr(34) & "+79502159320" & Chr(34) & vbCrLf ' Г*îìåð òåëåôîГ*Г* (êîìó)
  3. comm.Output = "ALARM:" & Time & Chr(26) & vbCrLf ' ГІГҐГЄГ±ГІ ñîîáùåГ*ГЁГї
Хочется на русском. для этого перевожу в режим PDU:
Листинг программы
  1. comm.Output = "AT+CMGF=0" & vbCrLf
  2. comm.Output = "AT+CMGS=31" & Chr(34) & vbCrLf
  3. comm.Output = "07919730071111f101000b919705129523f0000812041a0420041004210410041204270418041A" & Chr(26) & vbCrLf
Ничего не отсылается???!!! Может в коде что-то не то??? Пробовал в HyperTerminal все отсылается: AT+CMGF=0 AT+CMGS=31 > 07919730071111f101000b919705129523f0000812041a0420041004210410041204270418041A ctrl+Z

Решение задачи: «Не работает отправка SMS через PDU»

textual
Листинг программы
  1. comm.Output = "07919730071111f101000b919705129523f0000812041a0420041004210410041204270418041A" & Chr(26) & vbCrLf

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

12   голосов , оценка 4.333 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы