{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fnil\fcharset0 Courier New;}}
{\*\generator Msftedit 5.41.15.1507;}\viewkind4\uc1\pard\lang1033\f0\fs20 function submitonce(theform)\par
\{\par
\tab //if IE 4+ or NS 6+\par
\tab if (document.all||document.getElementById)\par
\tab\{\par
\tab //screen thru every element in the form, and hunt down "submit" and "reset"\par
\tab\tab for (i=0;i<theform.length;i++)\par
\tab\tab\{\par
\tab\tab var tempobj=theform.elements[i]\par
\tab\tab if(tempobj.type.toLowerCase()=="submit" )\par
\tab\tab //disable em\par
\tab\tab tempobj.disabled=true\par
\tab\tab\}\par
\tab\}\par
\}\par
}
 
