日期:2014-05-16  浏览次数:20370 次

脚本:删除按钮没反应?菜鸟求救···
脚本调用处理函数出问题了,菜菜求大虾指点


  <TABLE width="98%" border="0" cellpadding="4" cellspacing="1" bgcolor="#336699"> 
  <tr height=25 > 
  <TD width="106" align="center" background="images/pics/tile_sub.gif"><font color="#FFFFFF"><b>ID号</b></font></TD> 
  <TD width="712" align="center" background="images/pics/tile_sub.gif"><font color="#FFFFFF"><b>信息标题</b></font></TD> 
  <TD width="127" align="center" background="images/pics/tile_sub.gif"><font color="#FFFFFF"> 
  <input name="submit" type='submit' onClick="deleteannounce(<%=cstr(rs("newsid"))%>)" value='删除'> 
  </font></TD> 
  </TR> 
  <%do while not rs.eof%> 
  <tr height="20"> 
  <td width="106" height="28" align="center" bgcolor="#ffffff"><font face="Arial"><b><%=rs("newsid")%></b></font></td> 
  <td width="712" bgcolor="#ffffff"><a href=webinfo_edit.asp?Newsid=<%=rs("Newsid")%>><%=rs("title")%></a></td> 
  <td width="127" align="center" bgcolor="#ffffff"> <input name='id' type='checkbox' id="id" value='<%=cstr(rs("newsid"))%>' <%if rs("Newsid")=67 then response.write "disabled" end if%>></td> 
  </tr> 
  <% i=i+1
  if i>=MaxPerPage then exit do
  rs.movenext
  loop
%> 
</table>
</from> 
</center> 
<%

end sub
' 定义showpage函数,用于分页显示
function showpage(totalnumber,maxperpage,filename) 
  dim n 
  if totalnumber mod maxperpage=0 then 
  n= totalnumber \ maxperpage 
  else 
  n= totalnumber \ maxperpage+1 
  end if  
  if CurrentPage<2 then 
  response.write "<table border=0 width=100% cellspacing=0 cellpadding=0 bgcolor=#e8f4ff>" 
  response.write "<tr height=30>"
  response.write "<td align=left>"
  response.write "共<font color=#ff6600><b>"&n&"</b></font>页&nbsp;第<font color=#ff6600><b>"&CurrentPage&"</b></font>页&nbsp;共检索到<font color=#ff6600><b>"&totalnumber&"</b></font>条相关信息</td>" 
  response.write "<td align=right>"
  response.write "【最前页】【上一页】" 
  else 
  response.write "<table border=0 width=600 cellspacing=0 cellpadding=0 bgcolor=#e8f4ff>"
  response.write "<tr height=30>"
  response.write "<td align=left>"
  response.write "共<font color=#ff6600><b>"&n&"</b></font>页&nbsp;第<font color=#ff6600><b>"&CurrentPage&"</b></font>页共检索到<font color=#ff6600><b>"&totalnumber&"</b&g