DaniWeb Forum Index > Web Development > ASP

How to count Uppercase Letter from a String

Please support our ASP advertiser: PostgreSQL or MySQL? Compare and contrast the two most popular open source databases

•

Join Date: Jun 2006

Posts: 3

Reputation: sandeep.kharat is an unknown quantity at this point

Solved Threads: 0

sandeep.kharat sandeep.kharat is offline

Offline

Newbie Poster

How to count Uppercase Letter from a String

Jun 28th, 2006

Hi all,

How to count Uppercase Letter from a String.

Please help

Regards,
Sandeep

•

Join Date: Jul 2005

Posts: 483

Reputation: campkev is an unknown quantity at this point

Solved Threads: 19

campkev

Offline

Posting Pro in Training

Re: How to count Uppercase Letter from a String

Jun 28th, 2006

 Help with Code Tags 
 ASP Syntax (Toggle Plain Text) 
Function NumUpperCase(x)
  a = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
  count = 0
 
  for c = 1 to Len(x) 
   if InStr(a,Mid (x,c,1)) > 0 then count = count+1
  next
 
  NumUpperCase = count
End Function
Function NumUpperCase(x)
  a = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
  count = 0

  for c = 1 to Len(x) 
   if InStr(a,Mid (x,c,1)) > 0 then count = count+1
  next

  NumUpperCase = count
End Function