ord_enter.stm

来自「数据库操作软件Powerbuilder实用代码集」· STM 代码 · 共 53 行

STM
53
字号
<HTML>
<TITLE>图书订购页面</TITLE>
<BODY>

<!--script
   
  var str = site.Include( "head.ssc" );
  document.writeln( str );
   
-->

<!--script
    
  //创建一个列出所有图书的查询
  qu=connection.CreateQuery("SELECT ISBN, BOOK_TITLE, BOOK_PRICE &
                             FROM BOOKS ORDER BY ISBN");

  //显示表头
  if (!qu.GetEmpty()) {
    str = "<TABLE BGCOLOR=WHITE BORDER=2 BORDERCOLORDARK>&
          <TR>&
          <TH>国际标准图书编号</TH>&
          <TH>书名</TH>&
          <TH>价格</TH>&
          </TR>&
          <CENTER>&
          <FONT color=blue face=楷体_GB2312 size=5><I>请点击要购买图书的编号</FONT><P>";
    document.writeln( "<center>" );
    document.writeln( str );

    //显示表格内容
    do {
      document.write( "<TR>" );
      for( i=1; i<=qu.GetColumnCount(); i++ ) {
   
        if( i==1 ) {
            document.write("<TD><A HREF=order.stm?isbn='" + qu.GetValue("isbn") + "'>"+qu.GetValue(1)+"</A></TD>");
        }
        else {
          document.write("<TD>" + qu.GetValue(i) + "</TD>");
        }
      }
      document.write("</TR>\n");
    } while( qu.MoveNext() );

  } else {
    document.writeln("<BR><BR><BR><FONT COLOR=RED><H2><CENTER>图书表中没有记录。</CENTER></H2></FONT>");
  }
  qu.Close();
-->

</BODY>
</HTML>

⌨️ 快捷键说明

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