We help IT Professionals succeed at work.
Get Started

Disable submit button after click (Interdev DesignerControl Button)... why isn't this easy?

E-Squared
E-Squared asked
on
13,781 Views
Last Modified: 2013-12-24
I have been blessed to be given a huge legacy of web code written in Visual InterDev 6.0. We are having a problem with duplicate orders being submitted when users click submit multiple times. I assumed this would be an easy fix... just disable the button on the first click, right?

Well, I couldn't figure it out. So we assigned it to the previously-senior-but-now-parttime-programmer who wrote most of the stuff in the first place and SHE couldn't figure it out.

I searched the web fruitlessly. The question is too specific, or too vague, or something, to be susceptible to easy search terms. (Suggestions welcome!)

My company understandably doesn't want me to spend days on such a simple problem, coming up to speed on all the ins and outs of interdev controls and writing/rewriting ASPs just to fix what should be a simple problem. I would really appreciate anyone's help.

The pages are VB .ASP and the submit button is some special Microsoft control and looks like this in the source page (not visible from inside interdev, but what is written out to the actual .asp file):

<!--METADATA TYPE="DesignerControl" startspan
<OBJECT
    classid="clsid:B6FC3A14-F837-11D0-9CC8-006008058731"
    height=27 id=btnSubmit
    style="HEIGHT: 27px; LEFT: 0px; TOP: 0px; WIDTH: 206px"
    width=206>
    <PARAM NAME="_ExtentX" VALUE="5450">
    <PARAM NAME="_ExtentY" VALUE="714">
    <PARAM NAME="id" VALUE="btnSubmit">
    <PARAM NAME="Caption" VALUE="">
    <PARAM NAME="Image" VALUE="images/ButtonSubmit.gif">
    <PARAM NAME="AltText" VALUE="Submit this new order.">
    <PARAM NAME="Visible" VALUE="-1">
    <PARAM NAME="Platform" VALUE="0">
    <PARAM NAME="LocalPath" VALUE="">
</OBJECT>
-->
<!--#INCLUDE FILE="_ScriptLibrary/Button.ASP"-->
<SCRIPT LANGUAGE=JavaScript RUNAT=Server>
function _initbtnSubmit()
{
    btnSubmit.src = 'images/ButtonSubmit.gif';
    btnSubmit.alt = 'Submit this new order.';
    btnSubmit.setStyle(1);
}
function _btnSubmit_ctor()
{
    CreateButton('btnSubmit', _initbtnSubmit, null);
}
</script>
<% btnSubmit.display %>

<!--METADATA TYPE="DesignerControl" endspan-->

The event handler looks like this:

[<SCRIPT ID=serverEventHandlersVBS LANGUAGE=vbscript RUNAT=Server>
    Sub btnSubmit_onclick()
{Code to submit order here}
    End Sub
</SCRIPT>

When visiting the page, the client source shows the control rendered thus:

<A href="javascript:thisPage._fireEvent('btnSubmit','onclick');"><IMAGE border=0 name="btnSubmit" id="btnSubmit" src="images/ButtonSubmit.gif" alt="Submit this order.">

The easiest way to fix this, I thought, would be to disable the submit button. But, I don't have access to the inner javascript of the control when it is displayed or I'd just disable it from the client side:

"javascript:{control.visible=false or something!};thisPage._fireEvent('btnSubmit','onclick');"

So then I tried putting server-side code at the top of the btnSubmit_onclick event to disable or make the button invisible.

document.getElementById("lblresubmit").style.visibility = "visible"

Didn't work. I realized it probably had to be a client action. So I tried

Response.Write "<SCRIPT language=vbscript>document.getElementById('lblresubmit').style.visibility = 'invisible'</SCRIPT>"

(Well... I don't know if the syntax above is correct, but I did do it right when I was trying it.)

Which 'works' but the problem is that when you click the submit button, it refreshes the page (but doesn't navigate to a new one, yet, until the server response is received), and the response.write output ends up being first in the source, before <HTML>, when there IS no control yet.

I can think of several methods to prevent actual submission of the second and subsequent orders, but the best thing would be to disable the button (while it waits for a response from the server which loads a new page).

Ready to tear my hair out,

-E²

P.S. Thank you very much for your time!!!
Comment
Watch Question
Commented:
This problem has been solved!
Unlock 1 Answer and 7 Comments.
See Answer
Why Experts Exchange?

Experts Exchange always has the answer, or at the least points me in the correct direction! It is like having another employee that is extremely experienced.

Jim Murphy
Programmer at Smart IT Solutions

When asked, what has been your best career decision?

Deciding to stick with EE.

Mohamed Asif
Technical Department Head

Being involved with EE helped me to grow personally and professionally.

Carl Webster
CTP, Sr Infrastructure Consultant
Ask ANY Question

Connect with Certified Experts to gain insight and support on specific technology challenges including:

  • Troubleshooting
  • Research
  • Professional Opinions
Did You Know?

We've partnered with two important charities to provide clean water and computer science education to those who need it most. READ MORE