% option explicit %>
<%Dim Connect, rs, Query, Con, valueid
valueid=Request.QueryString("val")
Set Con = getADBConnection()
Set rs = getAQueryRecordSet("Select * from PERSONALDESC WHERE ID=" & valueid, con)
%>
Fishery Consultant - Fishery Consultant Bio and CV. Fisheries Aquaculture Consultant
<%If rs("Image1")="y" Then%>

.jpg">
<%End If%>
<%If rs("CV")="y" Then
%>
.pdf">DownloadCV
<%
End If%>
<%=rs("Name")%>
<%=rs("JobTitle")%>
<%If rs("PERSONALDESC")<>"" Then
Response.Write(rs("PERSONALDESC"))
end If%>
Back to the Team
<%
rs.Close
Set rs = Nothing
Con.Close
Set Con = Nothing
%>