|
 |
asp_web_howto thread: Select Statement
Message #1 by "Phillip Conrad" <phillip.conrad@f...> on Wed, 1 May 2002 22:30:14
|
|
I have the following function in an ASP page using VBScript and I can not
get the Select Statement to work. I've tried changing it to an If...Else
and I've tried changing the condition to something like (CInt(days) < 20)
and neither seem to work. It does however work if I use a number
explicitly such as replacing (days > 30) with 35. I do get "red." Any
advice on this code?
thnx - Phil
---
Function GetColor()
Dim days
days = CInt(oReturn(PDAYS).Value)
Select Case days
Case (days < 20)
sCurrColor = "black"
Case (days > 19 and days < 31)
sCurrColor = "green"
Case (days > 30)
sCurrColor = "red"
Case else
sCurrColor = "blue"
End Select
End Function
Message #2 by "Owen Mortensen" <ojm@a...> on Wed, 1 May 2002 18:00:09 -0700
|
|
Try this:
Function GetColor()
Dim days
days = CInt(oReturn(PDAYS).Value)
Select Case days
Case < 20
sCurrColor = "black"
Case 20 To 30
sCurrColor = "green"
Case > 30
sCurrColor = "red"
Case else
sCurrColor = "blue"
End Select
End Function
Cheers,
Owen
-----Original Message-----
From: Phillip Conrad [mailto:phillip.conrad@f...]
Sent: Wednesday, May 01, 2002 10:30 PM
To: ASP Web HowTo
Subject: [asp_web_howto] Select Statement
I have the following function in an ASP page using VBScript and I can
not
get the Select Statement to work. I've tried changing it to an
If...Else
and I've tried changing the condition to something like (CInt(days) <
20)
and neither seem to work. It does however work if I use a number
explicitly such as replacing (days > 30) with 35. I do get "red." Any
advice on this code?
thnx - Phil
---
Function GetColor()
Dim days
days = CInt(oReturn(PDAYS).Value)
Select Case days
Case (days < 20)
sCurrColor = "black"
Case (days > 19 and days < 31)
sCurrColor = "green"
Case (days > 30)
sCurrColor = "red"
Case else
sCurrColor = "blue"
End Select
End Function
---
Improve your web design skills with these new books from Glasshaus.
Usable Web Menus
http://www.amazon.com/exec/obidos/ASIN/1904151027/ref=nosim/theprogramme
r-20
Constructing Accessible Web Sites
http://www.amazon.com/exec/obidos/ASIN/1904151000/ref=nosim/theprogramme
r-20
Practical JavaScript for the Usable Web
http://www.amazon.com/exec/obidos/ASIN/1904151051/ref=nosim/theprogramme
r-20
Message #3 by "Drew, Ron" <RDrew@B...> on Wed, 1 May 2002 21:23:26 -0400
|
|
WW91IGFyZSBhbHJlYWR5IGRvaW5nIGEgY2FzZSBvbiBkYXlzIHNvIHlvdSBkbyBub3QgbmVlZCB0
aGUgY29uZGl0aW9uIHRlc3QuLi4NCiANClNlbGVjdCBDYXNlIGRheXMNCiAgICAgICAgICAgICAg
ICBDYXNlICA8IDIwDQogICAgICAgICAgICAgICAgICAgICBzQ3VyckNvbG9yID0gImJsYWNrIg0K
ICAgICAgICAgICAgICAgIENhc2UgLi4uLi4uLi4uDQpldGMNCg0KDQoJLS0tLS1PcmlnaW5hbCBN
ZXNzYWdlLS0tLS0gDQoJRnJvbTogUGhpbGxpcCBDb25yYWQgW21haWx0bzpwaGlsbGlwLmNvbnJh
ZEBmaXJzdHVuaW9uLmNvbV0gDQoJU2VudDogV2VkIDUvMS8yMDAyIDY6MzAgUE0gDQoJVG86IEFT
UCBXZWIgSG93VG8gDQoJQ2M6IA0KCVN1YmplY3Q6IFthc3Bfd2ViX2hvd3RvXSBTZWxlY3QgU3Rh
dGVtZW50DQoJDQoJDQoNCglJIGhhdmUgdGhlIGZvbGxvd2luZyBmdW5jdGlvbiBpbiBhbiBBU1Ag
cGFnZSB1c2luZyBWQlNjcmlwdCBhbmQgSSBjYW4gbm90DQoJZ2V0IHRoZSBTZWxlY3QgU3RhdGVt
ZW50IHRvIHdvcmsuICBJJ3ZlIHRyaWVkIGNoYW5naW5nIGl0IHRvIGFuIElmLi4uRWxzZQ0KCWFu
ZCBJJ3ZlIHRyaWVkIGNoYW5naW5nIHRoZSBjb25kaXRpb24gdG8gc29tZXRoaW5nIGxpa2UgKENJ
bnQoZGF5cykgPCAyMCkNCglhbmQgbmVpdGhlciBzZWVtIHRvIHdvcmsuICBJdCBkb2VzIGhvd2V2
ZXIgd29yayBpZiBJIHVzZSBhIG51bWJlcg0KCWV4cGxpY2l0bHkgc3VjaCBhcyByZXBsYWNpbmcg
KGRheXMgPiAzMCkgd2l0aCAzNS4gIEkgZG8gZ2V0ICJyZWQuIiAgQW55DQoJYWR2aWNlIG9uIHRo
aXMgY29kZT8NCgkNCgl0aG54IC0gUGhpbA0KCS0tLQ0KCUZ1bmN0aW9uIEdldENvbG9yKCkNCgkg
RGltIGRheXMNCgkgZGF5cyA9IENJbnQob1JldHVybihQREFZUykuVmFsdWUpDQoJDQoJICAgICAg
ICBTZWxlY3QgQ2FzZSBkYXlzDQoJICAgICAgICAgICAgICAgIENhc2UgKGRheXMgPCAyMCkNCgkg
ICAgICAgICAgICAgICAgICAgICAgICBzQ3VyckNvbG9yID0gImJsYWNrIg0KCSAgICAgICAgICAg
ICAgICBDYXNlIChkYXlzID4gMTkgYW5kIGRheXMgPCAzMSkNCgkgICAgICAgICAgICAgICAgICAg
ICAgICBzQ3VyckNvbG9yID0gImdyZWVuIg0KCSAgICAgICAgICAgICAgICBDYXNlIChkYXlzID4g
MzApDQoJICAgICAgICAgICAgICAgICAgICAgICAgc0N1cnJDb2xvciA9ICJyZWQiDQoJICAgICAg
ICAgICAgICAgIENhc2UgZWxzZQ0KCSAgICAgICAgICAgICAgICAgICAgICAgIHNDdXJyQ29sb3Ig
PSAiYmx1ZSINCgkgICAgICAgIEVuZCBTZWxlY3QNCgkNCglFbmQgRnVuY3Rpb24NCgkNCgktLS0N
CgkNCglJbXByb3ZlIHlvdXIgd2ViIGRlc2lnbiBza2lsbHMgd2l0aCB0aGVzZSBuZXcgYm9va3Mg
ZnJvbSBHbGFzc2hhdXMuDQoJDQoJVXNhYmxlIFdlYiBNZW51cw0KCWh0dHA6Ly93d3cuYW1hem9u
LmNvbS9leGVjL29iaWRvcy9BU0lOLzE5MDQxNTEwMjcvcmVmPW5vc2ltL3RoZXByb2dyYW1tZQ0K
CXItMjANCglDb25zdHJ1Y3RpbmcgQWNjZXNzaWJsZSBXZWIgU2l0ZXMNCglodHRwOi8vd3d3LmFt
YXpvbi5jb20vZXhlYy9vYmlkb3MvQVNJTi8xOTA0MTUxMDAwL3JlZj1ub3NpbS90aGVwcm9ncmFt
bWUNCglyLTIwDQoJUHJhY3RpY2FsIEphdmFTY3JpcHQgZm9yIHRoZSBVc2FibGUgV2ViDQoJaHR0
cDovL3d3dy5hbWF6b24uY29tL2V4ZWMvb2JpZG9zL0FTSU4vMTkwNDE1MTA1MS9yZWY9bm9zaW0v
dGhlcHJvZ3JhbW1lDQoJci0yMA0KCS0tLQ0KCUNoYW5nZSB5b3VyIG1haWwgb3B0aW9ucyBhdCBo
dHRwOi8vcDJwLndyb3guY29tL21hbmFnZXIuYXNwIG9yDQoJdG8gdW5zdWJzY3JpYmUgc2VuZCBh
IGJsYW5rIGVtYWlsIHRvIGxlYXZlLWFzcF93ZWJfaG93dG8tMjkxMzM3QUBwMnAud3JveC5jb20u
DQoJDQoNCg==
Message #4 by "Drew, Ron" <RDrew@B...> on Wed, 1 May 2002 21:24:14 -0400
|
|
U29ycnkgc2hvdWxkIGhhdmUgcmVhZCB5b3VycyBmaXJzdCBiZWZvcmUgSSByZXBsaWVkIHRvIHBy
aW9yIG1lc3NhZ2UNCg0KCS0tLS0tT3JpZ2luYWwgTWVzc2FnZS0tLS0tIA0KCUZyb206IE93ZW4g
TW9ydGVuc2VuIFttYWlsdG86b2ptQGFjbS5vcmddIA0KCVNlbnQ6IFdlZCA1LzEvMjAwMiA5OjAw
IFBNIA0KCVRvOiBBU1AgV2ViIEhvd1RvIA0KCUNjOiANCglTdWJqZWN0OiBbYXNwX3dlYl9ob3d0
b10gUkU6IFNlbGVjdCBTdGF0ZW1lbnQNCgkNCgkNCg0KCVRyeSB0aGlzOg0KCUZ1bmN0aW9uIEdl
dENvbG9yKCkNCgkgRGltIGRheXMNCgkgZGF5cyA9IENJbnQob1JldHVybihQREFZUykuVmFsdWUp
DQoJDQoJICAgICAgICBTZWxlY3QgQ2FzZSBkYXlzDQoJICAgICAgICAgICAgICAgIENhc2UgPCAy
MA0KCSAgICAgICAgICAgICAgICAgICAgICAgIHNDdXJyQ29sb3IgPSAiYmxhY2siDQoJICAgICAg
ICAgICAgICAgIENhc2UgMjAgVG8gMzANCgkgICAgICAgICAgICAgICAgICAgICAgICBzQ3VyckNv
bG9yID0gImdyZWVuIg0KCSAgICAgICAgICAgICAgICBDYXNlID4gMzANCgkgICAgICAgICAgICAg
ICAgICAgICAgICBzQ3VyckNvbG9yID0gInJlZCINCgkgICAgICAgICAgICAgICAgQ2FzZSBlbHNl
DQoJICAgICAgICAgICAgICAgICAgICAgICAgc0N1cnJDb2xvciA9ICJibHVlIg0KCSAgICAgICAg
RW5kIFNlbGVjdA0KCQ0KCUVuZCBGdW5jdGlvbg0KCQ0KCUNoZWVycywNCglPd2VuDQoJDQoJLS0t
LS1PcmlnaW5hbCBNZXNzYWdlLS0tLS0NCglGcm9tOiBQaGlsbGlwIENvbnJhZCBbbWFpbHRvOnBo
aWxsaXAuY29ucmFkQGZpcnN0dW5pb24uY29tXQ0KCVNlbnQ6IFdlZG5lc2RheSwgTWF5IDAxLCAy
MDAyIDEwOjMwIFBNDQoJVG86IEFTUCBXZWIgSG93VG8NCglTdWJqZWN0OiBbYXNwX3dlYl9ob3d0
b10gU2VsZWN0IFN0YXRlbWVudA0KCQ0KCQ0KCUkgaGF2ZSB0aGUgZm9sbG93aW5nIGZ1bmN0aW9u
IGluIGFuIEFTUCBwYWdlIHVzaW5nIFZCU2NyaXB0IGFuZCBJIGNhbg0KCW5vdA0KCWdldCB0aGUg
U2VsZWN0IFN0YXRlbWVudCB0byB3b3JrLiAgSSd2ZSB0cmllZCBjaGFuZ2luZyBpdCB0byBhbg0K
CUlmLi4uRWxzZQ0KCWFuZCBJJ3ZlIHRyaWVkIGNoYW5naW5nIHRoZSBjb25kaXRpb24gdG8gc29t
ZXRoaW5nIGxpa2UgKENJbnQoZGF5cykgPA0KCTIwKQ0KCWFuZCBuZWl0aGVyIHNlZW0gdG8gd29y
ay4gIEl0IGRvZXMgaG93ZXZlciB3b3JrIGlmIEkgdXNlIGEgbnVtYmVyDQoJZXhwbGljaXRseSBz
dWNoIGFzIHJlcGxhY2luZyAoZGF5cyA+IDMwKSB3aXRoIDM1LiAgSSBkbyBnZXQgInJlZC4iICBB
bnkNCglhZHZpY2Ugb24gdGhpcyBjb2RlPw0KCQ0KCXRobnggLSBQaGlsDQoJLS0tDQoJRnVuY3Rp
b24gR2V0Q29sb3IoKQ0KCSBEaW0gZGF5cw0KCSBkYXlzID0gQ0ludChvUmV0dXJuKFBEQVlTKS5W
YWx1ZSkNCgkNCgkgICAgICAgIFNlbGVjdCBDYXNlIGRheXMNCgkgICAgICAgICAgICAgICAgQ2Fz
ZSAoZGF5cyA8IDIwKQ0KCSAgICAgICAgICAgICAgICAgICAgICAgIHNDdXJyQ29sb3IgPSAiYmxh
Y2siDQoJICAgICAgICAgICAgICAgIENhc2UgKGRheXMgPiAxOSBhbmQgZGF5cyA8IDMxKQ0KCSAg
ICAgICAgICAgICAgICAgICAgICAgIHNDdXJyQ29sb3IgPSAiZ3JlZW4iDQoJICAgICAgICAgICAg
ICAgIENhc2UgKGRheXMgPiAzMCkNCgkgICAgICAgICAgICAgICAgICAgICAgICBzQ3VyckNvbG9y
ID0gInJlZCINCgkgICAgICAgICAgICAgICAgQ2FzZSBlbHNlDQoJICAgICAgICAgICAgICAgICAg
ICAgICAgc0N1cnJDb2xvciA9ICJibHVlIg0KCSAgICAgICAgRW5kIFNlbGVjdA0KCQ0KCUVuZCBG
dW5jdGlvbg0KCQ0KCS0tLQ0KCQ0KCUltcHJvdmUgeW91ciB3ZWIgZGVzaWduIHNraWxscyB3aXRo
IHRoZXNlIG5ldyBib29rcyBmcm9tIEdsYXNzaGF1cy4NCgkNCglVc2FibGUgV2ViIE1lbnVzDQoJ
aHR0cDovL3d3dy5hbWF6b24uY29tL2V4ZWMvb2JpZG9zL0FTSU4vMTkwNDE1MTAyNy9yZWY9bm9z
aW0vdGhlcHJvZ3JhbW1lDQoJci0yMA0KCUNvbnN0cnVjdGluZyBBY2Nlc3NpYmxlIFdlYiBTaXRl
cw0KCWh0dHA6Ly93d3cuYW1hem9uLmNvbS9leGVjL29iaWRvcy9BU0lOLzE5MDQxNTEwMDAvcmVm
PW5vc2ltL3RoZXByb2dyYW1tZQ0KCXItMjANCglQcmFjdGljYWwgSmF2YVNjcmlwdCBmb3IgdGhl
IFVzYWJsZSBXZWINCglodHRwOi8vd3d3LmFtYXpvbi5jb20vZXhlYy9vYmlkb3MvQVNJTi8xOTA0
MTUxMDUxL3JlZj1ub3NpbS90aGVwcm9ncmFtbWUNCglyLTIwDQoJLS0tDQoJQ2hhbmdlIHlvdXIg
bWFpbCBvcHRpb25zIGF0IGh0dHA6Ly9wMnAud3JveC5jb20vbWFuYWdlci5hc3Agb3INCgl0byB1
bnN1YnNjcmliZSBzZW5kIGEgYmxhbmsgZW1haWwgdG8NCgklJWVtYWlsLnVuc3ViJSUuDQoJDQoJ
DQoJDQoJDQoJLS0tDQoJDQoJSW1wcm92ZSB5b3VyIHdlYiBkZXNpZ24gc2tpbGxzIHdpdGggdGhl
c2UgbmV3IGJvb2tzIGZyb20gR2xhc3NoYXVzLg0KCQ0KCVVzYWJsZSBXZWIgTWVudXMNCglodHRw
Oi8vd3d3LmFtYXpvbi5jb20vZXhlYy9vYmlkb3MvQVNJTi8xOTA0MTUxMDI3L3JlZj1ub3NpbS90
aGVwcm9ncmFtbWUNCglyLTIwDQoJQ29uc3RydWN0aW5nIEFjY2Vzc2libGUgV2ViIFNpdGVzDQoJ
aHR0cDovL3d3dy5hbWF6b24uY29tL2V4ZWMvb2JpZG9zL0FTSU4vMTkwNDE1MTAwMC9yZWY9bm9z
aW0vdGhlcHJvZ3JhbW1lDQoJci0yMA0KCVByYWN0aWNhbCBKYXZhU2NyaXB0IGZvciB0aGUgVXNh
YmxlIFdlYg0KCWh0dHA6Ly93d3cuYW1hem9uLmNvbS9leGVjL29iaWRvcy9BU0lOLzE5MDQxNTEw
NTEvcmVmPW5vc2ltL3RoZXByb2dyYW1tZQ0KCXItMjANCgktLS0NCglDaGFuZ2UgeW91ciBtYWls
IG9wdGlvbnMgYXQgaHR0cDovL3AycC53cm94LmNvbS9tYW5hZ2VyLmFzcCBvcg0KCXRvIHVuc3Vi
c2NyaWJlIHNlbmQgYSBibGFuayBlbWFpbCB0byBsZWF2ZS1hc3Bfd2ViX2hvd3RvLTI5MTMzN0FA
cDJwLndyb3guY29tLg0KCQ0KDQo
Message #5 by "Ken Schaefer" <ken@a...> on Thu, 2 May 2002 11:31:59 +1000
|
|
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Owen Mortensen" <ojm@a...>
Subject: [asp_web_howto] RE: Select Statement
: Select Case days
: Case < 20
: sCurrColor = "black"
: Case 20 To 30
: sCurrColor = "green"
: Case > 30
: sCurrColor = "red"
: End Select
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
This code *wont* work. You can't use Select Case like this. Each Case
statement must be an expression that can be evaluated. If it equals what is
on the Select Case line, then the code is executed. < 20 is not a valid
expression that can be evaluated. For example
If days = 15 then
Select Case 15
Case < 20
'
'
End Select
You need to do it like this:
Select Case True
Case (Days < 20)
sCurrColor = "black"
Case (Days >=20 and Days <=30)
sCurrColor= "green"
Case (Days > 30)
sCurrColor = "red"
End Select
Each of the Case statements is an expression. Only one expression will
evaluate to True, which is on the first line. That bit of code will be
executed
Cheers
Ken
Message #6 by "Ken Schaefer" <ken@a...> on Thu, 2 May 2002 11:33:16 +1000
|
|
Maybe I'm missing something here. I'm sure this code wont work...
As far as I know, Select Case *doesn't* work this way. Let me try it and get
back to the list.
Cheers
Ken
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
----- Original Message -----
From: "Drew, Ron" <RDrew@B...>
To: "ASP Web HowTo" <asp_web_howto@p...>
Sent: Thursday, May 02, 2002 11:23 AM
Subject: [asp_web_howto] RE: Select Statement
: You are already doing a case on days so you do not need the condition
test...
:
: Select Case days
: Case < 20
: sCurrColor = "black"
: Case .........
: etc
:
:
: -----Original Message-----
: From: Phillip Conrad [mailto:phillip.conrad@f...]
: Sent: Wed 5/1/2002 6:30 PM
: To: ASP Web HowTo
: Cc:
: Subject: [asp_web_howto] Select Statement
:
:
:
: I have the following function in an ASP page using VBScript and I can not
: get the Select Statement to work. I've tried changing it to an If...Else
: and I've tried changing the condition to something like (CInt(days) < 20)
: and neither seem to work. It does however work if I use a number
: explicitly such as replacing (days > 30) with 35. I do get "red." Any
: advice on this code?
:
: thnx - Phil
: ---
: Function GetColor()
: Dim days
: days = CInt(oReturn(PDAYS).Value)
:
: Select Case days
: Case (days < 20)
: sCurrColor = "black"
: Case (days > 19 and days < 31)
: sCurrColor = "green"
: Case (days > 30)
: sCurrColor = "red"
: Case else
: sCurrColor = "blue"
: End Select
:
: End Function
:
: ---
:
: Improve your web design skills with these new books from Glasshaus.
:
: Usable Web Menus
: http://www.amazon.com/exec/obidos/ASIN/1904151027/ref=nosim/theprogramme
: r-20
: Constructing Accessible Web Sites
: http://www.amazon.com/exec/obidos/ASIN/1904151000/ref=nosim/theprogramme
: r-20
: Practical JavaScript for the Usable Web
: http://www.amazon.com/exec/obidos/ASIN/1904151051/ref=nosim/theprogramme
: r-20
:
:
: "yz{RlÃ?s 7 qY ΢šH Ó¢h{.n+Ç?zwZnVé??[hy毫) h = ) +(
Message #7 by "Owen Mortensen" <ojm@a...> on Wed, 1 May 2002 18:34:32 -0700
|
|
Um. I've been using select case this way for YEARS. Don't know where
you learned your syntax, but you said your statement doesn't work....
-----Original Message-----
From: Ken Schaefer [mailto:ken@a...]
Sent: Wednesday, May 01, 2002 6:32 PM
To: ASP Web HowTo
Subject: [asp_web_howto] RE: Select Statement
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Owen Mortensen" <ojm@a...>
Subject: [asp_web_howto] RE: Select Statement
: Select Case days
: Case < 20
: sCurrColor = "black"
: Case 20 To 30
: sCurrColor = "green"
: Case > 30
: sCurrColor = "red"
: End Select
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
This code *wont* work. You can't use Select Case like this. Each Case
statement must be an expression that can be evaluated. If it equals what
is on the Select Case line, then the code is executed. < 20 is not a
valid expression that can be evaluated. For example
If days = 15 then
Select Case 15
Case < 20
'
'
End Select
You need to do it like this:
Select Case True
Case (Days < 20)
sCurrColor = "black"
Case (Days >=20 and Days <=30)
sCurrColor= "green"
Case (Days > 30)
sCurrColor = "red"
End Select
Each of the Case statements is an expression. Only one expression will
evaluate to True, which is on the first line. That bit of code will be
executed
Cheers
Ken
---
Improve your web design skills with these new books from Glasshaus.
Usable Web Menus
http://www.amazon.com/exec/obidos/ASIN/1904151027/ref=nosim/theprogramme
r-20
Constructing Accessible Web Sites
http://www.amazon.com/exec/obidos/ASIN/1904151000/ref=nosim/theprogramme
r-20
Practical JavaScript for the Usable Web
http://www.amazon.com/exec/obidos/ASIN/1904151051/ref=nosim/theprogramme
r-20
Message #8 by "Ken Schaefer" <ken@a...> on Thu, 2 May 2002 11:40:00 +1000
|
|
Error Type:
Microsoft VBScript compilation (0x800A03EA)
Syntax error
/test/case.asp, line 6, column 5
Case < 20
----^
Code is:
<%@ Language=VBScript %>
<%
Days = 25
Select Case Days
Case < 20
strVar = 1
Case > 20
strVar = 2
End Select
Response.Write(strVar)
%>
Cheers
Ken
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Owen Mortensen" <ojm@a...>
Subject: [asp_web_howto] RE: Select Statement
:
: Um. I've been using select case this way for YEARS. Don't know where
: you learned your syntax, but you said your statement doesn't work....
:
: -----Original Message-----
: From: Ken Schaefer [mailto:ken@a...]
: Sent: Wednesday, May 01, 2002 6:32 PM
: To: ASP Web HowTo
: Subject: [asp_web_howto] RE: Select Statement
:
:
: ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
: From: "Owen Mortensen" <ojm@a...>
: Subject: [asp_web_howto] RE: Select Statement
:
:
: : Select Case days
: : Case < 20
: : sCurrColor = "black"
: : Case 20 To 30
: : sCurrColor = "green"
: : Case > 30
: : sCurrColor = "red"
: : End Select
: ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
:
: This code *wont* work. You can't use Select Case like this. Each Case
: statement must be an expression that can be evaluated. If it equals what
: is on the Select Case line, then the code is executed. < 20 is not a
: valid expression that can be evaluated. For example
:
: If days = 15 then
:
: Select Case 15
: Case < 20
: '
: '
: End Select
:
:
: You need to do it like this:
:
: Select Case True
: Case (Days < 20)
: sCurrColor = "black"
: Case (Days >=20 and Days <=30)
: sCurrColor= "green"
: Case (Days > 30)
: sCurrColor = "red"
: End Select
:
: Each of the Case statements is an expression. Only one expression will
: evaluate to True, which is on the first line. That bit of code will be
: executed
:
: Cheers
: Ken
:
:
:
: ---
:
: Improve your web design skills with these new books from Glasshaus.
:
: Usable Web Menus
: http://www.amazon.com/exec/obidos/ASIN/1904151027/ref=nosim/theprogramme
: r-20
: Constructing Accessible Web Sites
: http://www.amazon.com/exec/obidos/ASIN/1904151000/ref=nosim/theprogramme
: r-20
: Practical JavaScript for the Usable Web
: http://www.amazon.com/exec/obidos/ASIN/1904151051/ref=nosim/theprogramme
: r-20
:
:
:
:
: ---
:
: Improve your web design skills with these new books from Glasshaus.
:
: Usable Web Menus
: http://www.amazon.com/exec/obidos/ASIN/1904151027/ref=nosim/theprogramme
: r-20
: Constructing Accessible Web Sites
: http://www.amazon.com/exec/obidos/ASIN/1904151000/ref=nosim/theprogramme
: r-20
: Practical JavaScript for the Usable Web
: http://www.amazon.com/exec/obidos/ASIN/1904151051/ref=nosim/theprogramme
: r-20
Message #9 by Stanley Dam <StanleyDam@c...> on Thu, 2 May 2002 09:43:16 +0800
|
|
Why don't you use IF statement instead of the Case statement under this
situation
-----Original Message-----
From: Ken Schaefer [mailto:ken@a...]
Sent: Thursday, 2 May 2002 09:40 AM
To: ASP Web HowTo
Subject: [asp_web_howto] RE: Select Statement
Error Type:
Microsoft VBScript compilation (0x800A03EA)
Syntax error
/test/case.asp, line 6, column 5
Case < 20
----^
Code is:
<%@ Language=VBScript %>
<%
Days = 25
Select Case Days
Case < 20
strVar = 1
Case > 20
strVar = 2
End Select
Response.Write(strVar)
%>
Cheers
Ken
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Owen Mortensen" <ojm@a...>
Subject: [asp_web_howto] RE: Select Statement
:
: Um. I've been using select case this way for YEARS. Don't know where
: you learned your syntax, but you said your statement doesn't work....
:
: -----Original Message-----
: From: Ken Schaefer [mailto:ken@a...]
: Sent: Wednesday, May 01, 2002 6:32 PM
: To: ASP Web HowTo
: Subject: [asp_web_howto] RE: Select Statement
:
:
: ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
: From: "Owen Mortensen" <ojm@a...>
: Subject: [asp_web_howto] RE: Select Statement
:
:
: : Select Case days
: : Case < 20
: : sCurrColor = "black"
: : Case 20 To 30
: : sCurrColor = "green"
: : Case > 30
: : sCurrColor = "red"
: : End Select
: ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
:
: This code *wont* work. You can't use Select Case like this. Each Case
: statement must be an expression that can be evaluated. If it equals what
: is on the Select Case line, then the code is executed. < 20 is not a
: valid expression that can be evaluated. For example
:
: If days = 15 then
:
: Select Case 15
: Case < 20
: '
: '
: End Select
:
:
: You need to do it like this:
:
: Select Case True
: Case (Days < 20)
: sCurrColor = "black"
: Case (Days >=20 and Days <=30)
: sCurrColor= "green"
: Case (Days > 30)
: sCurrColor = "red"
: End Select
:
: Each of the Case statements is an expression. Only one expression will
: evaluate to True, which is on the first line. That bit of code will be
: executed
:
: Cheers
: Ken
:
:
:
: ---
:
: Improve your web design skills with these new books from Glasshaus.
:
: Usable Web Menus
: http://www.amazon.com/exec/obidos/ASIN/1904151027/ref=nosim/theprogramme
: r-20
: Constructing Accessible Web Sites
: http://www.amazon.com/exec/obidos/ASIN/1904151000/ref=nosim/theprogramme
: r-20
: Practical JavaScript for the Usable Web
: http://www.amazon.com/exec/obidos/ASIN/1904151051/ref=nosim/theprogramme
: r-20
:
:
:
:
: ---
:
: Improve your web design skills with these new books from Glasshaus.
:
: Usable Web Menus
: http://www.amazon.com/exec/obidos/ASIN/1904151027/ref=nosim/theprogramme
: r-20
: Constructing Accessible Web Sites
: http://www.amazon.com/exec/obidos/ASIN/1904151000/ref=nosim/theprogramme
: r-20
: Practical JavaScript for the Usable Web
: http://www.amazon.com/exec/obidos/ASIN/1904151051/ref=nosim/theprogramme
: r-20
---
Improve your web design skills with these new books from Glasshaus.
Usable Web Menus
http://www.amazon.com/exec/obidos/ASIN/1904151027/ref=nosim/theprogramme
r-20
Constructing Accessible Web Sites
http://www.amazon.com/exec/obidos/ASIN/1904151000/ref=nosim/theprogramme
r-20
Practical JavaScript for the Usable Web
http://www.amazon.com/exec/obidos/ASIN/1904151051/ref=nosim/theprogramme
r-20
Message #10 by "Owen Mortensen" <ojm@a...> on Wed, 1 May 2002 18:46:14 -0700
|
|
OK, OK. Here it is.... The way I had it before works in VB but not
VBScript.
<%@ Language=VBScript %>
<%
Days = 25
Select Case true
Case days < 20
strVar = 1
Case days > 20
strVar = 2
End Select
Response.Write(strVar)
%>
Have Fun,
Owen
-----Original Message-----
From: Ken Schaefer [mailto:ken@a...]
Sent: Wednesday, May 01, 2002 6:40 PM
To: ASP Web HowTo
Subject: [asp_web_howto] RE: Select Statement
Error Type:
Microsoft VBScript compilation (0x800A03EA)
Syntax error
/test/case.asp, line 6, column 5
Case < 20
----^
Code is:
<%@ Language=VBScript %>
<%
Days = 25
Select Case Days
Case < 20
strVar = 1
Case > 20
strVar = 2
End Select
Response.Write(strVar)
%>
Cheers
Ken
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Owen Mortensen" <ojm@a...>
Subject: [asp_web_howto] RE: Select Statement
:
: Um. I've been using select case this way for YEARS. Don't know where
: you learned your syntax, but you said your statement doesn't work....
:
: -----Original Message-----
: From: Ken Schaefer [mailto:ken@a...]
: Sent: Wednesday, May 01, 2002 6:32 PM
: To: ASP Web HowTo
: Subject: [asp_web_howto] RE: Select Statement
:
:
: ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
: From: "Owen Mortensen" <ojm@a...>
: Subject: [asp_web_howto] RE: Select Statement
:
:
: : Select Case days
: : Case < 20
: : sCurrColor = "black"
: : Case 20 To 30
: : sCurrColor = "green"
: : Case > 30
: : sCurrColor = "red"
: : End Select
: ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
:
: This code *wont* work. You can't use Select Case like this. Each Case
: statement must be an expression that can be evaluated. If it equals
what
: is on the Select Case line, then the code is executed. < 20 is not a
: valid expression that can be evaluated. For example
:
: If days = 15 then
:
: Select Case 15
: Case < 20
: '
: '
: End Select
:
:
: You need to do it like this:
:
: Select Case True
: Case (Days < 20)
: sCurrColor = "black"
: Case (Days >=20 and Days <=30)
: sCurrColor= "green"
: Case (Days > 30)
: sCurrColor = "red"
: End Select
:
: Each of the Case statements is an expression. Only one expression will
: evaluate to True, which is on the first line. That bit of code will be
: executed
:
: Cheers
: Ken
:
:
:
: ---
:
: Improve your web design skills with these new books from Glasshaus.
:
: Usable Web Menus
:
http://www.amazon.com/exec/obidos/ASIN/1904151027/ref=nosim/theprogramme
: r-20
: Constructing Accessible Web Sites
:
http://www.amazon.com/exec/obidos/ASIN/1904151000/ref=nosim/theprogramme
: r-20
: Practical JavaScript for the Usable Web
:
http://www.amazon.com/exec/obidos/ASIN/1904151051/ref=nosim/theprogramme
: r-20
:
:
:
:
: ---
:
: Improve your web design skills with these new books from Glasshaus.
:
: Usable Web Menus
:
http://www.amazon.com/exec/obidos/ASIN/1904151027/ref=nosim/theprogramme
: r-20
: Constructing Accessible Web Sites
:
http://www.amazon.com/exec/obidos/ASIN/1904151000/ref=nosim/theprogramme
: r-20
: Practical JavaScript for the Usable Web
:
http://www.amazon.com/exec/obidos/ASIN/1904151051/ref=nosim/theprogramme
: r-20
---
Improve your web design skills with these new books from Glasshaus.
Usable Web Menus
http://www.amazon.com/exec/obidos/ASIN/1904151027/ref=nosim/theprogramme
r-20
Constructing Accessible Web Sites
http://www.amazon.com/exec/obidos/ASIN/1904151000/ref=nosim/theprogramme
r-20
Practical JavaScript for the Usable Web
http://www.amazon.com/exec/obidos/ASIN/1904151051/ref=nosim/theprogramme
r-20
Message #11 by "Ken Schaefer" <ken@a...> on Thu, 2 May 2002 11:51:39 +1000
|
|
Select Case is a more elegant way to do this...it is (IMHO) the most
appropriate way to handle the conditions. The following code works:
<%
Select Case True
Case (Days < 20)
sCurrColor = "black"
Case (Days >=20 and Days <=30)
sCurrColor= "green"
Case (Days > 30)
sCurrColor = "red"
End Select
%>
Cheers
Ken
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Stanley Dam" <StanleyDam@c...>
Subject: [asp_web_howto] RE: Select Statement
: Why don't you use IF statement instead of the Case statement under this
: situation
:
: -----Original Message-----
: From: Ken Schaefer [mailto:ken@a...]
: Sent: Thursday, 2 May 2002 09:40 AM
: To: ASP Web HowTo
: Subject: [asp_web_howto] RE: Select Statement
:
:
: Error Type:
: Microsoft VBScript compilation (0x800A03EA)
: Syntax error
: /test/case.asp, line 6, column 5
: Case < 20
: ----^
:
: Code is:
:
: <%@ Language=VBScript %>
: <%
: Days = 25
:
: Select Case Days
: Case < 20
: strVar = 1
: Case > 20
: strVar = 2
: End Select
: Response.Write(strVar)
: %>
:
: Cheers
: Ken
:
: ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
: From: "Owen Mortensen" <ojm@a...>
: Subject: [asp_web_howto] RE: Select Statement
:
: :
: : Um. I've been using select case this way for YEARS. Don't know where
: : you learned your syntax, but you said your statement doesn't work....
: :
: : -----Original Message-----
: : From: Ken Schaefer [mailto:ken@a...]
: : Sent: Wednesday, May 01, 2002 6:32 PM
: : To: ASP Web HowTo
: : Subject: [asp_web_howto] RE: Select Statement
: :
: :
: : ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
: : From: "Owen Mortensen" <ojm@a...>
: : Subject: [asp_web_howto] RE: Select Statement
: :
: :
: : : Select Case days
: : : Case < 20
: : : sCurrColor = "black"
: : : Case 20 To 30
: : : sCurrColor = "green"
: : : Case > 30
: : : sCurrColor = "red"
: : : End Select
: : ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
: :
: : This code *wont* work. You can't use Select Case like this. Each Case
: : statement must be an expression that can be evaluated. If it equals what
: : is on the Select Case line, then the code is executed. < 20 is not a
: : valid expression that can be evaluated. For example
: :
: : If days = 15 then
: :
: : Select Case 15
: : Case < 20
: : '
: : '
: : End Select
: :
: :
: : You need to do it like this:
: :
: : Select Case True
: : Case (Days < 20)
: : sCurrColor = "black"
: : Case (Days >=20 and Days <=30)
: : sCurrColor= "green"
: : Case (Days > 30)
: : sCurrColor = "red"
: : End Select
: :
: : Each of the Case statements is an expression. Only one expression will
: : evaluate to True, which is on the first line. That bit of code will be
: : executed
: :
: : Cheers
: : Ken
|
|
|
View Cart
