I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
jeg er ikke helt sikker på hvad dit problem er?? kender ikke så meget til Persits, men du skriver Jpeg.Width = 100 lige før du gemmer billedet, så er det vel ikke underligt at billedet er 100 bredt når du gemmer det.
Du gemmer rigtig nok dit billede først med en størrelse på 235px - dernæst åbner du det samme billede igen - og resizer til 100px - derved bliver 235px billedet overskrevet.
Løsning: Efter du har uploadet billedet bliver du nødt til at tage en kopi af det vha Filesystem objektet - og dernæst resize kopien
F.eks
dim OrgImage, CopyIMage
'Creating FileSystemObject Set objFS = CreateObject("Scripting.FileSystemObject")
'OrgImage er billedet lige uploadet OrgImage = "d:\web\billeder\DetUploadedebilledesNavn.jpg" CopyIMage = "d:\web\billeder\DetUploadedebilledesNavn_Thumb.jpg"
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.