VBNet - Форум - Пост пакет через прокси с переменным портом

Вопрос: Пост пакет через прокси с переменным портом Добавлено: 21.03.06 22:08

Автор вопроса: Winux | Web-сайт: damagelab.org | ICQ: 11177222

Короче говоря надо сделать отправгу постом через винсок. Причем так, если стоит галочка, то отсылает по прокси, если нет - напрямую.

Сделал условие:

If Check1.Value = 1 Then
hst = proxy.text
ptr = port.text
Else
hst = "myhost.com"
ptr = "80"
End If

Ну и потом соединяемся:

Winsock1.Protocol = sckTCPProtocol
Winsock1.Connect hst, prt

Вообщем надо узнать будет ли работать. Проблема в кавычках. Порт как число ставится после кавычек, т.е раньше был синтаксис без переменных:

Winsock1.Connect "myhost.com", 80

Тут 80 в кавычки не заключается, а будет ли работать мой вариант с переменным портом?
Ответить

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

Номер ответа: 1 Автор ответа: Sharp Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979	Web-сайт: sharpc.livejournal.com Профиль \| \| #1	Добавлено: 21.03.06 22:40
	prt = val(port.text) ... prt = 80 И, о чудо! Никаких кавычек Ответить

Номер ответа: 2 Автор ответа: Winux ICQ: 11177222 Вопросов: 3 Ответов: 6	Web-сайт: damagelab.org Профиль \| \| #2	Добавлено: 21.03.06 23:11
	Норм будет так? Будет прокси работать? If Check1.Value = 1 Then hst = proxy.text ptr = Val(port.text) Else hst = "host.com" ptr = "80" End If Winsock1.Protocol = sckTCPProtocol Winsock1.Connect hst, prt Ответить

Номер ответа: 3 Автор ответа: Sharp Лидер форума ICQ: 216865379 Вопросов: 106 Ответов: 9979	Web-сайт: sharpc.livejournal.com Профиль \| \| #3	Добавлено: 21.03.06 23:19
	ptr = "80" Кавычки убери. Ответить

Номер ответа: 4 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #4	Добавлено: 21.03.06 23:31
	или если настраиваемо будет, тогда val(port$) Ответить

Номер ответа: 5 Автор ответа: Winux ICQ: 11177222 Вопросов: 3 Ответов: 6	Web-сайт: damagelab.org Профиль \| \| #5	Добавлено: 21.03.06 23:48
	Что значит настраиваемо? Итак инфа из поля берется. Sharp: В асю что не отвечаешь? Ответить

Номер ответа: 6 Автор ответа: HACKER Разработчик Offline Client Вопросов: 236 Ответов: 8362	Профиль \| \| #6	Добавлено: 22.03.06 00:31
	val(txtPort.Text) Ответить

Страница: 1 |