VBScripting error, expected then and expected end?

Question

I am having all kinds of problems with VBScript. It seems to be originating at the If Then statements. This is the code...

Option Explicit
Dim User, Pass

User=InputBox("Username")
If User = Guest then
 msgbox "hi"

It just doesn't work and its giving me the error code 800A03F6 What do I need to do to fix this? The error is on line 6.

Amol Chavan · Accepted Answer · 2013-02-04 05:58:34Z

2

Either this .....

Option Explicit
Dim User
User = InputBox("Username")
If User = "Guest" then
  MsgBox "hi"
End If

Or ...

  Option Explicit
    Dim User
    User = InputBox("Username")
    If User = "Guest" then MsgBox "hi"

answered Feb 4, 2013 at 5:58

Amol Chavan

4,0201 gold badge23 silver badges33 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

Ken White · Accepted Answer · 2013-02-04 02:50:06Z

0

You're trying to use a string as a variable, and it isn't one (at least from the code you posted). Guest is not declared at all. You need to quote the string.

Try this instead:

User = InputBox("Username")
If User = "Guest" then
  MsgBox "hi"

answered Feb 4, 2013 at 2:50

Ken White

126k15 gold badges237 silver badges476 bronze badges

1 Comment

Energy Focus Over a year ago

Thank you, that is what I needed to do the whole time. I just needed to quote my strings.

Collectives™ on Stack Overflow

VBScripting error, expected then and expected end?

2 Answers 2

Comments

1 Comment

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

Comments

1 Comment

Your Answer

Sign up or log in

Post as a guest

Related