Avatar billede Slettet bruger
10. januar 2005 - 16:48 Der er 7 kommentarer og
1 løsning

Udregn størrelse KB - MB på filer

Er der en der har et script der kan udregn størrelsen på filer jeg har størrelse på filerne i en db og de er i byte

Det jeg gerne vil er at de skal om regnes til kb eller mb alt efter hvor stor de..........
Avatar billede steffansteffan Nybegynder
10. januar 2005 - 17:14 #1
Hvorfor så ikke bare, dividere det med 1000 altså det udtræk du kan lave fra databasen?

Altså:
billede1.jpg
52000 Byte
52 KB
Avatar billede mortvader Nybegynder
10. januar 2005 - 17:16 #2
Man skal dividere med 1024, hvis det skal være helt korrekt ;)

Altså:
billede1.jpg
52000 Byte
50,7 KB
Avatar billede steffansteffan Nybegynder
10. januar 2005 - 17:22 #3
hehe, ja det er rigtig glemmer jeg altid ;)
Avatar billede mortvader Nybegynder
10. januar 2005 - 17:38 #4
hvis man læser spørgsmålet grundigt, ville sådan et svar her måske være på sin plads:

size=int(objRs("size")/1024)
if size>1024 then
  size=int(size/1024)&" MB"
else
  size=size&" KB"
end if

..udelad int() hvis du vil have decimalerne med..
Avatar billede steffansteffan Nybegynder
10. januar 2005 - 17:47 #5
Her er et scripts der udskriver størrelsen for en fil, den udskriver godt nok ibyte nu, men du dividere bare med 1024 som vi har snakket om her:

<%
strBilledesti = rs("Billedesti")

file = Server.Mappath(StrBilledesti) 'her skal du så sætte URL'en til din fil ind
Set fso = CreateObject("Scripting.FileSystemObject")
Set filespec = fso.GetFile(file)
response.write filespec.Size&" byte."
%>
Avatar billede Slettet bruger
11. januar 2005 - 09:03 #6
mortvader liger du ikke lige et svar :) for det var lige det jeg var ude efter...

lige en lille ting mere hvis jeg nu også vil have den til at skrive byte ud altså hvis den ikke er stor nok til at være kb hvordan kommer jeg det på??????
Avatar billede mortvader Nybegynder
11. januar 2005 - 13:34 #7
her:

size=int(objRs("size"))
if size<1024 then
  size=size&" B"
else
  size=int(size/1024)

  if size>1024 then
    size=int(size/1024)&" MB"
  else
    size=size&" KB"
  end if
end if
Avatar billede Slettet bruger
11. januar 2005 - 14:27 #8
Mange tak....
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