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

📄 1_1.asp

📁 《管式加热炉设计计算程序》本程序依据《管式加热炉规范》 SY/T0538-2004进行开发而成。适用于油田、长输管道圆筒型管式加热炉（包括丁头管、翅片管）的热力计算、水力计算、阻力计算及强度计算。
💻 ASP
📖 第 1 页 / 共 5 页
字号:
🔍
12345 
<!--#include file="dbconn.asp"-->
<!--#include file="inc/checkchange.inc"-->
<!--#include file="inc/QZF.CSS"-->
<%
th=Session.Contents("th")
set rs=server.createobject("adodb.recordset")
sql ="select * from 1 where (th='"&th&"')"
rs.open sql,conn,1,1
r1=RS("r1")
%>
<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="6">加热炉设计基础数据</font></p>
<p align="center"><font face="宋体">设计号：<%=TH%></font></p>
<!--webbot BOT="GeneratedScript" PREVIEW=" " startspan --><script Language="JavaScript"><!--
function FrontPage_Form1_Validator(theForm)
{

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t1.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("在 t1 域中，只能输入 数字 个字符。");
    theForm.t1.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("请在 t1 域中输入一个有效数字。");
    theForm.t1.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseFloat(allNum);
  if (chkVal != "" && !(prsVal >= "0" && prsVal <= "100"))
  {
    alert("请在 t1 域中输入值 大于或等于 0 与 小于或等于 100。");
    theForm.t1.focus();
    return (false);
  }

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t2.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("在 t2 域中，只能输入 数字 个字符。");
    theForm.t2.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("请在 t2 域中输入一个有效数字。");
    theForm.t2.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseFloat(allNum);
  if (chkVal != "" && !(prsVal >= "0" && prsVal <= "100"))
  {
    alert("请在 t2 域中输入值 大于或等于 0 与 小于或等于 100。");
    theForm.t2.focus();
    return (false);
  }

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t3.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("在 t3 域中，只能输入 数字 个字符。");
    theForm.t3.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("请在 t3 域中输入一个有效数字。");
    theForm.t3.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseFloat(allNum);
  if (chkVal != "" && !(prsVal >= "0" && prsVal <= "100"))
  {
    alert("请在 t3 域中输入值 大于或等于 0 与 小于或等于 100。");
    theForm.t3.focus();
    return (false);
  }

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t4.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("在 t4 域中，只能输入 数字 个字符。");
    theForm.t4.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("请在 t4 域中输入一个有效数字。");
    theForm.t4.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseFloat(allNum);
  if (chkVal != "" && !(prsVal >= "0" && prsVal <= "100"))
  {
    alert("请在 t4 域中输入值 大于或等于 0 与 小于或等于 100。");
    theForm.t4.focus();
    return (false);
  }

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t37.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("在 t37 域中，只能输入 数字 个字符。");
    theForm.t37.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("请在 t37 域中输入一个有效数字。");
    theForm.t37.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseFloat(allNum);
  if (chkVal != "" && !(prsVal >= "0" && prsVal <= "100"))
  {
    alert("请在 t37 域中输入值 大于或等于 0 与 小于或等于 100。");
    theForm.t37.focus();
    return (false);
  }

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t5.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("在 t5 域中，只能输入 数字 个字符。");
    theForm.t5.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("请在 t5 域中输入一个有效数字。");
    theForm.t5.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseFloat(allNum);
  if (chkVal != "" && !(prsVal >= "0" && prsVal <= "100"))
  {
    alert("请在 t5 域中输入值 大于或等于 0 与 小于或等于 100。");
    theForm.t5.focus();
    return (false);
  }

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t31.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("在 t31 域中，只能输入 数字 个字符。");
    theForm.t31.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("请在 t31 域中输入一个有效数字。");
    theForm.t31.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseFloat(allNum);
  if (chkVal != "" && !(prsVal >= "0" && prsVal <= "50000"))
  {
    alert("请在 t31 域中输入值 大于或等于 0 与 小于或等于 50000。");
    theForm.t31.focus();
    return (false);
  }

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t6.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("在 t6 域中，只能输入 数字 个字符。");
    theForm.t6.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("请在 t6 域中输入一个有效数字。");
    theForm.t6.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseFloat(allNum);
  if (chkVal != "" && !(prsVal >= "0" && prsVal <= "100"))
  {
    alert("请在 t6 域中输入值 大于或等于 0 与 小于或等于 100。");
    theForm.t6.focus();
    return (false);
  }

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t38.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
  {
    alert("在 t38 域中，只能输入 数字 个字符。");
    theForm.t38.focus();
    return (false);
  }

  if (decPoints > 1)
  {
    alert("请在 t38 域中输入一个有效数字。");
    theForm.t38.focus();
    return (false);
  }

  var chkVal = allNum;
  var prsVal = parseFloat(allNum);
  if (chkVal != "" && !(prsVal >= "0" && prsVal <= "100"))
  {
    alert("请在 t38 域中输入值 大于或等于 0 与 小于或等于 100。");
    theForm.t38.focus();
    return (false);
  }

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t7.value;
  var allValid = true;
  var decPoints = 0;
  var allNum = "";
  for (i = 0;  i < checkStr.length;  i++)
  {
    ch = checkStr.charAt(i);
    for (j = 0;  j < checkOK.length;  j++)
      if (ch == checkOK.charAt(j))
        break;
    if (j == checkOK.length)
    {
      allValid = false;
      break;
    }
    if (ch == ".")
    {
      allNum += ".";
      decPoints++;
    }
    else if (ch != ",")
      allNum += ch;
  }
  if (!allValid)
12345

⌨️ 快捷键说明

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