<%
dim img
if request("sort_id")<>"" then
sid=request("sort_id")
if isnumeric(sort_id) then
set rs=server.createobject("adodb.recordset")
sql="select sort_remark from sort where sort_ID="&cstr(sid)
rs.open sql,conn,1,1
if not (rs.eof and rs.bof) then
img=rs("sort_remark")
else
img="images/2006.gif"
end if
rs.close
set rs=nothing
else
img="images/2006.gif"
end if
else
img="images/2006.gif"
end if
%>