如何删除数组中的重复元素(asp,js,php)

作者:袖梨 2022-06-25

如何删除数组中的重复元素(asp教程,js,php教程)

http://www.111com.net/1999/xhtml">



js删除数据组中重复的元素




//下面是一段php删除数据组中重复的元素


//方法一,用php自带的array_flip超简单

print_r(array_flip(array_flip($array)));


//利用自定函数来实现

function delsame(&$array)
{
 $i = 0;
 while(isset($array[$i]))
 {
  $j = $i + 1;
  while(isset($array[$j]))
  {
   if($array[$i] == $array[$j]) //如果发现后面有重复的元素
   {
    delmember($array, $j); //把它删除
    $j--; //重新检查补上来的元素是否是重复的
   }
   $j ++;
  }
  $i ++;
 }
}
//
$array = array(1,1,1,1,2,2,3);
//print_r(delsame( $array ) );

function delmember(&$array, $id)
{
 $size = count($array);
 for($i = 0; $i <$size - $id - 1; $i ++)
 {
  $array[$id + $i] = $array[$id + $i + 1];
 }
 unset($array[$size - 1]);
}


//一款asp的删除数组中重复元素的函数

<%
Function moveR(farray,sarray)

a = Split(farray, ",")
Set dic = CreateObject("Scripting.Dictionary")
For k=0 To UBound(a)
   If a(k)<> "" Then dic.Add "_" & a(k), a(k)
Next
a = Split(sarray, ",")
For k=0 To UBound(a)
   If a(k)<> "" Then
    If dic.Exists("_" & a(k)) Then
     dic.Remove "_" & a(k)
    End If
   End If
Next

items = dic.Items()
Set dic = Nothing
moveR=Join(items, ",")
End Function
n1 = "a,b,1,11,12,13,14,15,16,17,19,20,22"
n2 = "a,1,12,14,18,19,20"
response.write mover(n1,n2)
%>

?>

相关文章

精彩推荐