asp textarea 多行数组分割处理方法

　　dedearr=split(xiangguanid2,chr(13)) '分割成数组

　　for dede=0 to ubound(dedearr)-1 '数组长度减一，因为最后有两个chr(13)换行。

　　dedearr2=split(dedearr(dede),"|")

　　dedetitle=dedearr2(1)

　　dedeurl=dedearr2(0)

　　if dedetitle<>"" and dedeurl<>"" then

　　xiangguanart2=xiangguanart2&"<li><a href="""&dedeurl&""" title="""&dedetitle&""" target=""_blank"">"&dedetitle&"</a></li>"

　　end if

　　next

　　end if

　　$cfg_softinfos['sites'] = ereg_replace("\n{1,}","\n",str_replace("\r","\n",$cfg_softinfos['sites']));

　　$sites = explode("\n",trim($cfg_softinfos['sites']));

　　foreach($sites as $site)

　　{

　　if(trim($site)=='') continue;

　　list($link,$serverName) = explode('|',$site);

　　if(!eregi("^(http|ftp)://",$firstLink)) $flink = trim($link).$firstLink;

　　else $flink = $firstLink;

　　if($cfg_softinfos['gotojump']==1) $flink = $phppath."/download.php?open=1&aid=$aid&cid=$cid&link=".urlencode(base64_encode($flink));

　　$temp = str_replace("~link~",$flink,$tempStr);

　　$temp = str_replace("~server~",$serverName,$temp);

　　$downlinks .= $temp;

　　}

　　}