Ik slaag er maar niet in om het volgende te doen:
Ik wil een ASP pagina maken die een afbeelding (gif) weergeeft. Maar de afbeelding moet niet gewoon weergegeven worden (dus niet simpel weg adhv een img tag in html), maar moet zelf in een image tag gebruikt kunnen worden.
Dus in een html bestand moet bvb kunnen staan:
[img]"afbeelding.asp?a=12"[/img]
en die afbeeling.asp pagina gaat dus aan de hand van de meegeleverde variabele "a" een afbeelding uit de dbase gaan halen en gaan streamen naar de html pagine. Voor de html pagina is het dus net alsof afbeelding.asp?a=12 een echte afbeelding is.
Ik weet dat het met streaming gaat en dat ik de content type van de pagina op mime type "image/gif" moet zetten, maar ik slaag er niet in om de echte gif zijn gegevens te laten streamen naar de stream in de asp pagina.
Dit is wat ik totnogtoe heb (de verwerking van de variabele "a" wordt er later ingestoken, ik wil eerst dit kunnen laten werken):
Heeft iemand enig idee wat er fout loopt?
Ik wil een ASP pagina maken die een afbeelding (gif) weergeeft. Maar de afbeelding moet niet gewoon weergegeven worden (dus niet simpel weg adhv een img tag in html), maar moet zelf in een image tag gebruikt kunnen worden.
Dus in een html bestand moet bvb kunnen staan:
[img]"afbeelding.asp?a=12"[/img]
en die afbeeling.asp pagina gaat dus aan de hand van de meegeleverde variabele "a" een afbeelding uit de dbase gaan halen en gaan streamen naar de html pagine. Voor de html pagina is het dus net alsof afbeelding.asp?a=12 een echte afbeelding is.
Ik weet dat het met streaming gaat en dat ik de content type van de pagina op mime type "image/gif" moet zetten, maar ik slaag er niet in om de echte gif zijn gegevens te laten streamen naar de stream in de asp pagina.
Dit is wat ik totnogtoe heb (de verwerking van de variabele "a" wordt er later ingestoken, ik wil eerst dit kunnen laten werken):
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
| <%@LANGUAGE="VBSCRIPT"%>
<%
Response.Expires = 0
Response.Buffer = true
Response.Clear
Response.ContentType = "image/gif"
Set Afbeelding = Server.CreateObject("ADODB.Stream")
Afbeelding.Open
Afbeelding.LoadFromFile("c:\test.gif")
Response.BinaryWrite Afbeelding.Flush
'Deze regel klopt niet
Afbeelding.Close
Set Afbeelding = Nothing
Response.End
%> |
Heeft iemand enig idee wat er fout loopt?