How Do I Post The Data with

winhttprequest object

Code:
strData = "MY POST DATA"
strPacket = "POST " & postServer3 & " HTTP/1.1" & vbCrLf
strPacket = strPacket & "Host: www.server.com" & vbCrLf
strPacket = strPacket & "User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.9) Gecko/2008052906 Firefox/3.0" & vbCrLf
strPacket = strPacket & "Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8" & vbCrLf
strPacket = strPacket & "Accept-Language: en-us,en;q=0.5" & vbCrLf
strPacket = strPacket & "Keep-Alive: 300" & vbCrLf
strPacket = strPacket & "Connection: keep-alive" & vbCrLf
strPacket = strPacket & "Content-Type: application/x-www-form-urlencoded" & vbCrLf
strPacket = strPacket & "Content-Length: " & Len(strData) & vbCrLf & vbCrLf
SSLSock.SendSSL strPacket & strData

plz help its urgent....... need to complete project!!