⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 5_2.asp

📁 《管式加热炉设计计算程序》本程序依据《管式加热炉规范》 SY/T0538-2004进行开发而成。适用于油田、长输管道圆筒型管式加热炉（包括丁头管、翅片管）的热力计算、水力计算、阻力计算及强度计算。
💻 ASP
📖 第 1 页 / 共 2 页
字号:
🔍
12 
<!--#include file="dbconn.asp"-->
<!--#include file="inc/checkchange.inc"-->
<!--#include file="inc/QZF.CSS"-->
<!--#include file="9_05.asp"-->
<%
th=Session.Contents("th")
 if th="00" then 
 response.write"<p align='center'><a href='index.asp'><font color='#000064'>请输入设计号！&gt;&gt;&gt;</font> </a></p>" 
 Response.End 
 end if
th=Session.Contents("th")
set rs=server.createobject("adodb.recordset")
 sql ="select * from 5 where (th='"&th&"')"
 rs.open sql,conn,1,1
TH=RS("th")
D1=RS("d1") 
D=RS("d")
B=RS("b")
S1=RS("s1")
S2=RS("s2")
N=RS("n")
L=RS("l")
E=RS("e")
YF=RS("yf")
NF=RS("nf")
HF=RS("hf")
BF=RS("bf")
AI=RS("ai")
AO=RS("ao")
AF=RS("af")
AT=RS("at")
SI=RS("si")
So=RS("so")
QD=RS("qd")
I1=RS("i1")
I2=RS("i2")
TS=RS("ts")
wc=RS("wc")
TF=RS("tf")
TR=RS("tr")
TPJ=RS("TPJ")
CTPJ=RS("ctpj")
RTPJ=RS("rtpj")
UU=RS("uu")
Y=RS("y")
PR=RS("pr")
UUU=RS("uuu")
RE=RS("re")
HI=RS("hi")
TYPJ=RS("typj")
GG=RS("gg")
HOC=RS("hoc")
LL=RS("ll")
EG=RS("eg")
HOR=RS("hor")
HO=RS("ho")
MO=RS("mo")
MI=RS("mi")
HI1=RS("hi1")
HOC1=RS("hoc1")
OF=RS("of")
HO1=RS("ho1")
KC=RS("kc")
AC=RS("ac")
NC=RS("nc")
FD=RS("fd")
QC=RS("qc")
%>
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>管式加热炉工艺设计书</title>
</head>

<body>
<p align="center"><font face="华文新魏" size="7"><b>五、对流室设计计算</b></font></p>
<p align="center"><font face="宋体" size="2">>设计号：<%=th%></font></p>
<p align="center">
<input type=button onclick="vbscript:buildDoc '',4" value="生成word">
<div align="center">
  <center>
<table border="1" id="myData" width="800">
  <tr>
    <td width="46" align="center">序号</td>
    <td width="143" align="center">名称</td>
    <td width="35" align="center">符号</td>
    <td width="56" align="center">单位</td>
    <td width="336" align="center">计算公式及数据来源</td>
    <td width="144" align="center">结果</td>
  </tr>
  <tr>
    <td width="46">一、</td>
    <td width="143">炉管基本数据</td>
    <td width="35" align="center">　</td>
    <td width="56" align="center">　</td>
    <td width="336">　</td>
   <td width="144">　</td>
  </tr>
  <tr>
    <td width="46">1</td>
    <td width="143">对流炉管类型</td>
    <td width="35" align="center">　</td>
    <td width="56" align="center">　</td>
    <td width="336">　</td>
    <td width="144"><%=d1%></td>
  </tr>
  <tr>
    <td width="46">2</td>
    <td width="143">对流炉管外径</td>
    <td width="35" align="center">d</td>
    <td width="56" align="center">mm</td>
    <td width="336">设计选择</td>
    <td width="144"><%=D%></td>
  </tr>
  <tr>
    <td width="46">3</td>
    <td width="143">对流炉管壁厚</td>
    <td width="35" align="center">b</td>
    <td width="56" align="center">mm</td>
    <td width="336">设计选择,强度校核</td>
    <td width="144"><%=B%></td>
  </tr>
  <tr>
    <td width="46">4</td>
    <td width="143">管子横向间距</td>
    <td width="35" align="center">S1</td>
    <td width="56" align="center">mm</td>
    <td width="336">设计选择</td>
    <td width="144"><%=S1%></td>
  </tr>
  <tr>
    <td width="46">5</td>
    <td width="143">管子纵向间距</td>
    <td width="35" align="center">S2</td>
    <td width="56" align="center">mm</td>
    <td width="336">设计选择</td>
    <td width="144"><%=S2%></td>
  </tr>
  
  <tr>
    <td width="46">6</td>
    <td width="143">每排管子数目</td>
    <td width="35" align="center">n</td>
    <td width="56" align="center">根</td>
    <td width="336">设计选择</td>
    <td width="144"><%=n%></td>
  </tr>
   <tr>
    <td width="46">7</td>
    <td width="143">管子长度</td>
    <td width="35" align="center">l</td>
    <td width="56" align="center">m</td>
    <td width="336">设计选择</td>
    <td width="144"><%=L%></td>
  </tr>
  <tr>
    <td width="46">8</td>
    <td width="143">管墙距离</td>
    <td width="35" align="center">e</td>
    <td width="56" align="center">mm</td>
    <td width="336">设计选择</td>
    <td width="144"><%=E%></td>
  </tr>
  <%
  if d1="丁头" then
  %>
  
  <tr>
    <td width="46">9</td>
    <td width="143">两周丁头的间距</td>
    <td width="35" align="center">Yf</td>
    <td width="56" align="center">mm</td>
    <td width="336">设计选择</td>
    <td width="144"><%=YF%></td>
  </tr>
  <tr>
    <td width="46">10</td>
    <td width="143">管子每周丁头数</td>
    <td width="35" align="center">n1</td>
    <td width="56" align="center">个</td>
    <td width="336">设计选择</td>
    <td width="144"><%=nF%></td>
  </tr>
  <tr>
    <td width="46">11</td>
    <td width="143">丁头高</td>
    <td width="35" align="center">Hf</td>
    <td width="56" align="center">mm</td>
    <td width="336">设计选择</td>
    <td width="144"><%=HF%></td>
  </tr>
  <tr>
    <td width="46">12</td>
    <td width="143">丁头直径</td>
    <td width="35" align="center">Bf</td>
    <td width="56" align="center">mm</td>
    <td width="336">设计选择</td>
    <td width="144"><%=BF%></td>
  </tr>
  <%
    end if
  %>
  <%
  if  d1="翅片" then
  %>

<tr>
    <td width="46">8</td>
    <td width="143">翅间距</td>
    <td width="35" align="center">Yf</td>
    <td width="56" align="center">mm</td>
    <td width="336">设计选择</td>
    <td width="144"><%=YF%></td>
  </tr>
  <tr>
    <td width="46">9</td>
    <td width="143">翅高</td>
    <td width="35" align="center">Hf</td>
    <td width="56" align="center">mm</td>
    <td width="336">设计选择</td>
    <td width="144"><%=HF%></td>
  </tr>
  <tr>
    <td width="46">10</td>
    <td width="143">翅厚</td>
    <td width="35" align="center">Bf</td>
    <td width="56" align="center">mm</td>
    <td width="336">设计选择</td>
    <td width="144"><%=BF%></td>
  </tr>

  <%
    end if
  %>

  
 

  
  <tr>
  
    <td width="46">13</td>
    <td width="143">每米管内表面积</td>
    <td width="35" align="center">Ai</td>
    <td width="56" align="center">m&sup2;</td>
    <td width="336">Ai=3.14*(d-2b)&nbsp;</td>
    <td width="144"><%=Ai%></td>
  </tr>
  <tr>
    <td width="46">14</td>
    <td width="143">每米管外表面积</td>
    <td width="35" align="center">Ao</td>
    <td width="56" align="center">m&sup2;</td>
    <td width="336">Ao=3.14*d　</td>
    <td width="144"><%=Ao%></td>
  </tr>
  <%
  if d1="丁头" then
  %>
  
  <tr>
    <td width="46">15</td>
    <td width="143">每米管丁头面积</td>
    <td width="35" align="center">Af</td>
    <td width="56" align="center">m&sup2;</td>
    <td width="336">Af=1/4*3.14*(d+2Hf)&sup2;-d&sup2;)*2*1/Yf</td>
    <td width="144"><%=AF%></td>
  </tr>
  <tr>
    <td width="46">16</td>
    <td width="143">每米管光管部分面积</td>
    <td width="35" align="center">At</td>
    <td width="56" align="center">m&sup2;</td>
    <td width="336">At=3.14*d*(1-1/Yf*Bf)</td>
    <td width="144"><%=AT%></td>
  </tr>
  <%
    end if
  %>

<%
  if  d1="翅片" then
  %>
<tr>
    <td width="46">13</td>
    <td width="143">每米管翅片面积</td>
    <td width="35" align="center">Af</td>
    <td width="56" align="center">m&sup2;</td>
    <td width="336">Af=1/4*3.14*(d+2Hf)&sup2;-d&sup2;)*2*1/Yf</td>
    <td width="144"><%=AF%></td>
  </tr>
  <tr>
    <td width="46">14</td>
    <td width="143">每米管光管部分面积</td>
    <td width="35" align="center">At</td>
    <td width="56" align="center">m&sup2;</td>
    <td width="336">At=3.14*d*(1-1/Yf*Bf)</td>
    <td width="144"><%=AT%></td>
  </tr>
 <%
    end if
  %>

  <tr>
    <td width="46">17</td>
    <td width="143">管内流通面积</td>
    <td width="35" align="center">Si</td>
    <td width="56" align="center">m&sup2;</td>
    <td width="336">Si=1/4*3.14*n*(d-2b)&sup2;　</td>
    <td width="144"><%=si%></td>
  </tr>
  <tr>
    <td width="46">18</td>
    <td width="143">烟气流通面积</td>
    <td width="35" align="center">So</td>
    <td width="56" align="center">m&sup2;</td>
    <td width="336">So=l*((n-1)*S1+2e)-n*(d*l+l/Yf*Bf*2Hf)　</td>
    <td width="144"><%=so%></td>
  </tr>
  <tr>
    <td width="46">二、</td>
    <td width="143"><b>热力计算</b></td>
    <td width="35" align="center">　</td>
    <td width="56" align="center">　</td>
    <td width="336">　</td>
    <td width="144">　</td>
  </tr>
  <tr>
    <td width="46">1</td>
    <td width="143">对流段热负荷</td>
    <td width="35" align="center">Qd</td>
    <td width="56" align="center">　kw</td>
    <td width="336">Qd=Q-Qf</td>
    <td width="144"><%=qd%></td>
  </tr>
  <tr>
    <td width="46">2</td>
    <td width="143">进口烟气焓</td>
12

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -