Vb Script Query (Website)

[ppretorius]

Hi,

Im interested in modifying some code i came about. Its a simple way out concering security for a site. I admit, if theres some1 on the receiving side thats smart enough, they could read the code and enter the site.

I personally dont know vb at all. I would really appreciate if some1 could assist me in making it do something.

Heres the Code:

sub enterbtn_onclick
if userbox.value="User" and pswbox.value="123Password" then
msgbox"Thank You"
else msgbox"Sorry Incorrect Username or Password entered"
end if

end sub

Now my questions.
* Can we modify the script to be able to add more users (by saying "or" maybe??)
* Is it possible to make the script open a page after the Thankyou msg ???

If some1 could edit it or tell me how, i'd be supper gr8ful!!

Thnx

 

[markdmac]

How To Use Simple ASP Code to Password Protect Your ASP Pages

http://support.microsoft.com/default.aspx?scid=kb;en-us;301464

I hope you find this post helpful.

Regards,

Mark

 

[ppretorius]

I find it interesting, i will do more research on it - Thank you Mark.

But it still hasnt answered the 2 questions i innitially posed ?? *cry*

 

[markdmac]

You don't say anthing about where you would implement the above code so I don't want to comment. If you are using ASP, a visitor will not be able to see that information.

I hope you find this post helpful.

Regards,

Mark

 

[ppretorius]

NO NEED TO COMMENT AS YOU HAVE JUST DONE IT INDIRECTLY - THNX

i plan to implement it on a LAN thats part of a MASSIVE WAN thats Behind a couple f/w.

You see ... I travel from office to office on a daily bases

i plan to setup an apache server on my local machine with links to pages that i use to administer each office.

If i setup a simple page that my users wont be able to access, that has links to all my commonly browsed, it doesnt matter in which office im in ... The links are all there (behind a logon page of course) No more having to remember ip's ect. Even if they (users) do manage to get past the logon page, they will be asked passwords etc if they try to manage a switch for instance, or if they try to approve updates for SUSAdmin etc.

The site wont be published on our intranet so no-one will even know it exists ... I require simple security.

If you can make my Vb Script redirect me to another page after i click ENTER ... I'll jump for joy!!!

Thnx

 

[russellhancock]

The code you need is:

if userbox.value="User" and pswbox.value="123Password" then
msgbox"Thank You"

ELSEIF userbox.value="User" and pswbox.value="123Password" then

else msgbox"Sorry Incorrect Username or Password entered"
end if

for the redirect, In asp it would be "Response.Redirect("PAGE NAME")", what language is it running in?

 

[ppretorius]

I was unsure as there are so many lanuages ... I just pasted it from the html ... Is this what ya need to know ??

<script language="VBScript">

sub enterbtn_onclick
if userbox.value="User" and pswbox.value="123Password" then
msgbox"Thank You"
else msgbox"Sorry Incorrect Username or Password entered"
end if

end sub


I dont know VB but i basically want it to function like this (Expcept this doesnt work) I've added the "then etc" after "Thank You" :

<script language="VBScript">

sub enterbtn_onclick
if userbox.value="User" and pswbox.value="123Password" then
msgbox"Thank You" then
open "

http://10.0.0.1"

else msgbox"Sorry Incorrect Username or Password entered"
end if

end sub

 

[tsuji]

If everything is just client-side, in particular accept username and password client-side against some data scripted into the page, then there would be no submission to client. If this is the case, then you can do this.
[tt]
sub enterbtn_onclick

if userbox.value="User" and pswbox.value="123Password" then
msgbox[COLOR=red yellow] [/color]"Thank You" then
window.open "

http://10.0.0.1"

else
msgbox[COLOR=red yellow] [/color]"Sorry Incorrect Username or Password entered"
end if

end sub
[/tt]
This will open a new window. If you want to keep the same browser window, just "redirected" to that location, it is this.
[tt]sub enterbtn_onclick
if userbox.value="User" and pswbox.value="123Password" then
msgbox[COLOR=red yellow] [/color]"Thank You"
window.location="

http://10.0.0.1"

else
msgbox[COLOR=red yellow] [/color]"Sorry Incorrect Username or Password entered"
end if

end sub
[/tt]

 

[ppretorius]

YOU ARE THE BEST TSUJI

Thank you THANK YOU SO SO MUCH!!

I REALLY APPRECIATE YOUR ASSISTANCE

ILL GIVE IT A BASH - WILL POST THE RESULTS

TAKE CARE GUYS - THNX AGAIN

 

[ppretorius]

Just tested the script ... Worx 100%

Thnx to all who assisted

Cheers