ok.. her er den fulde kode...
<html>
<head>
<title>Image Modification Demo</title>
</head>
<body bgcolor=white>
<center>
<p><br></p><p><br></p>
<form name="frmkeyword" method="post">
<%
rem **********************************************************************
rem * Instantiate the object
rem **********************************************************************
Set Image = Server.CreateObject("AspImage.Image")
rem **********************************************************************
rem * If AutoSize is false then any text that exceeds the current image
rem * will be clipped.
rem **********************************************************************
Image.AutoSize = false
rem **********************************************************************
rem * Load a BMP. You can load JPG and BMP files
rem **********************************************************************
Image.LoadImage("d:\www2\mb\db\txtz2.jpg")
rem **********************************************************************
rem * Set some font properties, set the X and Y location and write some
rem * text out to the loaded image
rem **********************************************************************
Image.FontColor = vbWhite
Image.ThreeDColor = &h80000011
Image.Italic = False
Image.Bold = True
Image.FontName = "Arial"
Image.FontSize = 22
Image.PadSize = 4
Image.TextAlign = 6
Image.X = 195
Image.Y = 28
Image.MaxY = 100
Image.MaxX = 400
rem **********************************************************************
rem * Set some font properties, set the X and Y location and write some
rem * 3D'd text out to the loaded image
rem **********************************************************************
strKeyword = replace(request.form("navnet"), "'", "''")
Image.TextOut strKeyword, Image.X, Image.Y, true
rem **********************************************************************
rem * Set the physical path for the FileName we are going to save
rem * NOTE: You should gen the filename dynamically for multiuser usage
rem **********************************************************************
Image.FileName = "d:\www2\mb\db\lman.jpg"
rem **********************************************************************
rem * Save the image
rem **********************************************************************
Image.SaveImage
rem **********************************************************************
rem * Now write the <img src> tag out for the browser to pick up
rem **********************************************************************
Response.Write "<img src=""\db\lman.jpg""><br>"
rem **********************************************************************
rem * These properties give eval/registration information for the component
rem **********************************************************************
rem Response.Write "<p>Expires: " & Image.Expires
rem Response.Write "<br>Version: " & Image.Version
rem Response.Write "<br>Registered To: " & Image.RegisteredTo
Set Image = nothing
%>
<div align="center">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<div align="center">
<input type="text" name="navnet" value="<%=request.form("navnet")%>">
<br>
<% Response.Write strKeyword %> </div>
</td>
</tr>
<tr>
<td>
<div align="center">
</div>
</td>
</tr>
</table>
<br>
<input type="submit" value="Start søgning" class="onClick" name="submit">
</div>
</form>
</center>
</body>
</html>
jeg bruger aspimage og har en ide om at kunne masse producere det samme billede med forskellige tekster på... egentlig bare for sjov, men nu er jeg blevet stædig!
nu skal det bare virke
jeg kan se at når jeg trykker på submit knappen så ændre strKeyword sig det kan jeg se med
<% Response.Write strKeyword %> </div>
men den ændre sig ikke på billedet..
hvad hulen kan der være galt??
jeg fordobler gerne point :-)
