Avatar billede labanen Nybegynder
30. december 2004 - 18:42 Der er 8 kommentarer og
1 løsning

File objekt og upload. Tjek om der er uploadet en fil

hej Eksperter

jeg har et problem i et script, jeg kan godt få det til at virke nå der uploades en fil. Men mit script giver mulighed for at scriptet kan køres uden at en fil uploades. Det skal bruges til at postere nyheder med og uden billeder.

denne kode virker :
  Set Upload = Server.CreateObject("Persits.Upload.1")
  Count = Upload.Save("d:\home\underducksdk\www\pics")
  Set File = Upload.Files(1)
  Billedenavn = File.FileName

Den skal udbygges til at variablen Billedenavn  får værdien "No" hvis der ikke er uploadet noget billede.

Lidt a´la dette, som dog ikke virker(med mindre man uploader et billede) :
  Set Upload = Server.CreateObject("Persits.Upload.1")
  Count = Upload.Save("d:\home\underducksdk\www\pics")
  Set File = Upload.Files(1)
  Billedenavn = File.FileName
  If Billedenavn = "" then
    Billedenavn = "No"
  end if

Er der nogen der kan hjælpe mig ? mange point for et hurtigt svar.
Avatar billede websam Nybegynder
30. december 2004 - 19:20 #1
Jeg mener ikke at kan huske at du kan omdøbe filnavnet med det upload komponent du benytter, men er ikke 100 % sikker !

/Websam
Avatar billede labanen Nybegynder
30. december 2004 - 19:24 #2
det er jeg heller ikke interesseret i. JEg er interesseret i at få en variabel til at skifte indhold afhængigt om en fil er blevet uploadet eller ej.
Avatar billede labanen Nybegynder
30. december 2004 - 19:25 #3
"Billedenavn" variablen skal have værdien "No" hvis der ikke er uploadet et billede ellers skal den indeholde filnavnet.
Avatar billede websam Nybegynder
30. december 2004 - 19:29 #4
Ok hvad lyder fejlmeddelsen på ?

/Websam
Avatar billede labanen Nybegynder
30. december 2004 - 19:31 #5
Siden kan ikke vises
Der er problemer med den side, du prøver at åbne, og den kan ikke vises.

--------------------------------------------------------------------------------

Prøv følgende:

Åbn www.underducks.dk hjemmesiden og søg efter links til de oplysninger, du vil have.
Klik på knappen  Opdater, eller prøv igen senere.

Klik på  Søg for at søge efter oplysninger på Internettet.
Du kan også se en liste over relaterede websteder.




HTTP 500 - Intern serverfejl
Internet Explorer
Avatar billede websam Nybegynder
30. december 2004 - 19:40 #6
Hvis ikke der står andet skal du lige gå op under Funktioner > Internetinstillinger og vælge fanen advanceret i rækken skal du fjerne fluebenet ud for Vis meddelelse om uskadelig HTTP fejl så får du en fejlkode vist og i hvilken linie det er galt :o)

/Websam
Avatar billede labanen Nybegynder
30. december 2004 - 19:46 #7
ok jeg fandt dog en løsning i mellemtiden... for god ordens skyld, så kan man gøre det således :

Billedenavn = "No"
  Set Upload = Server.CreateObject("Persits.Upload.1")
  Count = Upload.Save("d:\home\underducksdk\www\pics")
  If Not Upload.Files("FILE1") Is Nothing Then
    Set file = Upload.Files("FILE1")
    Billedenavn = File.FileName
  end if


tak for tricket med fejlkodevisning... jeg havde glemt at slå det til efter jeg fik sp2.

Godt nytår :p
Avatar billede labanen Nybegynder
30. december 2004 - 19:53 #8
lukker lige
Avatar billede websam Nybegynder
30. december 2004 - 20:42 #9
Hmmmm......det var ikke meget du kunne undvære for at jeg brugte noget tid på at finde en løsning til dig !

/Websam
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester