This will work with any file type on the server
Response.Write(Request.Headers("X-File-Name"))
Dim output As FileStream = File.Create(PathToFolderEndWithBackSlash & Request.Headers("X-File-Name"))
Dim input As Stream = DirectCast(Request.InputStream, Stream)
Dim buffer(input.Length - 1) As Byte
Dim bytesRead As Integer
Do
bytesRead = input.Read(buffer, 0, buffer.Length)
If bytesRead = 0 Then Exit Do
output.Write(buffer, 0, bytesRead)
Loop
output.Close()
though I dare asy you'll want to add error catching etc etc