Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

help please 1

Status
Not open for further replies.
ameslee

ameslee

Programmer
Feb 12, 2006
34
AU
i need some help, i am new at this and wondering why my program isnt working can someone plz help me!

<html><head>
<title>Password Application</title>
<script type = "text/VBScript">
option explicit
function pass1()
dim intusername, intpassword, user
intusername = document.frmpass.txtusername.value
intpassword = document.frmpass.txtpassword.value
Select case user
Case 1
intusername="nemo" AND intpassword="Clown"
window.location.href = "Case 2
intusername="dory" AND intpassword="Blue"
window.location.href="Case 2
intusername="bruce" AND intpassword="Shark"
window.location.href="End select
location.href="bad.htm"
end function
</script>
<body>
<h3>Enter Username and Password</h3>
<form method="post" name="frmpass">
Username:<input type="text" name="txtusername" size="10"><br>
Password:<input type="text" name="txtpassword" size="10"> <br>
<input type="button" value="Login" name="btnSubmit" onClick="pass1()"> </form>
</body>
</html>

thanks!
 
Sort by date Sort by votes
What's the error? We can read your script, just don't like to do so without you properly described what the problem is.
 
Upvote 0 Downvote
ok sorry, the error being: if the correct password and username are entered it still goes to the bad.htm page

thanks
 
Upvote 0 Downvote
This revision leave so much to desire. But it shows the essential.
[tt]
<html><head>
<title>Password Application</title>
<script type = "text/VBScript">
option explicit
function pass1()
dim intusername, intpassword, user
intusername = document.frmpass.txtusername.value
intpassword = document.frmpass.txtpassword.value
Select case intusername & ";" & intpassword '";" not generic, anything quite unique will do
Case [blue]"nemo;Clown"[/blue]
window.location.href = "[blue]http://[/blue] Case [blue]"dory;Blue"[/blue]
window.location.href=" Case "bruce;Shark"
window.location.href=" [red]Case Else[/red]
window.location.href="bad.htm"
End select

end function
</script>
<body>
<h3>Enter Username and Password</h3>
<form method="post" name="frmpass">
Username:<input type="text" name="txtusername" size="10"><br>
Password:<input type="[blue]password[/blue]" name="txtpassword" size="10"> <br>
<input type="button" value="Login" name="btnSubmit" onClick="pass1()"> </form>
</body>
</html>
[/tt]
 
Upvote 0 Downvote
What is user ? is it a string ?
Probably user is 0

The Case 2 is checked twice ?







 
Upvote 0 Downvote
Further note:

Also close the head tag.
[tt]
</script>
[red]</head>[/red]
<body>
[/tt]
 
Upvote 0 Downvote
can i just ask what the ";" means

Thanks so much. it works!

 
Upvote 0 Downvote
just to add on one more thing to this, how would i make the user only have 3 attempts, after 3 attempts they go to the error page
 
Upvote 0 Downvote
>can i just ask what the ";" means
You want to select case conditional where the conditional involves two variables at the same time. You have to find a way to make them both involved. One simple way is to combine (concatinate) them. For visual clarity, you separate them by something which is not in conflict with the plausible string fragment to appear in the 2nd variable. Here ";" does not appear in any one of the targetted password. Hence, it is acceptable. Any other choice like "%%%%%%%%" would also do under the same principle, just does not look pleasant to my eyes, that's all. In the individual case(s), the same separator is then scripted into it and must be consistent with the select case conditional.
 
Upvote 0 Downvote
does anyone know how i would make the user only have 3 attempts, after 3 attempts they go to the error page
 
Upvote 0 Downvote
[1] Add a global variable and initial to zero.
[tt]
<script type = "text/VBScript">
option explicit
dim count
count=0
function pass1()
[/tt]
[2] Then increase it every time the function is called.
[tt]
function pass1()
count=count+1
[/tt]
[3] Change the case else
[tt]
case else
if count>=3 then window.location.href="bad.htm"
end select
[/tt]
But all these client-side functionalities are only good for casual, friendly and trusted environment, absolutely not for hostile environment.
 
Upvote 0 Downvote
ok i have done this, after 3 attempts it goes to the bad.htm page. I need to also go to the bad.htm page if the username or password are wrong also, at the moment if it is wrong it doesnt do anything

 
Upvote 0 Downvote
all looks like if someone puts in something other than what is in the Case statements then it will go to bad.htm.
not sure about case sensitive though
 
Upvote 0 Downvote
>at the moment if it is wrong it doesnt do anything
It has 2 chances to be wrong. Is it not what you want? Now you want every time it's wrong will go to bad? In that case, what is wrong with the original script?

 
Upvote 0 Downvote
oh ok i understand, i think its fine now dont worry

thanks alot anyway
 
Upvote 0 Downvote
Status
Not open for further replies.

Similar threads

si_file
  • Locked
  • Question
hi, can someone help me with this runtime error? 1
Replies
1
Views
376
strongm
strongm
Mongrel99
  • Locked
  • Question
PLEASE HELP!!!!! Can anyone tell me what this script does please
Replies
5
Views
329
combo
combo
Dr. Waqas Ali
  • Locked
  • Question
Can someone help me to convert this .bat code into VBScript ?
Replies
2
Views
405
mikrom
mikrom
svkroy
  • Locked
  • Question
Looking for help to automate web site with VBScript
Replies
2
Views
278
iambob
iambob
rodia87
  • Locked
  • Question
help with script not showing printer name and port
Replies
3
Views
315
rodia87
rodia87

Part and Inventory Search

Sponsor

Back
Top