Solved

classic aspvb syntax question

Posted on 2013-11-09

3 solutions

403 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

Comment

Question by:billium99

[X]

Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

Help others & share knowledge
Earn cash & points
Learn & ask questions

Join The Community

8 Comments

LVL 58

Accepted Solution

by:Gary

Gary earned 200 total points

ID: 396364412013-11-09

Assuming no number bigger than 9 then you can do
instr(Session("UserType"),"1")

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

LVL 53

Assisted Solution

by:Scott Fell, EE MVE

Scott Fell, EE MVE earned 150 total points

ID: 396364552013-11-09

<%
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

LVL 44

Assisted Solution

by:Rainer Jeschor

Rainer Jeschor earned 150 total points

ID: 396366462013-11-10

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

LVL 1

Author Comment

by:billium99

ID: 396368942013-11-10

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?

LVL 44

Expert Comment

by:Rainer Jeschor

ID: 396369182013-11-10

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

LVL 1

Author Comment

by:billium99

ID: 396369262013-11-10

OK thx - I have another question related to this that I will post right now, to not abuse my points. =)

LVL 1

Author Closing Comment

by:billium99

ID: 396369272013-11-10

Thanks for the help

LVL 58

Expert Comment

by:Gary

ID: 396370632013-11-10

Don't actually see a problem with adding a comma, it just makes the number distinct to do an instr check

Featured Post

Question has a verified solution.

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

Use VBScript to Ping Sweep and Check Office Version

Article by: David

This script will sweep a range of IP addresses (class c only, 255.255.255.0) and report to a log the version of office installed. What it does: 1.) Creates log file in the directory the script is run from (if it doesn't already exist) 2.) Sweep…

VB Script

VBScript and Task Scheduler 2.0 : Listing Scheduled Tasks

Article by: ltlbearand3

Over the years I have built up my own little library of code snippets that I refer to when programming or writing a script. Many of these have come from the web or adaptations from snippets I find on the Web. Periodically I add to them when I come…

VB Script

Network monitoring: why having a policy is the best policy?

Video by: AdRem

Monitoring a network: why having a policy is the best policy? Michael Kulchisky, MCSE, MCSA, MCP, VTSP, VSP, CCSP outlines the enormous benefits of having a policy-based approach when monitoring medium and large networks. Software utilized in this v…

[Webinar] How Hackers Steal Your Credentials and Why Active Directory Must be Secure to Stop Them

Video by: Experts Exchange

Sometimes it takes a new vantage point, apart from our everyday security practices, to truly see our Active Directory (AD) vulnerabilities. We get used to implementing the same techniques and checking the same areas for a breach. This pattern can re…