Quantcast
Channel: Visual COBOL
Viewing all articles
Browse latest Browse all 5819

Forum Post: RE: Clean WebForm

$
0
0
Hi, This code should do it:-       method-id Button1_Click protected.       procedure division using by value lnkSender as object lnkEvent as type System.EventArgs.           invoke self::EmptyControls(self::Page::Form::Controls)         end method.       method-id EmptyControls private.       local-storage section.       01  myControl           type System.Web.UI.Control.       01  myTextBox           type System.Web.UI.WebControls.TextBox.       procedure division using by value lnkControls as type System.Web.UI.ControlCollection.           perform varying myControl through lnkControls               if myControl is instance of type System.Web.UI.WebControls.TextBox                   set myTextBox to myControl as type System.Web.UI.WebControls.TextBox                   set myTextBox::Text to type System.String::Empty               end-if           end-perform       end method. Regards David

Viewing all articles
Browse latest Browse all 5819

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>