Public Shared Sub GetFile(ByVal response As System.Web.HttpResponse, ByVal fileName As System.String, ByVal contentType As System.String, ByVal sourceFile As System.String)
        response.Clear()
        response.AppendHeader("content-disposition", String.Format("attachment; filename={0}", fileName))
        response.ContentType = contentType
        response.ContentEncoding = System.Text.Encoding.Unicode
        response.WriteFile(sourceFile)
        response.End()
    End Sub