亚洲网视


	用户登录(电信网通双线)\|

<% function HeadNavigation() dim rs,sql set rs = server.createobject("adodb.recordset") sql="select * from NwebCn_Navigation where ViewFlag"&LangData&" order by Sequence asc" rs.open sql,conn,1,1 if rs.bof and rs.eof then response.write "暂无导航链接" else response.write "" do response.write ""&rs("NavName"&LangData)&"" rs.movenext if not rs.eof then response.write "

" loop until rs.eof response.write "" end if response.write "" rs.close set rs=nothing end function function SearchForm() response.write "" &_ "" &_ " " &_ " " &_ " " &_ " " &_ " " &_ " " &_ " " &_ " " &_ " " &_ "" &_ "

关键字：
范　围：	" &_ " " &_ "

" end function %>




	· 电信用户
	· 网通用户

[ANV多功能企业台] 在线演示：企业版 | 商务版 | 公务版

属于企业自己的直播电视台！在企业自己的网站上实现一系列可视化活动进程，无论是对外企业活动，还是内部机构管理！可视化营销、网站视频接待、视频会议等诸多应用，均可轻松实现！

[ANM数字传媒系统]

为政府、电视台、大型机构及各大门户网站提供互动式的，具备视频广告分众分享分发、视频直播点播广播、视频在线互动交流的运营级别数字视频传媒系统

[ANT在线会议系统]

理念上更为先进的随需网络视频会议系统，为客户提供专为商务应用而优化的专业网络视频会议解决方案！不需要安装软件或购买硬件，无论您使用何种平台，只需单击鼠标就可以开始会议




· 热烈庆祝亚视传媒事业部正式成立!	[08-29]
· 亚视朗斯视频成功签约大连市政府...	08-27]
· 热烈庆祝亚视传媒事业部正式成立!
· 热烈庆祝亚视传媒事业部正式成立!
· 热烈庆祝亚视传媒事业部正式成立!
· 热烈庆祝亚视传媒事业部正式成立!

【生产班组长综合管理技能训练】

主讲老师：吴文辉　　　课程时间：一天
开课时间: 2007年08月22日 09:30--17:30

常见问题

<% function TopAffiche() dim rs,sql,i set rs = server.createobject("adodb.recordset") sql="select ID,NewsName"&LangData&",SortID from NwebCn_News where ViewFlag"&LangData&" and NoticeFlag order by id desc" rs.open sql,conn,1,1 if rs.bof and rs.eof then response.write "暂无相关信息" end if for i=1 to 4 if rs.eof then exit for response.write "·"&rs("NewsName"&LangData)&" " rs.movenext next rs.close set rs=nothing end function function TopNews() dim rs,sql,i,NewsName,NewFlag set rs = server.createobject("adodb.recordset") sql="select ID,NewsName"&LangData&",SortID,AddTime from NwebCn_News where ViewFlag"&LangData&" order by id desc" rs.open sql,conn,1,1 response.write"" response.write "" if rs.bof and rs.eof then response.write "" else for i=1 to 6 if rs.eof then exit for if StrLen(rs("NewsName"&LangData))<=48 then NewsName=rs("NewsName"&LangData) else NewsName=StrLeft(rs("NewsName"&LangData),46) end if if now()-rs("AddTime")<=2 then NewFlag="

" else NewFlag="" end if response.write"" rs.movenext next end if response.write "" response.write"

暂无相关信息

4 "&NewsName&""&NewFlag&"

" rs.close set rs=nothing end function function TopMessage() dim rs,sql,i,MesName,NewFlag set rs = server.createobject("adodb.recordset") sql="select ID,MesName,AddTime from NwebCn_Message where ViewFlag order by id desc" rs.open sql,conn,1,1 response.write"" response.write "" if rs.bof and rs.eof then response.write "" else for i=1 to 6 if rs.eof then exit for if StrLen(rs("MesName"))<=46 then MesName=rs("MesName") else MesName=StrLeft(rs("MesName"),44) end if if now()-rs("AddTime")<=2 then NewFlag="

" else NewFlag="" end if response.write"" rs.movenext next end if response.write "" response.write"

暂无相关信息

4 "&MesName&""&NewFlag&"

" rs.close set rs=nothing end function function TopProducts() dim rs,sql,i,ProductName,SmallPicPath set rs = server.createobject("adodb.recordset") sql="select ID,ProductName"&LangData&",SortID,SmallPic,GroupID,Exclusive from NwebCn_Products where ViewFlag"&LangData&" and NewFlag order by id desc" rs.open sql,conn,1,1 response.write"" response.write "" if rs.bof and rs.eof then response.write "" else response.write"" for i=1 to 4 if rs.eof then exit for response.write"" rs.movenext next response.write"" end if response.write "

暂无相关信息

" if StrLen(rs("ProductName"&LangData))<=20 then ProductName=rs("ProductName"&LangData) else ProductName=StrLeft(rs("ProductName"&LangData),18) end if SmallPicPath=HtmlSmallPic(rs("GroupID"),rs("SmallPic"),rs("Exclusive")) response.write "" &_ "

" &_ "

"&ProductName&"

" response.write"

" rs.close set rs=nothing end function %>