FreeAspUpload no cambia el nombre

[JJF]

FELICIDADES!!

Hola tengo el codigo de freeaspupload que no cambia el nombre del fichero aunque dice que suí lo debería hacer.

Aquí una parte indicada por el sitio oficial donde debería cambiar el nombre:

Código HTML:

[CODE]

    Dim Counter
    Dim Flag
    Dim strTempFileName
    Dim FileExt
    Dim NewFullPath
    dim objFSO, p
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Counter = 0
    p = instrrev(FileName, ".")
    FileExt = mid(FileName, p+1)
    strTempFileName = left(FileName, p-1)
    NewFullPath = strSaveToPath & "\" & FileName 
    Flag = true



    Do Until Flag = True
        If objFSO.FileExists(NewFullPath) = False Then
            Flag = True
            GetFileName = Mid(NewFullPath, InstrRev(NewFullPath, "\") + 1)
        Else
            Counter = Counter + 1
            NewFullPath = strSaveToPath & "\" & strTempFileName & Counter & "." & FileExt
        End If
    Loop
End Function 

[/CODE]

Al instante de cargar tengo una sesion de nombre "cod" que se me ocurrió sumarla al nombre del fichero, pero no me resulta, ya probé varias formas y no se me ocurre otra.

Cómo solucionarlo? Porque el upload me reemplaza el archivo con el mismo nombe que ya está en el server .

He buscado y encontré varias formas pero no sé implementarlas correctamente.

Gracias.

[IsaBelM]

he estado mirando una versión antigua que tengo y parece que es editando Public Property Get FileName(). es todo lo que puedo decierte

[JJF]

Muchas gracias, a partir de tu idea pude lograrlo, quien quiera solicitarlo, [email protected]