% function escape(arg) if IsNull(arg) then escape = "" exit function end if dim tmp, src, c src = cstr(arg) tmp = "" for i = 1 to len(src) c = mid(src, i, 1) if c = ">" then tmp = tmp & ">" elseif c = "<" then tmp = tmp & "<" elseif c = "&" then tmp = tmp & "&" elseif c = chr(&h22) then tmp = tmp & """ else tmp = tmp & c end if next escape = tmp end function %>
<%=escape(ext.baseLocation)%>から抽出
<% if ext.config.URLLimit then %>URLの前方一致条件: <%=escape(ext.config.URLLimitPrefix)%>
<% end if if ext.config.img or ext.config.imgLink then %>該当数: <%=ext.img.length()%>
<% for each url in ext.img %>該当数: <%=ext.anchor.length()%>
該当数: <%=ext.iframe.length()%>
<% for each url in ext.iframe %> <% next end if %>