dm.asp

Follow me超级搜索引擎 源码

<script>
<!--
// 自动 COPY 代码开始
function MM_findObj(n, d) { //v4.0
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && document.getElementById) x=document.getElementById(n); return x;
}
function JM_cc(ob){
	var obj=MM_findObj(ob); if (obj) { 
	obj.select();js=obj.createTextRange();js.execCommand("Copy");}
	alert("复制成功！您可以将此段代码粘贴到网页中！");
}

// 自动 COPY 代码结束
//-->
</script>
<script>
function runcodes()
{
codes=code.value;
a=window.open()
a.opener=null
a.document.write(codes)
a.document.close()
}
</script>
<%
baseurl="http://"+Request.ServerVariables("SERVER_NAME")+Left(Request.ServerVariables("PATH_INFO"),instrRev(Request.ServerVariables("PATH_INFO"),"/"))
%>
<textarea name="code" style="COLOR: #666666;width:600px;height:30px;overflow-x:hidden;">
<form target="_blank" method="get" action="<%=baseurl%>sou.asp"> <input style="width:128px;" name="search" type="text" value="请输入关键字" onmouseover="this.focus()" onblur="if (value ==''){value='请输入关键字'}" onfocus="this.select()" onclick="if(this.value=='请输入关键字')this.value=''"> <select style="width:78px" name="want"><option selected="selected" value="">免费电影</option><option value="s1">电影下载</option><option value="s2">百度视频</option><option value="s3">搜狗视频</option><option value="s4">优酷视频</option><option value="s5">土豆视频</option><option value="s6">CC视频</option></select> <input style="line-height:130%;height:22px;width:39px" value="搜索" type="submit"></form>
</textarea><input type="Submit" name="Submit" value="复制代码" id="btn_submit" onClick=JM_cc("code")><input name="Submit" type=Submit onclick=runcodes();alert("效果预览不具有任何搜索功能，若需要搜索请将该搜索框代码粘贴到您的网页中！"); value="效果预览"><BR><BR>
预览效果:<form target="_blank" method="get" action="<%=baseurl%>sou.asp"> <input style="width:128px;" name="search" type="text" value="请输入关键字" onmouseover="this.focus()" onblur="if (value ==''){value='请输入关键字'}" onfocus="this.select()" onclick="if(this.value=='请输入关键字')this.value=''"> <select style="width:78px" name="want"><option selected="selected" value="">免费电影</option><option value="s1">电影下载</option><option value="s2">百度视频</option><option value="s3">搜狗视频</option><option value="s4">优酷视频</option><option value="s5">土豆视频</option><option value="s6">CC视频</option></select> <input style="line-height:130%;height:22px;width:39px" value="搜索" type="submit"></form>