로그인소스 문의!!! 고수님들 도와주세요!!

Dim WinHttp As New WinHttpRequest
Private Sub Command1_Click()
WinHttp.Open POST, http://togod.asia/bbs/login_check.php
WinHttp.SetRequestHeader Referer, http://togod.asia/
WinHttp.SetRequestHeader Content-Type, application/x-www-form-urlencoded
WinHttp.Send Flogin.php&mb_id= & Text1 & &mb_password= & Text2
WinHttp.WaitForResponse

If InStr(WinHttp.ResponseText, http://togod.asia/) Then
MsgBox 성공
Else
MsgBox 실패
End If
End Sub

대충 짜보긴햇는대 안되더라구요 ㅠㅠ 고수님들 도와주세요 뭐가 문제죠

http://togod.asia/