Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: работа с мобилой через COM Добавлено: 06.02.08 19:59  

Автор вопроса:  AleXandr | ICQ: 490033736 
Может кто знает как работать с мобилой чtрез COM порт
Например нужно отправить СМС или позвонить

Ответить

  Ответы Всего ответов: 10  

Номер ответа: 1
Автор ответа:
 Arseny



ICQ: 298826769 

Вопросов: 53
Ответов: 1732
 Профиль | | #1 Добавлено: 06.02.08 21:02
mscomm? (mscomm32.ocx)

Ответить

Номер ответа: 2
Автор ответа:
 Arseny



ICQ: 298826769 

Вопросов: 53
Ответов: 1732
 Профиль | | #2 Добавлено: 06.02.08 21:08
Зри МэСэДэНэ
Private Sub Form_Load ()
   ' Buffer to hold input string
   Dim Instring As String
   ' Use COM1.
   MSComm1.CommPort = 1
   ' 9600 baud, no parity, 8 data, and 1 stop bit.
   MSComm1.Settings = "9600,N,8,1"
   ' Tell the control to read entire buffer when Input
   ' is used.
   MSComm1.InputLen = 0
   ' Open the port.
   MSComm1.PortOpen = True
   ' Send the attention command to the modem.
   MSComm1.Output = "ATV1Q0" & Chr$(13) ' Ensure that
   ' the modem responds with "OK".
   ' Wait for data to come back to the serial port.
   Do
      DoEvents
   Buffer$ = Buffer$ & MSComm1.Input
   Loop Until InStr(Buffer$, "OK" & vbCRLF)
   ' Read the "OK" response data in the serial port.
   ' Close the serial port.
   MSComm1.PortOpen = False
End Sub

Ответить

Номер ответа: 3
Автор ответа:
 D o c a l



ICQ: 408802757 

Вопросов: 76
Ответов: 985
 Web-сайт: www.doc-source.pp.net.ua/
 Профиль | | #3
Добавлено: 06.02.08 21:44
Arseny eto k mobile?

Ответить

Номер ответа: 4
Автор ответа:
 Arseny



ICQ: 298826769 

Вопросов: 53
Ответов: 1732
 Профиль | | #4 Добавлено: 06.02.08 22:00
это к COM-порту, а дальше - сами копайте. :P

Ответить

Номер ответа: 5
Автор ответа:
 AleXandr



ICQ: 490033736 

Вопросов: 15
Ответов: 21
 Профиль | | #5 Добавлено: 07.02.08 07:29
Что нужно писать в output чтобы мобила отправила СМС
Как работать с MSComm я и сам знаю

Ответить

Номер ответа: 6
Автор ответа:
 AleXandr



ICQ: 490033736 

Вопросов: 15
Ответов: 21
 Профиль | | #6 Добавлено: 07.02.08 08:57
Может кто знает как работать с COM без MSComm?
Можно в VB перехватывать сообщение передаваемые через COM?

Ответить

Номер ответа: 7
Автор ответа:
 intel-DX



ICQ: 445091742 

Вопросов: 4
Ответов: 169
 Профиль | | #7 Добавлено: 07.02.08 18:09
Это самый оптимальный вариант. 100% работает и не парь мозги

Ответить

Номер ответа: 8
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #8
Добавлено: 07.02.08 18:22
Можно в VB перехватывать сообщение передаваемые через COM?

DlPortWritePortIO

Адрес СОМ порта можно найти в нете. Остается только расшифровать данные с COM - порта.

Ответить

Номер ответа: 9
Автор ответа:
 BUMM ®



Вопросов: 8
Ответов: 482
 Профиль | | #9 Добавлено: 07.02.08 22:37
Никого не слушай. Командовать мобилой нужно через АТ-команды
например чтобы позвонить, отправляй на порт ATDT012345678 где 012345678 - номер телефона

Ответить

Номер ответа: 10
Автор ответа:
 AleXandr



ICQ: 490033736 

Вопросов: 15
Ответов: 21
 Профиль | | #10 Добавлено: 08.02.08 07:44
через АТ можно работать с встроенным в телефон модемом

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам