Slide 6.7: Radio buttons

Radio Buttons

This slide shows how to send the user input including radio buttons to a server for processing. If you select a radio button below and click the “Submit” button, the browser will call the following scripts:

7.html ⇒ Radio.cgi ⇒ Radio.pl ⇒ Radio.java

and list the corresponding cities and descriptions based on the selected sales.

01<form method="post" action="http://undcemcs01.und.edu/~wen.chen.hu/cgi-bin/jdbc/Radio.cgi"> 
02  <input type="radio"  name="sales" value="5" /> sales < 5
03  <input type="radio"  name="sales" value="10" checked="checked" /> 5 ≤ sales < 10
04  <input type="radio"  name="sales" value="15" /> 10 ≤ sales < 15
05  <input type="radio"  name="sales" value="20" /> 15 ≤ sales < 20
06  <input type="submit" name="act"   value="Submit" />
07  <input type="submit" name="act"   value="HTML source" />
08  <input type="submit" name="act"   value="CGI source" />
09  <input type="submit" name="act"   value="Perl source" />
10  <input type="submit" name="act"   value="Java source" />
11  <input type="submit" name="act"   value="Help" />
12  <input type="reset"               value="Reset" />
13</form>

sales < 5 5 ≤ sales < 10 10 ≤ sales < 15 15 ≤ sales < 20

The following code, Radio.cgi is used to set the web environment for the Oracle database:

~/public_html/cgi-bin/jdbc/Radio.cgi

1#!/usr/bin/bash
2 
3CLASSPATH=.:/usr/lib/oracle/23/client64
4CLASSPATH=$CLASSPATH:/usr/lib/oracle/23/client64/lib/ojdbc8.jar
5CLASSPATH=$CLASSPATH:/usr/lib/oracle/23/client64/lib/ottclasses.zip
6export  CLASSPATH
7 
8/usr/bin/perl  Radio.pl

The following Perl script is mainly used to process the web inputs including the radio buttons.

~/public_html/cgi-bin/jdbc/Radio.pl

01#!/usr/bin/perl
02use CGI;
03$query = new CGI;
04$act   = $query->param( 'act' );
05$sales = $query->param( 'sales' );
06 
07if ( $act eq "Submit" ) {
08  # Print HTML.
09  print ( "Content-type: text/html\n\n" );
10 
11# Use "here-doc" syntax.
12print <<EndofHTML;
13  <html>
14   <head>
15    <link rel="stylesheet" type="text/css" href="http://undcemcs01.und.edu/~wen.chen.hu/css/1.css" />
16   </head>
17   <body text="#000000" vLink="#3366CC" link="#3366CC" bgColor="#ffffff"
18     alink="#3366CC" background="http://undcemcs01.und.edu/~wen.chen.hu/bg/63.png">
19    <center>
20     <font size="+0" color="#3366CC">
21EndofHTML
22 
23  # Compose a Java command.
24  $cmd = "/usr/bin/java -Djava.security.egd=file:/dev/./urandom Radio ";
25  if    ( $sales ==  5 ) { $cmd .= "0 5";   }
26  elsif ( $sales == 10 ) { $cmd .= "5 10";  }
27  elsif ( $sales == 15 ) { $cmd .= "10 15"; }
28  else                   { $cmd .= "15 20"; }
29  print( $cmd );         system( $cmd );
30 
31print <<EndofHTML;
32     </b></font>
33    </center>
34   </body>
35  </html>
36EndofHTML
37}
38elsif ( $act eq "HTML source" ) {
39  # Print plain text.
40  print ( "Content-type: text/plain\n\n" );
41  $cmd  = "/usr/bin/lynx -dump -source " . $ENV{HTTP_REFERER};
42  $cmd .= "; echo \n\n\n\n";
43  system( $cmd );
44}
45elsif ( $act eq "CGI source" ) {
46  print ( "Content-type: text/plain\n\n" );
47  system( "/bin/cat Radio.cgi; echo \n\n\n\n" );
48}
49elsif ( $act eq "Perl source" ) {
50  print ( "Content-type: text/plain\n\n" );
51  system( "/bin/cat Radio.pl; echo \n\n\n\n" );
52}
53elsif ( $act eq "Java source" ) {
54  print ( "Content-type: text/plain\n\n" );
55  system( "/bin/cat Radio.java; echo \n\n\n\n" );
56}
57elsif ( $act eq "Help" ) {
58  print ( "Content-type: text/html\n\n" );
59  system( "/bin/cat  Help.html" );
60}
61else {
62  print( "Content-type: text/html\n\n" );
63  print( "No such option: <em>$act</em>" );
64}

The following JDBC script accesses the database and retrieves the cities and descriptions.

~/public_html/cgi-bin/jdbc/Radio.java

01/*******************************************************************
02 
03  This program shows how to list the cities and
04    descriptions in the stores and productions tables
05    based on the sales.
06 
07  To use this program, you need to create the following
08    three tables by using the following commands:
09 
10  SQL> CREATE TABLE stores (
11    2    store_key  INTEGER PRIMARY KEY,
12    3    city       VARCHAR(32) NOT NULL,
13    4    region     VARCHAR(16) NOT NULL );
14 
15  SQL> CREATE TABLE products (
16    2    product_key  INTEGER PRIMARY KEY,
17    3    description  VARCHAR(32) NOT NULL,
18    4    brand        VARCHAR(32) NOT NULL );
19 
20  SQL> CREATE TABLE sales_fact (
21    2    store_key    INTEGER,
22    3    product_key  INTEGER,
23    4    sales        NUMBER(5,2) NOT NULL,
24    5    cost         NUMBER(5,2) NOT NULL,
25    6    profit       NUMBER(5,2) NOT NULL,
26    7    PRIMARY KEY ( store_key, product_key ),
27    8    FOREIGN KEY ( store_key ) REFERENCES stores( store_key ) ON DELETE CASCADE,
28    9    FOREIGN KEY ( product_key ) REFERENCES products( product_key ) ON DELETE CASCADE );
29 
30*******************************************************************/
31 
32// Import the following packages to use JDBC.
33import  java.sql.*;
34import  java.io.*;
35import  oracle.jdbc.*;
36import  oracle.jdbc.pool.OracleDataSource;
37 
38class  Radio {
39  public static void  main( String args[ ] ) throws SQLException {
40    String user     = "C##user_id";
41    String password = "password";
42    String database = "20.185.147.112:1521/xe";
43 
44    // Open an OracleDataSource and get a connection.
45    OracleDataSource ods = new OracleDataSource( );
46    ods.setURL     ( "jdbc:oracle:thin:@" + database );
47    ods.setUser    ( user );
48    ods.setPassword( password );
49    Connection conn = ods.getConnection( );
50 
51    try {
52      // Create, compose, and execute a statement.
53      Statement stmt = conn.createStatement( );
54      String  query  = "select city, description from sales_fact f, stores s, products p ";
55      query += "where sales >= " + args[0].trim( ) + " and sales < " + args[1].trim( );
56      query += " and f.store_key=s.store_key and f.product_key=p.product_key";
57      System.out.println( query + "<b>" );
58      ResultSet rset = stmt.executeQuery( query );
59 
60      // Iterate through the result and print the data.
61      while ( rset.next( ) )
62        System.out.print( rset.getString(1) + ": " + rset.getString(2) );
63      // Close the ResultSet and Statement.
64      rset.close( );
65      stmt.close( );
66    }
67    catch ( SQLException ex ) {
68      System.out.println( ex );
69    }
70    // Close the Connection.
71    conn.close( );
72  }
73}