Mitsubishi Electric MELSEC-Q Series User Manual page 50
Hide thumbs
Also See for MELSEC-Q Series:
- User manual (834 pages) ,
- Reference manual (674 pages) ,
- Programming manual (624 pages)
Table of Contents
Advertisement
Answer="Normal completion"
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>
</BODY>
</HTML>
(3) test2.asp
<%@ Language=VBScript %>
<%
Option Explicit
Dim Time
Dim Password 'Password(not set)
Dim disp
Dim Value
Dim Answer
%>
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" Content="text/html; charset=x-sjis">
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
<%
If Request.QueryString("stop")="" And Request.QueryString("time")<>"" Then
'Time setting
Time=Request.QueryString("time")
%>
<!--Refresh by time-->
<META HTTP-EQUIV="Refresh" CONTENT="<%=Time%>">
<%
End If
%>
</HEAD>
<%
'Execute if time is specified
If Time<>"" Then
48
'Time
'Return value
'Result
'For display
Advertisement
Table of Contents
