织梦二次开发调用当前作者文档的标签

function GetoneDocUrl($aID){    global $dsql;    include_once(DEDEINC."/channelunit.func.PHP");    $aID = trim(ereg_replace('[^0-9]','',$aID));      $chRow = $dsql->Getone("Select arc.*,ch.maintable,ch.addtable,ch.issystem From `dede_arctiny` arc left join `dede_channeltype` ch on ch.ID=arc.channel where arc.ID='$aID' ");      if(!is_array($chRow)) {        return $reArr;    }    else {        if(empty($chRow['maintable'])) $chRow['maintable'] = 'dede_archives';    }      if($chRow['issystem']!=-1)    {        $nquery = " Select arc.*,tp.typedir,tp.topID,tp.namerule,tp.moresite,tp.siteurl,tp.sitepath                    From `{$chRow['maintable']}` arc left join `dede_arctype` tp on tp.ID=arc.typeID                    where arc.ID='$aID' ";    }    else    {        $nquery = " Select arc.*,1 as ismake,0 as money,'' as filename,tp.sitepath                    From `{$chRow['addtable']}` arc left join `dede_arctype` tp on tp.ID=arc.typeID                    where arc.aID='$aID' ";    }      $arcRow = $dsql->Getone($nquery);      $Url = GetfileUrl($aID,$arcRow['typeID'],$arcRow['senddate'],$reArr['Title'],$arcRow['ismake'],$arcRow['arcrank'],$arcRow['namerule'],$arcRow['typedir'],$arcRow['money'],$arcRow['filename'],$arcRow['moresite'],$arcRow['siteurl'],$arcRow['sitepath']);    return $Url;}