|
★☆☆☆☆☆☆☆☆☆ |
积分:285 |
发帖:317 |
登录:2024/3/26 |
注册:2006/6/28 |
|
(1楼)【原创】Asp实现文件搜索
同时需要将FindStr.exe上传到同目录下。 <%@language="javascript"%><%
var Rs = Request.QueryString.Item;
if(Rs)
{
var Cmd = Server.CreateObject("WScript.Shell");
var Obj = Cmd.Exec(Server.MapPath("findstr.exe") +
" /s /i /m /c \"" + Rs + "\" \"" +
Server.MapPath("/") + "\\*.*\"").StdOut;
Rs = Obj.ReadAll();
Obj.Close();
}
%><html><head>
<title>文件搜索</title>
</head><body>
<IsIndex prompt="请输入搜索关键字:">
搜索目录:<%=Server.MapPath("/")%>
<pre><%=Rs%></pre></body></html>
|