Mitsubishi Electric MELSEC-Q Series User Manual page 53

Answer="Abnormal completion " & Mid(Value,19,4)
End Select
Case "<!NG>"
Answer="Abnormal completion" & Mid(disp,Instr(disp,"error")+Len("error")+1,4)
End Select
%>
<TEXTAREA NAME="Answer" ROWS=5><%=Answer%></TEXTAREA>
<INPUT TYPE=BUTTON VALUE=Clear ONCLICK="this.form.elements['Answer'].value=''">
</TH></TR>
</TABLE>
</FORM></P>
</BODY>
</HTML>
<SCRIPT LANGUAGE=javascript>
<!--
function check_number(element)
{
var i;
for(i=0;i<element.value.length;i++)
{
if ("0123456789".indexOf(element.value.charAt(i))==-1)
{
alert(element.name+'Enter using a numeric value');
element.value='';
element.focus();
return false;
}
}
return true;
}
//-->
</SCRIPT>
CHAPTER 5 EXAMPLE OF CREATING FILE FOR ACCESSING PROGRAMMABLE CONTROLLER
5
51