asp textarea 多行数组分割处理方法
(编辑:jimmy 日期: 2024/11/27 浏览:3 次 )
所以对应的asp处理代码如下
复制代码 代码如下:
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
php的的处理代码 参考了(dedecms)
复制代码 代码如下:
$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;
}
}
复制代码 代码如下:
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
php的的处理代码 参考了(dedecms)
复制代码 代码如下:
$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;
}
}
下一篇:access改mdb为asp所带来的灾难 附mdb防下载方法