file compresso ma senza estensione

[webdevaster]

ciao a tutti,
voi sapete come mai con questo script:

    Private Sub compressfile(ByVal sender As System.Object, ByVal e As System.EventArgs)

        Dim miofile As String = Server.MapPath("miofile.htm")
        Dim mioarchivio As String = Server.MapPath("miofile.rar")

        Using streamWriter As New FileStream(miofile, FileMode.Create, FileAccess.Write, FileShare.None)
            Using streamReader As New FileStream(mioarchivio, FileMode.Open, FileAccess.Read, FileShare.Read)
                Using gzip As New GZipStream(streamWriter, CompressionMode.Compress, True)
                    Dim buffer As Byte() = New Byte(streamReader.Length - 1) {}
                    streamReader.Read(buffer, 0, buffer.Length)
                    gzip.Write(buffer, 0, buffer.Length)
                End Using
            End Using
        End Using
    End Sub

mi comprime sì il file ma togliendogli l'estensione???

in pratica dentro "miofile.rar" trovo il file "miofile" senza estensione...

sapete come evitare questo problema?

grazie

[pietro09]

:master: se devi comprimere il file:

miofile.htm

al file compresso prova a dare il nome:

miofile.htm.gz

:master: se ricordo bene dovrebbe vedersi bene anche con winzip

[webdevaster]

perfetto!

grazie mille!