View Single Post
Old 03-08-2005, 08:04 PM   #6 (permalink)
JoeTheOdd
 
Junior Techie

Join Date: Mar 2005

Posts: 52

JoeTheOdd

Send a message via AIM to JoeTheOdd Send a message via Yahoo to JoeTheOdd
Default

Code:
DIM userid AS STRING
DIM password AS STRING 'Text isn't an integer. You need to use a string.

CLS
COLOR 2

PRINT "Welcome to Peter's Secure Network Login System"
PRINT "Version 1.0"
SLEEP 2
PRINT "Please enter your User ID to continue."
USERIDINPUT: 'This is a place identifier, so we can call a GOTO later.
CALL INPUT("Userid", userid) 'Comma, not semicolon
IF userid = "Peter" OR userid = "Peteriscool" THEN 'More effecient to include the OR statment and test for either password
PRINT "Please enter your password to continue."
ELSE
PRINT "Invaild Userid. Please try again."
GOTO USERIDINPUT
END IF

JoeTheOdd is offline