ace4556
09-08-2005, 11:48 PM
Ok... I know all of you hate batch, but I need a little debugging help... GOD I JUST CANT FIND MY ERROR!!! Thanks in advanced :-D
Menu.bat
__________
@ECHO OFF
COLOR 0C
:TOP
C:
ECHO ###################################################################
ECHO # #
ECHO # C0Mm@nD 0p#i0n$ mEnu. #
ECHO # #
ECHO ###################################################################
ECHO # #
ECHO # A. Open CommanD #
ECHO # # #
ECHO ###################################################################
ECHO # (ESC) = Exit #
ECHO ###################################################################
echo Please Select Your Option:
start /w wscript.exe A:/CommanD/userin.vbs
call A:/CommanD/~userin.bat
del A:/CommanD/~userin.bat
If ~USERIN==A start A:/CommanD/prog.bat
If ~USERIN==Z Goto END
pause
Userin.vbs
______________
strUserIn = InputBox("Enter Choice")
Set fs = CreateObject("Scripting.FileSystemObject")
strFileName = fs.BuildPath(Wscript.ScriptFullName & "\..", "~userin.bat")
strFileName = fs.GetAbsolutePathName(strFileName)
Set ts = fs.OpenTextFile(strFileName, 2, True)
ts.WriteLine "set userin=" & strUserIn
ts.Close
When you guys are done, I have a similar one I need help with...
@Echo Off
@echo 3n#3R C0Mm@nD
start /w wscript.exe A:/CommanD/userin.vbs
call A:/CommanD/~userin.bat
del A:/CommanD/~userin.bat
If ~USERIN==say echo What would you like your program to say? start /w wscript.exe A:/CommanD/usersay.vbs call A:/CommanD/~usersay.bat del A:/CommanD/~usersay.bat echo echo %usersay% >>prog1.bat
If ~USERIN==delete echo Please type the name after the full filepath of the file you wish to ask your program to delete... start /w wscript.exe A:/CommanD/userdelete.vbs call A:/CommanD/~userdelete.bat del A:/CommanD/~userdelete.bat echo del %userdelete% >>prog1.bat
If ~USERIN==screen echo What screen would you like your program to show? start /w wscript.exe A:/CommanD/userscreen.vbs call A:/CommanD/~userscreen.bat del A:/CommanD/~userscreen.bat If ~USERSCREEN==matrix echo A:\CommanD\matrix.txt >>prog1.bat
If ~USERIN==quit Goto END
pause
By the way, if anybody steals any of my code... well I'll just leave it up to your imagination.
lol... just throwing that out there! :-D
I DID IT LOIS!!! -Family Guy
Menu.bat
__________
@ECHO OFF
COLOR 0C
:TOP
C:
ECHO ###################################################################
ECHO # #
ECHO # C0Mm@nD 0p#i0n$ mEnu. #
ECHO # #
ECHO ###################################################################
ECHO # #
ECHO # A. Open CommanD #
ECHO # # #
ECHO ###################################################################
ECHO # (ESC) = Exit #
ECHO ###################################################################
echo Please Select Your Option:
start /w wscript.exe A:/CommanD/userin.vbs
call A:/CommanD/~userin.bat
del A:/CommanD/~userin.bat
If ~USERIN==A start A:/CommanD/prog.bat
If ~USERIN==Z Goto END
pause
Userin.vbs
______________
strUserIn = InputBox("Enter Choice")
Set fs = CreateObject("Scripting.FileSystemObject")
strFileName = fs.BuildPath(Wscript.ScriptFullName & "\..", "~userin.bat")
strFileName = fs.GetAbsolutePathName(strFileName)
Set ts = fs.OpenTextFile(strFileName, 2, True)
ts.WriteLine "set userin=" & strUserIn
ts.Close
When you guys are done, I have a similar one I need help with...
@Echo Off
@echo 3n#3R C0Mm@nD
start /w wscript.exe A:/CommanD/userin.vbs
call A:/CommanD/~userin.bat
del A:/CommanD/~userin.bat
If ~USERIN==say echo What would you like your program to say? start /w wscript.exe A:/CommanD/usersay.vbs call A:/CommanD/~usersay.bat del A:/CommanD/~usersay.bat echo echo %usersay% >>prog1.bat
If ~USERIN==delete echo Please type the name after the full filepath of the file you wish to ask your program to delete... start /w wscript.exe A:/CommanD/userdelete.vbs call A:/CommanD/~userdelete.bat del A:/CommanD/~userdelete.bat echo del %userdelete% >>prog1.bat
If ~USERIN==screen echo What screen would you like your program to show? start /w wscript.exe A:/CommanD/userscreen.vbs call A:/CommanD/~userscreen.bat del A:/CommanD/~userscreen.bat If ~USERSCREEN==matrix echo A:\CommanD\matrix.txt >>prog1.bat
If ~USERIN==quit Goto END
pause
By the way, if anybody steals any of my code... well I'll just leave it up to your imagination.
lol... just throwing that out there! :-D
I DID IT LOIS!!! -Family Guy