创新基金项目通过科技部最后验收

<%@ LANGUAGE="VBScript.Encode" CODEPAGE="936" %> <%function HTMLEncode(fString) if not isnull(fString) then fString = replace(fString, ">", ">") fString = replace(fString, "<", "<") 'fString = Replace(fString, CHR(32), " ") 'fString = Replace(fString, CHR(9), " ") fString = Replace(fString, CHR(34), """) fString = Replace(fString, CHR(39), "'") fString = Replace(fString, CHR(13), "") fString = Replace(fString, CHR(10), "
") HTMLEncode = fString end if end function function UBBCode(strContent) strContent = HTMLEncode(strContent) dim re Set re=new RegExp re.IgnoreCase =true re.Global=True re.Pattern="(\[IMG\])(.[^\[]*)(\[\/IMG\])" strContent=re.Replace(strContent," 按此在新窗口浏览图片

screen.width-580)this.width=screen.width-580"">") re.Pattern="(\[URL\])(http:\/\/.[^\]]*)(\[\/URL\])" strContent= re.Replace(strContent,"$2") re.Pattern="(\[URL\])(.[^\]]*)(\[\/URL\])" strContent= re.Replace(strContent,"$2") re.Pattern="(\[URL=(http:\/\/.[^\]]*)\])(.[^\]]*)(\[\/URL\])" strContent= re.Replace(strContent,"$3") re.Pattern="(\[URL=(.[^\]]*)\])(.[^\]]*)(\[\/URL\])" strContent= re.Replace(strContent,"$3") re.Pattern="(\[EMAIL\])(.[^\[]*)(\[\/EMAIL\])" strContent= re.Replace(strContent,"

$2") re.Pattern="(\[EMAIL=(.[^\]]*)\])(.[^\[]*)(\[\/EMAIL\])" strContent= re.Replace(strContent,"

$3") re.Pattern="([^(=)])((\w)+[@]{1}((\w)+[.]){1,3}(\w)+)" strContent= re.Replace(strContent,"

$2") re.Pattern = "^(http://[A-Za-z0-9\./,!:=\?%\-&_~`@'+]+)" strContent = re.Replace(strContent,"

$1") re.Pattern = "(http://[A-Za-z0-9\./,!:=\?%\-&_~`@'+]+)$" strContent = re.Replace(strContent,"

$1") re.Pattern = "[^>=""](http://[A-Za-z0-9\.\/,!:=\?%\-&_~`@'+]+)" strContent = re.Replace(strContent,"

$1") re.Pattern="(\[color=(.[^\[]*)\])(.[^\[]*)(\[\/color\])" strContent=re.Replace(strContent,"$3") re.Pattern="(\[face=(.[^\[]*)\])(.[^\[]*)(\[\/face\])" strContent=re.Replace(strContent,"$3") re.Pattern="(\[align=(.[^\[]*)\])(.*)(\[\/align\])" strContent=re.Replace(strContent,"

") re.Pattern="(\[move\])(.*)(\[\/move\])" strContent=re.Replace(strContent,"$2") re.Pattern="\[GLOW=*([0-9]*),*(#*[a-z0-9]*),*([0-9]*)\](.[^\[]*)\[\/GLOW]" strContent=re.Replace(strContent,"$4

") re.Pattern="\[SHADOW=*([0-9]*),*(#*[a-z0-9]*),*([0-9]*)\](.[^\[]*)\[\/SHADOW]" strContent=re.Replace(strContent,"$4

") re.Pattern="(\[code\])(.[^\[]*)(\[\/code\])" strContent=re.Replace(strContent,"

以下内容为程序代码:
$2

") re.Pattern="(\[QUOTE\])(.*)(\[\/QUOTE\])" strContent=re.Replace(strContent,"

") re.Pattern="(\[FLASH\])(.[^\[]*)(\[\/FLASH\])" strContent= re.Replace(strContent,"

") re.Pattern="\[DIR=*([0-9]*),*([0-9]*)\](.[^\[]*)\[\/DIR]" strContent=re.Replace(strContent,"

") re.Pattern="\[QT=*([0-9]*),*([0-9]*)\](.[^\[]*)\[\/QT]" strContent=re.Replace(strContent,"

") re.Pattern="\[MP=*([0-9]*),*([0-9]*)\](.[^\[]*)\[\/MP]" strContent=re.Replace(strContent,"

") re.Pattern="\[RM=*([0-9]*),*([0-9]*)\](.[^\[]*)\[\/RM]" strContent=re.Replace(strContent,"

") re.Pattern = "^(ftp://[A-Za-z0-9\./=\?%\-&_~`@':+!]+)" strContent = re.Replace(strContent,"

$1") re.Pattern = "(ftp://[A-Za-z0-9\./=\?%\-&_~`@':+!]+)$" strContent = re.Replace(strContent,"

$1") re.Pattern = "[^>=""](ftp://[A-Za-z0-9\.\/=\?%\-&_~`@':+!]+)" strContent = re.Replace(strContent,"

$1") re.Pattern = "^(rtsp://[A-Za-z0-9\./=\?%\-&_~`@':+!]+)" strContent = re.Replace(strContent,"

$1") re.Pattern = "(rtsp://[A-Za-z0-9\./=\?%\-&_~`@':+!]+)$" strContent = re.Replace(strContent,"

$1") re.Pattern = "[^>=""](rtsp://[A-Za-z0-9\.\/=\?%\-&_~`@':+!]+)" strContent = re.Replace(strContent,"

$1") re.Pattern = "^(mms://[A-Za-z0-9\./=\?%\-&_~`@':+!]+)" strContent = re.Replace(strContent,"

$1") re.Pattern = "(mms://[A-Za-z0-9\./=\?%\-&_~`@':+!]+)$" strContent = re.Replace(strContent,"

$1") re.Pattern = "[^>=""](mms://[A-Za-z0-9\.\/=\?%\-&_~`@':+!]+)" strContent = re.Replace(strContent,"

$1") re.Pattern="(\[i\])(.[^\[]*)(\[\/i\])" strContent=re.Replace(strContent,"$2") re.Pattern="(\[u\])(.[^\[]*)(\[\/u\])" strContent=re.Replace(strContent,"$2") re.Pattern="(\[b\])(.[^\[]*)(\[\/b\])" strContent=re.Replace(strContent,"$2") re.Pattern="(\[fly\])(.*)(\[\/fly\])" strContent=re.Replace(strContent,"$2") re.Pattern="(\[size=1\])(.[^\[]*)(\[\/size\])" strContent=re.Replace(strContent,"$2") re.Pattern="(\[size=2\])(.[^\[]*)(\[\/size\])" strContent=re.Replace(strContent,"$2") re.Pattern="(\[size=3\])(.[^\[]*)(\[\/size\])" strContent=re.Replace(strContent,"$2") re.Pattern="(\[size=4\])(.[^\[]*)(\[\/size\])" strContent=re.Replace(strContent,"$2") re.Pattern="(\[center\])(.[^\[]*)(\[\/center\])" strContent=re.Replace(strContent,"$2") set re=Nothing UBBCode=strContent end function dim id,rs,admin,email,webname,weburl,xtname,softname,powerby,tboerweb,tboerurl,linkurl,bgcolor,bycolor,btcolor,txcolor,txtcolor,txtsize,hrcolor,sql,title,placard,hits,addtime id=request.querystring("id") if id="" then response.write("") response.end end if Set rs = Server.CreateObject("ADODB.Recordset") rs.open "select * from admin",conn,1,1 admin=rs("name") email=rs("email") webname=rs("webname") weburl=rs("weburl") xtname=rs("xtname") softname=rs("softname") powerby=rs("powerby") tboerweb=rs("tboerweb") tboerurl=rs("tboerurl") bgcolor=rs("bgcolor") bycolor=rs("bycolor") btcolor=rs("btcolor") txcolor=rs("txcolor") txtcolor=rs("txtcolor") txtsize=rs("txtsize") hrcolor=rs("hrcolor") rs.close:set rs=nothing conn.Execute"UPDATE data SET hits=hits+1 WHERE id="&id sql="SELECT name,placard,hits,addtime,linkurl FROM data WHERE id="&id Set rs=Conn.Execute(sql) if rs(4)<>"null" then linkurl=rs(4) rs.close:set rs=nothing call dbclose() response.redirect linkurl response.end end if title=rs(0) placard=rs(1) hits=rs(2) addtime=rs(3) rs.close:set rs=nothing call dbclose()%> 创新基金项目通过科技部最后验收

创新基金项目通过科技部最后验收

　发布日期：[2008-10-25]

首迈通信国家技术创新基金资助项目“光纤到户三网合一通信接入系统”(2005年度国家技术创新基金无偿资助)于2008年3月通过专家验收后，于近日通过国家科学技术部的最后验收，并受颁发验收证书（编号080666）。

“光纤到户三网合一通信接入系统”是一种根据我国国情和小区宽带接入特点而开发基于小区有源交换的FTTH三网合一接入系统，又称Active Switch Optical Network（AON），由放置于住宅小区机房内的光线路终端（OLT）和放置于用户室内的光网络单元（ONU）分两个部分组成，利用单芯单模光纤可以同时传输CATV、宽带数据（双向100M）和语音，实现光纤到户（FTTH）三网合一接入。他具有网络结构简单、技术成熟、成本低廉等明显特点，特别适合应用于我国住宅小区的FTTH接入。目前该项目已投入大批量生产，产品已出口欧美30多个国家。产品具体型号如下：光线路终端（OLT）为OnAccess2224, 光网络单元（ONU）为OnAccessH100x和OnAccess40x系列。

该项目申请专利7项,其中发明专利一项。

【关闭窗口】