01. juli 2007 - 00:18Der er
25 kommentarer og 1 løsning
søger efter mapper med undvigelser
Jeg har det her script som søger efter et mappe navn på min web-server:
----------------->> KODE <<--------------------------------- <form name="foldersearch" method="post"> mappe: <input type="text" name="folder"> mappe<input name="path" type="hidden" value="mappe">  <input type="submit" name="submit" value="Søg"> </form> <% If Request.Form("folder") <> "" Then strSearch = Request.Form("folder") & "mappe"
Set objFSO = CreateObject("Scripting.FileSystemObject") If objFSO.FolderExists("C:\Inetpub\" & strSearch) Then Response.write "<font size='2px' color='red'><b>" & Request.Form("folder") & "mappe er optaget!</b></font>" Else Response.write "<font size='2px' color='green'><b>" & Request.Form("folder") & "mappe er ledigt!</b></font><br /><form name='bestilsub' action='default.asp?side=bestilsub' method='post'><input name='subname' type='hidden' value=" & Request.Form("folder") & " <br /> <input type='submit' name='bestilsub' value='bestil' /></form>" End If Set objFSO = Nothing End If %>
Kan det lade sig gøre at man kan lave en liste af navn som ikke findes og ikke må kunne benyttes fx. fuck. Så hvis man søger på det får man besked om at navnet findes selv om det ikke gør. Jeg ved godt man jo bare kan lave mapperne på serveren men det er jo for let, plus der vil komme til at være mange tomme mapper.
If objFSO.FolderExists("C:\Inetpub\" & strSearch) or instr(optaget, "," & left(strSearch, len(strSearch) - len("mappe")) & ",") virker ikke, nope er stadig ledig.
Du kan også bruge den med Request.Form("folder"), uden "mappe" delen.. hvis det ikke betyder at du skal ændre en masse navne.. det er der ingen grund til..
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.