Estou tendo dificuldades para carregar uma pagina da web com o controle winsock.

o que estou tentando é o seguinte mas nao ta retornando o esperado:

 

  With Winsock
    .Close
    .Connect "http://www.flogao.com.br/", 80
    
    Do
      Sleep 1
      DoEvents
    Loop While .State <> sckConnected And .State <> sckError 'Or .State = 0
    
    If .State = sckError Or .State = sckClosed Then GoTo Closed
    
    .SendData "GET http://www.flogao.com.br/ HTTP/1.1" & vbCrLf & _
    "Host: www.flogao.com.br/" & vbCrLf & _
    "Accept: */*" & vbCrLf & _
    "Accept-Language: en" & vbCrLf & _
    "Connection: Keep-Alive" & vbCrLf & vbCrLf
   
  End With

E ai o que eu faco????

Uma pergunta... o que vc está querendo fazer ???

(>) Se vc está querendo carregar uma página (recomendo usar um outro COMPONENTE) -- Webbrowser

descrição:
Com ele vc pode pegar um código-fonte de uma página e fazer o que você quiser com ele sem nenhum problema pois não precisa usar muita programação !


você que sabe....

[...]

Marcus Vinícius

Notei que o que você está querendo fazer é correto, só não entendi em que parte não funciona e etc.... gostaria de uma explicação !

aguardo por respostas

[...]

Marcus Vinícius

Consegui no pscode: http://www.Planet-Source-Code.com/vb/scripts/ShowCode.asp?txtCodeId=58035&lngWId=1

Obrigado pela atenção!