How to find duplicate value in VBScript

Hi

I have a list of value like 2,3,4,3,5,6,8. I need a vbscript funciton which is show me the duplicate values from the array.

Thanks in advance
Arif ChowdhuryAsked:
Who is Participating?
 
Om PrakashConnect With a Mentor Commented:
http://www.psacake.com/web/func/hasdups_function.htm
Private Function HasDups(byVal arrayinput)
	dim wkarray, j, i, l
	wkarray = arrayinput
	for j = 0 to ubound( wkarray )
		l = 0
		for i = 0 to ubound( wkarray )
			if wkarray(i) = wkarray(j) then l = l + 1
			if l > 1 then
				HasDups = True
				Exit function
			end if
		next
	next
	HasDups = False
End Function

<%
 ' HasDups returns True 
 ' ( 1 is duplicated )
response.write HasDups( Array( 1,2,3,4,5,6,7,8,9,0,1 ) )

 ' HasDups returns False 
 ' (All items in the array are unique)
response.write HasDups( Array( 1,2,3,4,5,6,7,8,9,10,11 ) )
%>

Open in new window

0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.