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
<!--#INCLUDE VIRTUAL="/AdminWeb/Tools/Conexion.inc"-->
<!--#INCLUDE VIRTUAL="/AdminWeb/Tools/VarPublic.inc"-->
<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>