1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42
| <html>
<head>
<script type=text/javascript language=javascript>
function zoom_plus(){
if (document.getElementById('lien').title=='petite image'){
document.getElementById('monid').innerHTML="<img src='../upload/<%=img%>' width='200' height='200'>";
document.getElementById('lien').title='grande image';
}
else{
document.getElementById('monid').innerHTML="<img src='../upload/<%=img%>' width='100' height='100'>";
document.getElementById('lien').title='petite image';
}
}
</script>
</head>
<body>
<%
'pour afficher l image
dim Repertoire
dim item
dim rstImg
set rstImg = conn.execute("SELECT Image FROM TableMesure where Nom_Wafer ='" &
RS("Nom_Wafer") & "' ")
img = rstImg("Image")
Set FSO = CreateObject("Scripting.FileSystemObject")
Set Repertoire = FSO.GetFolder(server.MapPath("/intranet/upload/") & "\")
if FSO.FileExists(Server.MapPath("/intranet/upload/" & img)) then%>
<a href=javascript:zoom_plus()>zoom</a><a title='petite image' href='#'
id='lien'><div id='monid'><img src="../upload/<%=img%>" width="100" height="100"></div></a>
<%else%>
<span class="textBody">Pas d image pour ce projet
<%
end if
Set Repertoire = nothing
Set FSO = nothing
rstImg.close
set rstImg = nothing
%>
</body>
</html> |