Re: CGIDEV2 getting checkbox values of same name.

[Michael_Schutte@xxxxxxxxxxxx]

Sorry to post such nonsense...  I hate when I post a question and figure
out the answer on my own anyway.

Anyway... I realized that the zhbGetVarCnt   returns the number of checked
boxes, not the number of actual occurences in the html page.  Then I needed
to assign a row value to the checkbox so that I could get actual row
checked.

<input type="checkbox" name="rowsel" value=1 />

Thanks for listening.

Michael Schutte
Admin Professional
Bob Evans Farms, Inc.



web400-bounces@xxxxxxxxxxxx wrote on 02/22/2008 11:31:04 AM:

> I have in my html page.  A list of checkboxes by the same name  "rowsel"
I
> expected to be able to use the  zhbGetVarCnt('rowsel') to get the number
of
> occurences and then loop through to determine the which ones were
checked.
> However, it's working right.  I was wondering is anyone had an ideas.
>
> I found a sample on the web and I followed that sample as they have it
laid
> out but it doesn't appear to be working.   I'm always getting a number of
> occurrences of  1 and if I have a check box selected, it always looks
like
> the first one was selected.  Make sense?
>
>
> <htmlsnip>
>   <tr>
>     <td class="GBLTblDtl1Select">
>      <input type="checkbox" name="rowsel" />
>     </td>
>     <td class="GBLTblDtl1Alpha">
>      CHART
>     </td>
>     <td class="GBLTblDtl1Alpha">
>      Chart of Accounts Listing
>     </td>
>    </tr>
>    <tr>
>     <td class="GBLTblDtl2Select">
>      <input type="checkbox" name="rowsel" />
>     </td>
>     <td class="GBLTblDtl2Alpha">
>      CISCODE
>     </td>
>     <td class="GBLTblDtl2Alpha">
>      CIS Code Correction
>     </td>
>    </tr>
> </htmlsnip>
>
> <rpgsnip>
>  RecsOnPage = zhbGetVarCnt('rowsel');
>  For iX = 1 To RecsOnPage;
>      RowSelected = zhbGetVar('rowsel':iX);
>      If RowSelected <> 'on';
>         ItEr;
>      EndIf;
>      ...
>  EndFor;
> </rpgsnip>
>
> The sample I found on the web is here...
> http://www.semiug.org/docs/cgidev2_presentation.pdf  Page 63 in the pdf.
>
> Thank you for your help.
>
> Michael Schutte
> Admin Professional
> Bob Evans Farms, Inc.
>
>
> --
> This is the Web Enabling the AS400 / iSeries (WEB400) mailing list
> To post a message email: WEB400@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/web400
> or email: WEB400-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/web400.