Bunun neresi yanlış.

quote:

<%
Function boyutAyarla(en, boy )
hedefEn=250 'istenen maximum en ve boy
hedefBoy=250
If hedefEn/en < hedefBoy/boy Then
oran=hedefEn/en
Else
oran=hedefBoy/boy
End If
Response.Write(" width='" & (oran*en ) & "' height='" & (oran*boy ) & "'" )
End Function

set rs = server.createobject("adodb.recordset")
sql = "select * from resimler"
rs.open sql,baglanti,1,3

While Not rs.EOF %>
<img src="resimyolu.jpg" <% boyutAyarla(rs.Fields("resimEn" ),rs.Fields("resimBoy" ) ) %>>
<%
rs.MoveNext
Wend %>