SaveAsVirtual en AspUpLoad

eduyo · #1 (**permalink**) 04/05/2007, 17:34

Hola, el problema que tengo es el siguiente.
Tengo q subir imagenes al servidor por medio de un form, para lo cual uso el AspUpload (ya q es el q tiene instalado el server), pero quiero q al subirlo guardarlo con otro nombre, si ejecuto UpLoad.SaveVirtual("/imagenes") me funciona correcto pero lo guarda con el nombre q tenia ¿Como se le pasan los parametros a SaveAsVirtual. he probado con SaveAsVirtual("/imagenes"& newname) donde newname es una variable con el nombre q quiero, pero me da error.
Aclaro q uso SaveVirtual xq el server tiene deshabilitada la opcion de usar Save y me dijeron q use SaveVirtual.

Shiryu_Libra · #2 (**permalink**) 05/05/2007, 10:04

pero que error es el que te arroja..
puedes poner el codigo con el que sobreescribes???

eduyo · #3 (**permalink**) 05/05/2007, 15:40

El codigo que uso y me funciona es este
<%
Set Upload = Server.CreateObject("Persits.Upload")
Count = Upload.SaveVirtual("/ejemplos")
Response.Write Count & " archivos(s) subidos correctamente en /ejemplos"
Set Upload = Nothing
%>
Ahora bien, esto lo guarda con el mismo nombre q tiene el archivo, lo q preciso es cambiarle el nombre al subirlo, por lo q tengo q usar (creo) Save AsVirtual, pero no se como pasarle los parametros (path y nuevo nombre), el cual estaria guardado en una variable cargada praviamente.
El error q me tira el server es en realidad error 500 (interno del servidor)

a n g e l u s · #4 (**permalink**) 06/05/2007, 03:14

<%
on error resume next
Set Upload = Server.CreateObject("Persits.Upload")

Count = Upload.Save

if err<> 0 then
response.write "hay un error al subir el archivo "&err.description

else

if Count = 0 then
response.write("debe ingresar un archivo")

else

'Creas el directorio si no existe
Upload.CreateDirectory "c:\upload\fecha_"&date(), True

'Obtienes el nombre del archivo
Set File1 = Upload.Files("FILE1")

'Colocas el nombre que deseas
Name = "Nuevo_"&date()

'Lo Guardas
File1.SaveAs "c:\upload\Folder1\" & Name & File1.Ext

Response.Write "El Archivo Fue Guardado en :" & File1.Path & "<BR>"
end if

end if
%>

Jmarytnc0507 · #5 (**permalink**) 13/06/2008, 12:09

Cita:

Iniciado por a n g e l u s

<%
on error resume next
Set Upload = Server.CreateObject("Persits.Upload")

Count = Upload.Save

if err<> 0 then
response.write "hay un error al subir el archivo "&err.description

else

if Count = 0 then
response.write("debe ingresar un archivo")

else

'Creas el directorio si no existe
Upload.CreateDirectory "c:\upload\fecha_"&date(), True

'Obtienes el nombre del archivo
Set File1 = Upload.Files("FILE1")

'Colocas el nombre que deseas
Name = "Nuevo_"&date()

'Lo Guardas
File1.SaveAs "c:\upload\Folder1\" & Name & File1.Ext

Response.Write "El Archivo Fue Guardado en :" & File1.Path & "<BR>"
end if

end if
%>

lo q estas haciendo en ese codigo es para un directorio virtual .un favor me podrias ayudar por lo q quiero es guardar una imagen en ruta especificada luego coger el nombre del archivo guardado y solo el nomre guardarla en mi base de datos estoy trabajando con MSQL y me sale error mi tabla se llama banner y tiene dos campos uno es imagen(-->es donde ira el nombre) formato(--> donde el usuario ingresara el tipo de formato)
lo he hecho de mil y una forma pero no me saleeeee serias tana amable de ayudarme
--esta es la pagina donde trato de insertar el nombre de imagen y tipo de formato
gracias mi correo es [email protected]
les estaria agradeciada eternamente



<html>
<body>
<%

Set Upload = Server.CreateObject("Persits.Upload")
Upload.save"C:\Inetpub\petroperu_m\asp\Proyecto1_L ocal\images"

Set File1 = Upload.Files("txtRuta")
response.Write(" nombre del archibo" + file1)'-->cuando quiero q me muestre el nombre ahi me sale error

'set nombre= cstr(file.filename)
set formato=Upload.Form("cboFormato")

If Not File1 Is Nothing Then

SQL = "INSERT INTO banner(Imagen,formato)values('"& File1 &"','" & formato & "')"

File1.ToDatabase oConn , SQL
Response.Write ("Archivo guardado")
Else
Response.Write("File not selected")

End If
%>
</body>
</html>