Omdøb Upload fil

Du kan bruge SaveAs parameteren!

File.SaveAs "c:\path\" & Session("brugernavn")

//>Rune

Istedet for:
Upload.SaveVirtual("/usersystem/profilimg")
???

Her har du iøvrigt en total reference over alle objekter:

http://www.aspupload.com/object_file.html

//>Rune

Kan man så ik skrive:

Upload.SaveVirtualAs("/usersystem/profilimg")

Nej, ik' helt, men du skal jo huske at have dit "nye" filnavn med:

File.SaveAsVirtual "/path/" & File.FileName

Men virkede mig første eksemple ikke?

//>Rune

Hmm, der virker ikke nu den skriver:

The parameter is incorrect.

Syntes det er lidt underligt fordi i Adressen står der:
XXX/usersystem/uploadbillede.asp?error=Din%20fil%20type%20er%20ikke%20.jpg%20eller%20jpeg%20!

Jeg har skrevet:
Upload.SaveAsVirtual "/usersystem/profilimg/" & session("test")
fordi ellers gemmer den så ikke bare som, det normale fil navn?

Jov, det er jo det jeg har prøvet at give eksempler på hele tiden :-)

Men har du fået det til at virke?

//>Rune

Har svært ved at vente og har prøvet din måde, og lavet lidt om i det osv. !

men det virker ikke kun med:
File.SaveAsVirtual "/path/" & File.FileName

PRøv at lave din kode om til dette:


<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.SetMaxSize 100000 , true
On Error resume next

Count = Upload.Upload.SaveToMemory

IF Err.Number = 8 then
response.redirect "uploadbillede.asp?error=Din fil fylder mere end 100 kb. !"
end if

'Tjek om filene er uploaded
if Count = 1 then
  '// tjekker om filen er JPG
  Set File = Upload.Files(1)
  If File.ImageType <> "JPG" or File.ImageType <> "JPEG" Then
    response.redirect "uploadbillede.asp?error=Din fil type er ikke .jpg eller jpeg !"
  End If
  nytNavn = Server.MapPath("/usersystem/profilimg/" & "NYFILNAVN.jpg")
  File.SaveAs nytNavn
 

Response.Write "<b>Filen</b> er gemt"
end if
%>

Har du prøvet sådan:

File.SaveAs Server.MapPath &"/path/" & Session("brugernavn")

eller

File.SaveAsVirtual Server.MapPath &"/path/" & Session("brugernavn")

Tror jeg skal opdater siden noget ofter :-)

Eagleeye: jeg prøvede lige dit svar, og nu gemmer den ikke filen og den skriver heller ikk nogen fejl !

Tror det har noget at gøre med at FILE1 ikke bliver angivet i koden !

    <FORM METHOD="POST" ENCTYPE="multipart/form-data" ACTION="Uploadbillede.asp?mode=gem">
        <p align="center">
        <INPUT TYPE=FILE SIZE=25 NAME="FILE1"><br><INPUT TYPE=SUBMIT VALUE="Gem billede">
    </FORM>

Prøv med dette styk kode:
Hvor onerror er slået fra og der er rette i en linje:


<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.SetMaxSize 100000 , true
On Error resume next

Count = Upload.Upload.SaveToMemory

IF Err.Number = 8 then
response.redirect "uploadbillede.asp?error=Din fil fylder mere end 100 kb. !"
end if

'Tjek om filene er uploaded
if Count = 1 then
  '// tjekker om filen er JPG
  Set File = Upload.Files("FILE1")
  If File.ImageType <> "JPG" or File.ImageType <> "JPEG" Then
    response.redirect "uploadbillede.asp?error=Din fil type er ikke .jpg eller jpeg !"
  End If
  nytNavn = Server.MapPath("/usersystem/profilimg/" & "NYFILNAVN.jpg")
  File.SaveAs nytNavn
 

Response.Write "<b>Filen</b> er gemt"
end if
%>

hmm damn prøver igen..

<%
Set Upload = Server.CreateObject("Persits.Upload.1")
Upload.SetMaxSize 100000 , true
'On Error resume next

Count = Upload.Upload.SaveToMemory

IF Err.Number = 8 then
response.redirect "uploadbillede.asp?error=Din fil fylder mere end 100 kb. !"
end if

'Tjek om filene er uploaded
if Count = 1 then
  '// tjekker om filen er JPG
  Set File = Upload.Files("FILE1")
  If File.ImageType <> "JPG" or File.ImageType <> "JPEG" Then
    response.redirect "uploadbillede.asp?error=Din fil type er ikke .jpg eller jpeg !"
  End If
  nytNavn = Server.MapPath("/usersystem/profilimg/" & "NYFILNAVN.jpg")
  File.SaveAs nytNavn
 

Response.Write "<b>Filen</b> er gemt"
end if
%>

Jeg får denne fejl:

Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'Upload'

/usersystem/Uploadbillede.asp, line 55


Linie 55 = Count = Upload.Upload.SaveToMemory

Den har jeg ændret til: Count = Upload.SaveToMemory

og nu skriver den ingen fejl, men den uploader heller ik !

Skriver den ?

Filen er gemt

Nej den gør den ikke !

Fik ik løst det ! lukker...