Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[3.19.29.89] |
|
Сообщ.
#1
,
|
|
|
Подскажите самый простинький пример плизззззз
|
Сообщ.
#2
,
|
|
|
HEAD запрос
|
Сообщ.
#3
,
|
|
|
Цитата ANDLL @ HEAD запрос дай пример простинький плизз |
Сообщ.
#4
,
|
|
|
http://google.ru
|
Сообщ.
#5
,
|
|
|
Смешно)))
|
Сообщ.
#6
,
|
|
|
Что именно смешно?
|
Сообщ.
#7
,
|
|
|
не могу найти(
|
Сообщ.
#8
,
|
|
|
Выпиши все комбинации по которым искал
|
Сообщ.
#9
,
|
|
|
искал как ты сказал:
HEAD запрос VB HEAD VB вот что нашел... тока понять не могу( Private Sub Form_Load() Winsock1.RemoteHost = "vbcode.webhostme.com" Winsock1.RemotePort = 80 Winsock1.Connect End Sub Private Sub Winsock1_Connect() Dim strCommand as String Dim strWebPage as String strWebPage = "http://vbcode.webhostme.com/en/home.html" strCommand = "GET " & strWebPage & " HTTP/1.0" & vbCrLf strCommand = strCommand & "Accept: */*" & vbCrLf strCommand = strCommand & "Accept: text/html" & vbCrLf strCommand = strCommand & vbCrLf Winsock1.SendData strCommand End Sub ' С получением первых байтов происходит событие написанное ниже, bytesTotal - размер файла, а Winsock1.BytesReceived - сколько уже пришло! Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long) Dim strData As String Winsock1.GetData strData, vbString Text1.Text = Text1.Text & strData End Sub Добавлено P.S. |
Сообщ.
#10
,
|
|
|
О ё. Ладно, напишиу кусочек кода
'На форме таймер с периодом 100 мс. В refernces - галочку на Microsoft XML 4.0 Option Explicit Dim a As New XMLHTTP40 Private Sub Form_Load() a.open "HEAD", "http://ya.ru" a.send End Sub Private Sub Timer1_Timer() If a.readyState = 4 Then Timer1.Enabled = False MsgBox a.getResponseHeader("Content-length") End If End Sub |
Сообщ.
#11
,
|
|
|
хм подкинь плиз файлик MSXML4.DLL а то не могу эту ссылку поставить
|
Сообщ.
#12
,
|
|
|
ставь ссылку на третий и замени в коде 40 на 30
|
Сообщ.
#13
,
|
|
|
а какой переменной мона воспользоваться что бы пользоваться этими данными (зазмерам файла)
|
Сообщ.
#14
,
|
|
|
А как ты думаешь?
|
Сообщ.
#15
,
|
|
|
MsgBox a.getResponseHeader("Content-length") ну я думал что если есть MsgBox то там должна быть переменная что бы выводить данные (размер) но перепробывал все и не куя( |
Сообщ.
#16
,
|
|
|
Не понял. У тебя код работает? А в чем вопрос?
|
Сообщ.
#17
,
|
|
|
да код работает... но просто я не понял в какой переменной хрониться результат работы(
|
Сообщ.
#18
,
|
|
|
Не в какой, конкретно здесь он выводится на экран. Что бы он сохранялся напиши a=...
|
Сообщ.
#19
,
|
|
|
можешь назвать меня тупым но я не понял как это сделать... тебе не составит труда самому этосделать?
|
Сообщ.
#20
,
|
|
|
Вместо
MsgBox a.getResponseHeader("Content-length") Напиши имя_твоей_переменной = a.getResponseHeader("Content-length") |
Сообщ.
#21
,
|
|
|
Пасиба те большое) кста тема это популярная считается...
|
Сообщ.
#22
,
|
|
|
Цитата shurik59 @ Пасиба те большое) кста тема это популярная считается... Популярной она считается из-за твоей "понятливости". Ты никогда не пробовал использовать устройство "мозг" хотябы на 0.1% больше? |
Сообщ.
#23
,
|
|
|
О наш зазнайка пришел)
Если ты посмотришь на других форумах то там небыло ответаов вообще! потому еслы вы отредактируете и сохраните будет гуд. |
Сообщ.
#24
,
|
|
|
B.V.
Ему всего 13 лет Добавлено shurik59 Не начинай |
Сообщ.
#25
,
|
|
|
Цитата ANDLL @ Не начинай Не начнет. |