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.
Flg. script genneløber et givet bibliotek, (c:\inetpub\wwwroot), finder den en billedfil smider den billedet ud på siden som thumbnail..
<% dim fso, folder, filer Set fso = CreateObject("Scripting.FileSystemObject") Set folder = fso.getFolder("c:\inetpub\wwwroot\")
for each filer in folder.files if fso.getExtensionName(filer) = "jpg" or fso.getExtensionName(filer) = "gif" then Response.write "<img width='100' height='90' src='" & fso.getFileName(filer) & "'>" end if Next %>
Prøv at køre koden og lav de ændringer du ønsker, det virker i hvertfald her
Longshanks: Sådan kan man selvfølgelig også klare det, men man skal være opmærksom på, at det bremser afviklingen af siden væsentligt, hvis der er tale om store billeder. Den resizer jo ikke noget, eller genererer "rigtige" thumbnails, men granted - det virker da :-)
Ok, det lyder sgu meget interessant hvis det kan lade sig gøre, at ASP genererer egne thumbnails, se det kunne man kalde en automatisering af en webside :)
Det kan lade sig gøre, hvis man f.eks har installeret AspImage på serveren - du kan desværre (ikke mig bekendt i hvert fald) gøre det med "ren" asp - dvs. uden komponenter involveret...
surfer lidt på nettet omkring emnet, det eneste jeg finder er rigtigt nok aspImage, eller at det skal gøres i .NET. Jeg kan dog godt lave en løsning i JAVA, men det hjælper jo nok ikke det helt store :)
Determine the image size of the image without decompressing the image. Load and decompress jpg, gif or bmp image types. Change the image's size Draw text on the image Save a new copy of the image in compressed jpeg format Obtain the EXIF tags from an image
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.