<%
sub modok() '修改成功
response.write "<script language=javascript>alert('更改成功!');window.location.href='"&Request.ServerVariables("HTTP_REFERER")&"';</script>"
response.End
end sub
sub delok() '删除成功
response.write "<script language=javascript>alert('删除成功!');window.location.href='"&Request.ServerVariables("HTTP_REFERER")&"';</script>"
response.End
end sub
%>