1.asp

《管式加热炉设计计算程序》本程序依据《管式加热炉规范》 SY/T0538-2004进行开发而成。适用于油田、长输管道圆筒型管式加热炉（包括丁头管、翅片管）的热力计算、水力计算、阻力计算及强度计算。

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t16.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("在 t16 域中，只能输入 数字 个字符。");
    theForm.t16.focus();
    return (false);
  }

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

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

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t17.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("在 t17 域中，只能输入 数字 个字符。");
    theForm.t17.focus();
    return (false);
  }

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

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

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t18.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("在 t18 域中，只能输入 数字 个字符。");
    theForm.t18.focus();
    return (false);
  }

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

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

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t19.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("在 t19 域中，只能输入 数字 个字符。");
    theForm.t19.focus();
    return (false);
  }

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

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

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t20.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("在 t20 域中，只能输入 数字 个字符。");
    theForm.t20.focus();
    return (false);
  }

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

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

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t21.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("在 t21 域中，只能输入 数字 个字符。");
    theForm.t21.focus();
    return (false);
  }

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

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

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t32.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("在 t32 域中，只能输入 数字 个字符。");
    theForm.t32.focus();
    return (false);
  }

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

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

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t22.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("在 t22 域中，只能输入 数字 个字符。");
    theForm.t22.focus();
    return (false);
  }

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

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

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t23.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("在 t23 域中，只能输入 数字 个字符。");
    theForm.t23.focus();
    return (false);
  }

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

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

  var checkOK = "0123456789-.,";
  var checkStr = theForm.t24.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("在 t24 域中，只能输入 数字 个字符。");
    theForm.t24.focus();
    return (false);
  }

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

  var chkVal = allNum;