I eventually found a solution myself, here is the code:
For Each fPath In FilePath
Dim client As New WebClient()
Dim responseBinary As Byte()
responseBinary = client.UploadFile("http://mydomain.com/Upload.php", fPath)
Dim response As String
response = Encoding.UTF8.GetString(responseBinary)
MsgBox(response)
Next