Kbase P60420: How to create a drop down menu in Webspeed ?
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
22/12/2003 |
|
Status: Unverified
GOAL:
How to create a drop down menu in Webspeed ?
FACT(s) (Environment):
Progress 3.1D
FIX:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<title>Untitled</title>
</head>
<body>
<form action="combo.html" method="POST">
<table border="1">
<tr>
<td>
Number of customers :
<input type="text" size="3" maxlength="3" name="vnum">
</td>
</tr>
<tr>
<td>
<select name="select">
<script language='speedscript'>
DEF VAR cnum AS INTEGER.
IF INTEGER(get-value("vnum")) = 0 OR INTEGER(get-value("vnum")) = ?
THEN ASSIGN cnum = 5 /* random initial value*/.
ELSE ASSIGN cnum = INTEGER(get-value("vnum")).
FOR EACH customer WHERE custnum <= cnum :
{&OUT} "<OPTION>" name "</OPTION>" SKIP.
END.
</script>
</select>
</td>
</tr>
<tr>
<td>
<input type="submit" value="POST" width="7">
</td>
</tr>
</table>
</form>
</body>
</html>