Solved

classic aspvb syntax question

Posted on 2013-11-09
8
401 Views
Last Modified: 2013-11-10
Hi,

I have an old asp site that I need to modify. We have a menu item that shows under a certain condition with a usertype field:

  <% IF Session("UserType") = 1 OR Session("UserType") = 7 THEN %> 

Open in new window


and then we show the menu item.

We recently modified a database field so that a single user record can be assigned multiple types in a comma delimited list. So instead of UserType=1, for our condition, we need to check if Session("UserType") contains 1 in a comma delimited list.

assuming users will have values like 1,7,8 or 1,3,7 how can I scan and confirm a "contains" condition in asp vb?

Thank you

Bill
0
Comment
Question by:billium99
  • 3
  • 2
  • 2
  • +1
8 Comments
 
LVL 58

Accepted Solution

by:
Gary earned 200 total points
ID: 39636441
Assuming no number bigger than 9 then you can do
instr(Session("UserType"),"1")

If greater than 9 then
instr(","&Session("UserType")&",",",1,")
0
 
LVL 52

Assisted Solution

by:Scott Fell, EE MVE
Scott Fell,  EE MVE earned 150 total points
ID: 39636455
<%
test="1,3,7,9,10" 

if checkIT(test)=1 then
%>
<div class="nav">Nav bar</div>
<%
end if
%>


<%
' functions are typically at the top or bottom of your page.
function checkIT(user_type)
     checkIT=0
     arrUsertype=split(user_type,",")
     for each number in arrUsertype
          if cstr(number)="1" then
               checkIT=1
         end if
    next
end function

%>

Open in new window

0
 
LVL 44

Assisted Solution

by:Rainer Jeschor
Rainer Jeschor earned 150 total points
ID: 39636646
Hi,
I would go the route with padas solution BUT would extend it a little bit - just to pass the check parameter as well:
<%
test="1,3,7,9,10" 

if checkIT(test,"1") OR checkIT(test,"7") then
%>
<div class="nav">Nav bar</div>
<%
end if
%>


<%
' functions are typically at the top or bottom of your page.
function checkIT(user_type,valueToCheck)
     checkIT=false
     arrUsertype=split(user_type,",")
     for each number in arrUsertype
          if cstr(number)=cstr(valueToCheck) then
               checkIT=true
         end if
    next
end function

%>

Open in new window


HTH
Rainer
0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 1

Author Comment

by:billium99
ID: 39636894
Thanks All - now Gary's solution is clearly the simplest, and right now all values are 1 - 8, but just to clarify, the second example assumes the number MUST be greater than 9?

So truly if we get to 10 user types, we need to use Pradas or Rainer's solutions?
0
 
LVL 44

Expert Comment

by:Rainer Jeschor
ID: 39636918
Hi,
Gary`s is the quickest one - but hard to read and you have always to add the "," before and after your session variable. This will work for any number but it could be not as error save as Padas/my solution due to the extras you have to add.

Padas solution is the right one in terms of best practices as it creates the array with the distinct values and then runs the compare.

My extension to Padas solution just make it usable for any check you want to run - check for 5 or 10 or ...

Just my 2ct
Rainer
0
 
LVL 1

Author Comment

by:billium99
ID: 39636926
OK thx - I have another question related to this that I will post right now, to not abuse my points. =)
0
 
LVL 1

Author Closing Comment

by:billium99
ID: 39636927
Thanks for the help
0
 
LVL 58

Expert Comment

by:Gary
ID: 39637063
Don't actually see a problem with adding a comma, it just makes the number distinct to do an instr check
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

I have helped a lot of people on EE with their coding sources and have enjoyed near about every minute of it. Sometimes it can get a little tedious but it is always a challenge and the one thing that I always say is:   The Exchange of informatio…
Deploying a Microsoft Access application in a Citrix environment is not difficult but takes a few steps. However, Citrix system people are often of little help, as they typically know next to nothing about Access. The script provided here will take …
I've attached the XLSM Excel spreadsheet I used in the video and also text files containing the macros used below. https://filedb.experts-exchange.com/incoming/2017/03_w12/1151775/Permutations.txt https://filedb.experts-exchange.com/incoming/201…

740 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question