Inet sende data

Hvordan sender man data med inet jeg kan se at jeg har sendt på datoen men de data jeg skulle have sendt kommer ikke med

Private Sub Command1_Click()
Dim strURL As String
Dim strData As String
Dim strHeaders As String
objInet.RemoteHost = "www.bigk.dk"
strURL = "www.bigk.dk/tagwall.asp?mode=tagit"
strData = "navn=123" & Text1.Text
objInet.Execute strURL, "POST", strData
End Sub