Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Про порты Добавлено: 27.12.06 19:31  

Автор вопроса:  SysError
Если

winsock1.bind 1001
winsock1.listen
---------------------
1001 порт при этом открывается или нет?

Ответить

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

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



Вопросов: 6
Ответов: 171
 Профиль | | #1 Добавлено: 27.12.06 20:34
Если перед этим еще сделать WSAStartup и WSASocket
то откроется.

а проверить через TELNET не получается?

или на крайний случай
NETSTAT -a
покажет все открытые порты.

Ответить

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


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #2 Добавлено: 27.12.06 23:24
чё с ником? жирым стать надумал? :))) через меня - 20 wmz :)

2 Павел or UU - тсс... поделим :))))

угу, открывается :)

Ответить

Номер ответа: 3
Автор ответа:
 SysError



Вопросов: 23
Ответов: 13
 Профиль | | #3 Добавлено: 28.12.06 18:48
Да ты прав!
Хотел жирный ник, а получил жирную жопу- под именем !

Ответить

Номер ответа: 4
Автор ответа:
 Шаман



Вопросов: 1
Ответов: 6
 Web-сайт: www.moto-tema.narod.ru
 Профиль | | #4
Добавлено: 01.02.07 22:47
Можно ли в VB6 работать с СОМ поротом? Если да то как?

Ответить

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



Вопросов: 9
Ответов: 4
 Профиль | | #5 Добавлено: 02.02.07 11:37
Примеры чтения и записи данных в LPT порт, а также работа с некоторыми управляющими сигналами. Если Вы хотите что-либо считывать с порта, то Вам необходимо переключить режим работы порта компьютера в режим EPP (Enhanced Parallel Port – режим двунаправленной передачи данных). Это делается в BIOS. Во время загрузки компьютера когда появится надпись Press DEL to enter setup, нажмите DEL, чтобы попасть в меню BIOS. Затем выберите раздел INTEGRATED PERIPHERALS и там выберите строку PARALLEL PORT MODE: измените режим работы Вашего порта на EPP или SPP/EPP. Сохраните сделанные изменения. Если же на Вашем компьютере нет режима EPP, то Вы сможете только передавать данные

Параллельный порт для связи с принтером (или другим устройством) имеет базовый адрес &H378 (LPT1), &H278 (LPT2), &H3BC (LPT3). В данной статье мы будем рассматривать только LPT1. Адресное пространство порта занимает диапазон &H378-&H37F. Адрес &H378 называется базовым и служит для передачи или чтения данных, через контакты 2-9 разъема LPT-порта. Адрес &H37A служит для передачи управляющих сигналов к устройству, подключенного к этому порту (принтер, сканер и т.д.). И, наконец, адрес &H379 предназначен для приема управляющих сигналов с устройства, подключенного к этому порту (принтер, сканер и т.д.). Рассмотрим конкретные примеры для каждого из адресов. Для работы я использовал VB6 и библиотеку Inpout32.dll. В принципе подойдет любая другая, которая имеет возможность общаться с LPT портом.

Начало программы.

В самом начале программы необходимо указать с какой библиотекой мы будем работать:

Option Explicit

Private Declare Function Inp Lib "inpout32.dll" _

Alias "Inp32" (ByVal PortAddress As Integer) As Integer

Private Declare Sub Out Lib "inpout32.dll" _

Alias "Out32" (ByVal PortAddress As Integer, ByVal Value As Integer)

  

Передача числа 15 в LPT-порт адрес &H378

Private Sub Command1_Click()

Out &H378, 15

End Sub

тоесть на примере работы с LPT портом можно реалезовать и с COM только изменить адресса

Ответить

Страница: 1 |

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



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