Posting Cgi

How can i use this module that i found and have attached to perform a true post to some where like lycos my current code is:

Dim serv As String
Dim scripts As String
Dim ret As String

SplitAddr "http://www.lycos.co.uk/cgi-bin/pursuit", serv, scripts

ret = PostInfo(serv, scripts, "query=CHRIS")

MsgBox ret 'That just displays all the html for now

my problem is that although query = chris it doesnt post the data so i end up with a please enter a search string when i save the file as a htm pls help