Cita:
Iniciado por JuanRAPerez 
suerte
en tu accion
buenas tardes queria ver si me podria ayudar e estado investigando por todos lados y nadie me da respuesta!!! mire mi codigo es el siguiente mi html:
<BODY>
<center><b><font color="black">BUSQUEDA DE CHFS</b></center>
<form method="post" action="buscar5.asp">
<center><b><font color="black">No. de Serie:</font>
<input type="text" name="busqueda" /> <p /></b></center>
<center><input type="submit" value="Buscar"></center>
</form>
es donde el usuario ingresa el archivo a biscar y mi php es este
Código PHP:
<%
Dim fso, dato
dato = Request.Form("busqueda")
if dato ="" then
Response.Write ("<center><b><big>No se ingreso dato a buscar</big></b></center>")
else
'fso.FileExists ( dato & ".pdf") then
Set objFSO = CreateObject("Scripting.FileSystemObject")
objStartFolder = "C:\inetpub\wwwroot\cummins\CHFS\"
Set objFolder = objFSO.GetFolder(objStartFolder)
'response.write "<br>"&objFolder.Path&"<br>"&"<br>"
Set colFiles = objFolder.Files
For Each objFile in colFiles
'response.write objFile.Name&"<br>"
Next
ShowSubfolders objFSO.GetFolder(objStartFolder)
Sub ShowSubFolders(Folder)
For Each Subfolder in Folder.SubFolders
' response.write "<br>"&Subfolder.Path&"<br>"&"<br>"
Set objFolder = objFSO.GetFolder(Subfolder.Path)
Set colFiles = objFolder.Files
For Each objFile in colFiles
' response.write objFile.Name&"<br>"
Next
ShowSubFolders Subfolder
Next
'end sub
for each Files in colFiles
Set fso = server.CreateObject("Scripting.FileSystemObject")
if fso.FileExists ( dato & ".pdf") then
Response.Write ("File C:/Users/Fabian/Documents/CHFS/" & dato & "<b><big><li>El archivo existe!</li></big></b>")
else
Response.Write ("File C:/Users/Fabian/Documents/CHFS/" & dato & "<b><big><li>El archivo no existe!</li></big></b>")
end if
next
End Sub
Response.Write ("File" & dato & "<b><big><li>El archivo si existe!</li></big></b>")
end if
como puede ver mi codigo hace la busqueda en los directorios pero no se como hacer para que la busqueda se base en el dato que ingresa el usuario o para comprobar si el dato o archivo existe en las carpetas por favor le suplico que me ayude