<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> Shanghai Marine Diesel Engine Research Institute
Products & Services
Energy Saving & Environmental Protecting Equipment and system
Screw Expander
Diesel Engine
Stirling Engine
Power System Solutions and
Related Products
Marine Automation System
Energy Saving & Environmental
Protecting Equipment and system
Stationary Power Station
Energy Service
Langson Energy, America
inlet pressure: 20.6bar
inlet temperature: 60℃
outlet pressure: 7.89bar
outlet temperature: 10℃
power per year: 120 million kilowatts
medium: CH4
Ex-factory Date: 2012
Langson Energy, America
inlet pressure: 24bar
inlet temperature: 20℃
outlet pressure: 9.7bar
outlet temperature: 10℃
power per year: 80 million kilowatts
medium: CH4
Ex-factory Date: 2013
<% function WebContent() dim ID ID=request.QueryString("ID") dim rs,sql set rs = server.createobject("adodb.recordset") if request.QueryString("ID")="" then sql="select top 1 ID,AboutName,Source,Content,GroupID,Exclusive,ClickNumber,AddTime from Ameav_About where ViewFlag and not ChildFlag order by Sequence asc" else sql="select ID,AboutName,Source,Content,GroupID,Exclusive,ClickNumber,AddTime from Ameav_About where ViewFlag and not ChildFlag and ID="&ID end if rs.open sql,conn,1,3 if not rs.eof then numbers=len(rs("content")) '总字节数 pagenum=Sitenum '每页显示的数量 maxpage=-int(-numbers/pagenum)'总页数 requestpage=clng(request("p"))'接收页码 if requestpage="" or requestpage=0 then'获取默认页码 requestpage=1 end if if requestpage>maxpage then '当前页的页码大于最大页码时，使当前页码等于最大页码 requestpage=maxpage end if if not requestpage=1 then '当前页码不等于1时，向下移动相应的字节数 content=mid(rs("content"),(requestpage-1)*pagenum+1,Sitenum) else content=left(rs("content"),Sitenum) '当页码等于1时，截取相应文本 end if if isempty(requestpage) then thispage=1 else thispage=cint(requestpage) end if if ViewNoRight(rs("GroupID"),rs("Exclusive")) then %> <%=Replace(content,chr(13),"")%> <% rs("ClickNumber")=rs("ClickNumber")+1 else WebContent="
" end if rs.update rs.close else response.write "
No information
" end if set rs=nothing end function %>