w=rs("width"):h=rs("height")
m=w/130:n=h/75
if w>=130 or h>=75 then
if m>n then
w1=130:h1=h/m
elseif m<n then
h1=75:w1=w/n
else
w1=130:h1=75
end if
else
w1=w:h1=h
if w<>0 or h<>0 then w1=130:h1=75
end if
dim fh
fh=h1
response.Write("<a href=javascript:winshow('sbturnshow.asp?id="&rs("id")&"')>")
response.Write ("<img src='"&rs("imgpath")&"'")
response.Write (" height='"&fh&"' width='"&w1&"' border='0'>")
response.Write("</a>")