How do you zip an exsisting folder for download without saving the zipped folder

Thanks for the response. I have a function that returns the zipped file using that library ,below is my function call
<pre> Public Function ZipFiles(ByVal inputFolderPath As String, ByVal outputPathAndFile As String) As String
Dim outPath As String = Nothing
Try

Dim ar As ArrayList = GenerateFileList_Zipping(inputFolderPath)
' generate file list
Dim TrimLength As Integer = (Directory.GetParent(inputFolderPath)).ToString().Length
' find number of chars to remove // from orginal file path
TrimLength += 1
'remove '\'
Dim ostream As FileStream
Dim obuffer As Byte()
outPath = inputFolderPath & "\" & outputPathAndFile
Dim oZipStream As New ZipOutputStream(File.Create(outPath))
' create zip stream

oZipStream.SetLevel(9)
' maximum compression
Dim oZipEntry As ZipEntry
For Each Fil As String In ar
' for each file, generate a zipentry
oZipEntry = New ZipEntry(Fil.Remove(0, TrimLength))
oZipStream.PutNextEntry(oZipEntry)

If Not Fil.EndsWith("/") Then
' if a file ends with '/' its a directory
ostream = File.OpenRead(Fil)
obuffer = New Byte(ostream.Length - 1) {}
ostream.Read(obuffer, 0, obuffer.Length)
oZipStream.Write(obuffer, 0, obuffer.Length)
End If
Next
oZipStream.Finish()
oZipStream.Close()



Catch ex As Exception

Finally
If (File.Exists(outputPathAndFile)) Then
File.Delete(outputPathAndFile)
End If
End Try

Return outPath
End Function </pre>


but I have to store the file on the server to be downloaded. I don't want a situation of having a bunch of temporary files on the server that wasn't deleted due to some issue