VB通过发送封包下载，求教登陆及发贴等

通过以下代码下载
 Dim s As String
    s = "GET " + strURL + " HTTP/1.0" + vbCrLf
    s = s + "Accept: */*" + vbCrLf
    s = s & "Pragma: no-cache" & vbCrLf
    s = s & "Cache-Control: no-cache" & vbCrLf
    s = s & "Connection: close" & vbCrLf & vbCrLf
    s = s + vbCrLf
Winsock1.SendData s
然后用getdata或者PeekData接收。
各位老师，好象登陆和发贴复杂好多。
自己试了很多，查了很多，还是不成功，总是ERR：404 。
求教拉……