After mucking about with the routine I can get it to add my file into the Zip without a path, however its using the same name as the zip file.
Can anyone lep with last bit?
Dim myZip As ZipFile = New ZipFile(source)
myZip.BeginUpdate()
'This add the file but with current zipped name
myZip.NameTransform = New ZipNameTransform(myFile)
myZip.Add(myFile)
myZip.CommitUpdate()
myZip.Close()