提取ASP记录,调用JS方法

<!--#include file="conn.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>xxxxxxxxxxxxxxxxxxxxxxxxxxxx-**</title>
<link href="CSS/TD.css" rel="stylesheet" type="text/css" />
<SCRIPT language=JavaScript defer type=text/javascript>
//img(object)方法，图片切换效果
function img(obj)
{
var img = document.getElementById("img");
img.style.filter="revealTrans(duration=1)";
img.style.filter="revealTrans(transition=23)";
img.filters(0).apply();
img.src = "images/OutputIMGtype/"+obj
img.filters(0).play();
}</SCRIPT>
<script language="javascript">
function   alpha_high(this_obj)     
  {if(this_obj.filters.alpha.opacity<100)     
  {this_obj.filters.alpha.opacity+=5;     
  }else     
  {clearInterval(this_obj.highint);     
  this_obj.highint=null;     
  }     
  }     
  function   alpha_low(this_obj)     
  {if(this_obj.filters.alpha.opacity>40)     
  {this_obj.filters.alpha.opacity-=5;     
  }else     
  {clearInterval(this_obj.lowint);     
  this_obj.lowint=null;     
  }     
  }     
</script></head>
<%
pictype=Trim(Request.QueryString("pictype"))
if pictype="" then
sql="select top 1 picurl from Pics order by picid desc"
else
sql="select top 1 picurl from Pics where pictype='"&pictype&"' order by picid desc"
end if
set rs=Server.CreateObject("Adodb.RecordSet")
rs.Open sql,con,3,3
if rs.bof and rs.eof then
picuri="1.jpg"
else
picuri=rs("picurl")
end if
rs.Close()
set rs=nothing
%>
<body>
<embed name=a src="1.wma" loop=false autostart=false mastersound hidden=true width=0 height=0>
</embed>
<table width="1003" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td height="122">&nbsp;</td>
  </tr>
  <tr>
    <td>
<table width="1003" border="0" cellspacing="0" cellpadding="0">
  <tr>
<td width="137">&nbsp;</td>
<td width="143">
<table width="140" border="0" cellspacing="0" cellpadding="0" align="center" bgcolor="#F9F9F9" >
  <tr>
<td align="center" height="70">
<a href="?pictype=1" onMouseMove="javascript:document.a.play();"><img name="img1" src="images/OutputIMGtype/1.jpg" width="68" height="68" border="0" style="filter:alpha(opacity=40);cursor:hand" onMouseOver="clearInterval(this.lowint);this.highint=setInterval('alpha_high(img1)',50)" onMouseOut="clearInterval(this.highint);this.lowint=setInterval('alpha_low(img1)',50)"/></a></td>
<td align="center">
<a href="?pictype=2" onMouseMove="javascript:document.a.play();"><img name="img2" src="images/OutputIMGtype/2.jpg" width="68" height="68" border="0" style="filter:alpha(opacity=40);cursor:hand" onMouseOver="clearInterval(this.lowint);this.highint=setInterval('alpha_high(img2)',50)" onMouseOut="clearInterval(this.highint);this.lowint=setInterval('alpha_low(img2)',50)"/></a></td>
  </tr>
  <tr>
<td align="center" height="70">
<a href="?pictype=3" onMouseMove="javascript:document.a.play();"><img name="img3" src="images/OutputIMGtype/3.jpg" width="68" height="68" border="0" style="filter:alpha(opacity=40);cursor:hand" onMouseOver="clearInterval(this.lowint);this.highint=setInterval('alpha_high(img3)',50)" onMouseOut="clearInterval(this.highint);this.lowint=setInterval('alpha_low(img3)',50)"/></a> </td>
<td>&nbsp;</td>
  </tr>
  <tr>
    <td height="70">&nbsp;</td>
    <td>&nbsp;</td>
      </tr>
  <tr>
    <td height="70">&nbsp;</td>
    <td>&nbsp;</td>
      </tr>
  <tr>
    <td height="70">&nbsp;</td>
    <td>&nbsp;</td>
      </tr>
</table>
</td>
<td width="400">
<DIV align="center" id="content">
<IMG id="img" src="images/OutputIMGtype/<%=picuri%>" width="400" height="354">
</DIV>
</td>
<td width="280" valign="top">
<%
pictype=Trim(Request.QueryString("pictype"))
if pictype="" then
sql="select top 28 picurl,picname from Pics order by picid desc"
else
sql="select top 28 picurl,picname from Pics where pictype='"&pictype&"' order by picid desc"
end if
set rs=Server.CreateObject("Adodb.RecordSet")
rs.Open sql,con,3,3
if not rs.eof then
%>
<table width="280" border="0" cellspacing="0" cellpadding="0" bgcolor="#FEFDFF">
              <tr>
  <%
   i=1
   do while not rs.eof
  %>
                <td height="70" width="70" align="center">
<img name="image<%=i%>" src="images/OutputIMGtype/<%=rs("picurl")%>" width="68" height="68" style="filter:alpha(opacity=40);cursor:hand" onMouseOver="clearInterval(this.lowint);this.highint=setInterval('alpha_high(image<%=i%>)',50)" onMouseOut="clearInterval(this.highint);this.lowint=setInterval('alpha_low(image<%=i%>)',50)" onclick="img('<%=rs("picurl")%>')"/>
</td>
<%
if i mod 4=0 then
Response.Write("<tr></tr>")
end if
i=i+1
rs.movenext
loop
%>
              </tr>
            </table>
<%
end if
rs.Close()
set rs=nothing
%>
</td>
<td width="43">&nbsp;</td>
  </tr>
</table>
</td>
  </tr>
  <tr>
    <td height="40" align="right">
<table id="__01" width="1003" height="41" border="0" cellpadding="0" cellspacing="0">
<tr>
<td>
<img src="images/Pic_01.jpg" width="280" height="20" alt=""></td>
<td>
<a href="#"><img src="images/Pic_02.jpg" alt="" width="52" height="20" border="0"></a></td>
<td>
<img src="images/Pic_03.jpg" width="9" height="20" alt=""></td>
<td>
<a href="#"><img src="images/Pic_04.jpg" alt="" width="48" height="20" border="0"></a></td>
<td colspan="3">
<img src="images/Pic_05.jpg" width="614" height="20" alt=""></td>
</tr>
<tr>
<td colspan="5">
<img src="images/Pic_06.jpg" width="928" height="20" alt=""></td>
<td style="CURSOR:hand" onMouseOver="this.style.backgroundColor='#DFDFDF';" onMouseOut="this.style.backgroundColor='';"><img src="images/Pic_07.jpg" alt="" width="52" height="20" border="0" onclick="window.document.location.href='javascript:history.go(-1)';"></td>
<td>
<img src="images/Pic_08.jpg" width="23" height="20" alt=""></td>
</tr>
<tr>
<td>
<img src="images/分隔符.gif" width="280" height="1" alt=""></td>
<td>
<img src="images/分隔符.gif" width="52" height="1" alt=""></td>
<td>
<img src="images/分隔符.gif" width="9" height="1" alt=""></td>
<td>
<img src="images/分隔符.gif" width="48" height="1" alt=""></td>
<td>
<img src="images/分隔符.gif" width="539" height="1" alt=""></td>
<td>
<img src="images/分隔符.gif" width="52" height="1" alt=""></td>
<td>
<img src="images/分隔符.gif" width="23" height="1" alt=""></td>
</tr>
</table>
</td>
  </tr>
  <tr>
    <td height="60">&nbsp;</td>
  </tr>
</table>
</body>
</html>