VBNet - Форум - HTTP & WinSock

Вопрос: HTTP & WinSock Добавлено: 29.11.03 09:54

Автор вопроса: NeForm@t | Web-сайт: g--k.newmail.ru | ICQ: 252999255

Как мне програмно через винсок соедениться с определённым узлом(страничкой) и получить от неё html-код(как в браузере только в виде кода) для дальнейшей обработки программой
Например мне нужно получить содержимое странички http://www5.domaindlx.com/dasharm/ (конкретно - ip), а програмно я уже сам найду в ней ip.
И ещё вопросик: как самому написать такую страницу

Ответить

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

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

DaSharm

ICQ: 780477

Вопросов: 72
Ответов: 1297

Web-сайт: dasharm.com
Профиль | Цитата | #1

Добавлено: 29.11.03 23:31

Сейчас не заходи на ету страничку (я там испытания делаю, сейчас windows98 и Me вышибает сразу).

Короче, если хочешь что-то намутить:

1. бери винсок и конекться к любому прокси серверу

2.отсылай НТТР заголовок (хотя бы минимальный):

GET http://antichat.ru/anonumus.shtml" & " HTTP/1.0

Host: antichat.ru

Proxy-Connection: Close

3.В конце не забудь добавить два VbCrlf

Как ты понял, в етом примере мы получаем страничку из Antichat.ru.Готовый кусок кода (кинь на форму Text1 со свойством Multiline=True:

Private Sub Form_Load()

Winsock1.Connect "195.90.194.97",8080

End Sub

Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)

Dim data As String

Winsock1.GetData data

Text1.Text = data

End Sub

Private sub Command1_Click()

Dim DataToSend As String

Dim DTA1 As String

DTA1 = "GET http://antichat.ru/anonumus.shtml" & " HTTP/1.0" & vbCrLf & _

"Host: antichat.ru" & vbCrLf & _

"Proxy-Connection: Close" & vbCrLf & vbCrLf

DataToSend = DTA1

Winsock1.SendData DTA1

End Sub

работает.Все, только если хочешь ковыряться в моей страничке - используй instr.

Ответить

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

NeForm@t

ICQ: 252999255

Вопросов: 36
Ответов: 247

Web-сайт: g--k.newmail.ru
Профиль | Цитата | #2

Добавлено: 30.11.03 00:00

Вопрос: раз это твоя страница, то подскажи как она у тебя ip узнаёт???PLZ!!

Ответить

Номер ответа: 3 Автор ответа: Павел Администратор ICQ: 326066673 Вопросов: 368 Ответов: 5968	Web-сайт: www.vbnet.ru Профиль \| Цитата \| #3	Добавлено: 30.11.03 07:35
	Это же элементарно.. В ASP для этого надо использовать Request.ServerVariables("Remote_Addr") Ответить

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

NeForm@t

ICQ: 252999255

Вопросов: 36
Ответов: 247

Web-сайт: g--k.newmail.ru
Профиль | Цитата | #4

Добавлено: 30.11.03 12:20

А если на HTML и на бесплатном хосте, на котором есть только клиентские скрипты?Как???Как???Как???Как???Как???Как???Как???Как???Как???Как???Как???Как???Как???

Если можно по подробней!

Govnuk!!!

Ответить

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

NeForm@t

ICQ: 252999255

Вопросов: 36
Ответов: 247

Web-сайт: g--k.newmail.ru
Профиль | Цитата | #5

Добавлено: 30.11.03 13:00

To DaSharm:

Если как у меня нельзя то не мог бы ты на своём сайте разместить такую страничку типа govnuk.htm и выдавать на ней без тегов чисто ip(Если на ней будет счётчик и он будет работать при загрузке страницы через винсок то ты обалдеешь от кол-ва посещенй!!)

Govnuk

Ответить

Номер ответа: 6 Автор ответа: Павел Администратор ICQ: 326066673 Вопросов: 368 Ответов: 5968	Web-сайт: www.vbnet.ru Профиль \| Цитата \| #6	Добавлено: 30.11.03 13:06
	Если счётчик в виде картинки, то грузиться он не будет... Ответить