search program

[everett]

[/code]
cls

print "the results will be in search.txt"
print "made by everett gillert"
print "email everett.gillert@gmail.com"
input "drive"; d$
input "dir"; s$
input "file type"; f$
input "name"; n$
if s$ = "\" then
goto sub1
else
if s$ = "" then
goto sub1
else
if s$ = " " then
goto sub1
else
shell "dir "+d$+":\"+s$+"\"+n$+"."+f$+"/b/a-d>search.txt
end
sub1:
shell "dir "+d$+":\"+n$+"."+f$+"/b/a-d>search.txt
return

[/code]

[tannervp]

Code:

cls
print "to work create a folder called search in the folder you put this"
print "program in"
print "the results will be in search\search.txt"
print "made by everett gillert"
print "email everett.gillert@gmail.com"
input "drive"; d$
input "dir"; s$
input "file type"; f$
input "name"; n$
shell "dir d$:\s$n$f$/b > \search\search.txt"
end

maybe it should be shell "dir d$:\s$\n$.f$/b > \search\search.txt"

[everett]

i thout to do that but i thout pepole would know to do .bas or what ever they where looking for and i missed that dir one

[tannervp]

you messed up somewhere. I tried that and got the same file creation error

[everett]

dir \search\search.txt
mabey
or just search.txt

[Moneo]

tannervp, BTW your program is a nice frontend for searching files using the DIR command. Sorry, but I thought you had written an entire utility to do this.

Code:

.....
input "drive"; d$
input "dir"; s$
input "file type"; f$
input "name"; n$
shell "dir d$:\s$n$f$/b > \search\search.txt"
end

maybe it should be shell "dir d$:\s$\n$.f$/b >\search\search.txt"

You got the right idea, except for the way you build the SHELL command string. Take a look at this:

shell "dir "+d$+":\"+s$+"\"+n$+"."+"f$"+"/b>search\search.txt"

The above syntax should work for almost all the cases, except:
1) When the directory (s$) is the root directory (\). When you build the shell command you'll have \\ together, which won't work. So, test s$ after having input it, and if it's \ convert it to null, like:
if s$="\" then s$=""

2) Another possibility is that the user wants to look at files that don't have a file extension, and specifies null to the file type prompt. Since most directories don't have file extension, they will be included in the output list. To avoid this, after the /b put /a-d which means that you don't want directories.

You also might want to ask the user if he wants to search in sub-directories of the "dir". If so, you would need to insert a "/s" right after the f$ in the shell command string.
*****

[everett]

then i have to do this
if s$ = "\" then
goto sub1
else
if s$ = "" then
goto sub1
else
if s$ = " " then
goto sub1
else
shell "dir "+d$+":\"+s$+"\"+n$+"."+f$+"/b>search\search.txt
end
sub1:
shell "dir "+d$+":\"+n$+"."+f$+"/b>search\search.txt
return

[everett]

that change dosenot work

[everett]

tannervp, BTW your program is a nice frontend for searching files using the DIR command. Sorry, but I thought you had written an entire utility to do this.

Code:

.....
input "drive"; d$
input "dir"; s$
input "file type"; f$
input "name"; n$
shell "dir d$:\s$n$f$/b > \search\search.txt"
end

maybe it should be shell "dir d$:\s$\n$.f$/b >\search\search.txt"

You got the right idea, except for the way you build the SHELL command string. Take a look at this:

here
shell "dir "+d$+":\"+s$+"\"+n$+"."+"f$"+"/b>search\search.txt"here

The above syntax should work for almost all the cases, except:
1) When the directory (s$) is the root directory (\). When you build the shell command you'll have \\ together, which won't work. So, test s$ after having input it, and if it's \ convert it to null, like:
if s$="\" then s$=""

2) Another possibility is that the user wants to look at files that don't have a file extension, and specifies null to the file type prompt. Since most directories don't have file extension, they will be included in the output list. To avoid this, after the /b put /a-d which means that you don't want directories.

You also might want to ask the user if he wants to search in sub-directories of the "dir". If so, you would need to insert a "/s" right after the f$ in the shell command string.
*****

[Moneo]

Everett,

I read your PM. You're right, my shell doesn't work.

Here's my shell line:
shell "dir "+d$+":\"+s$+"\"+n$+"."+"f$"+"/b>search\search.txt"

It needs to be:
shell "dir "+d$+":\"+s$+"\"+n$+"."+f$+"/b>search\search.txt"

I had quotes around f$. I just tested it, and it works.

I'll leave the other enhancemeents up to you. Let me know how it goes.
*****