Mitsubishi Electric MELSEC-Q Series User Manual page 47

Hide thumbs Also See for MELSEC-Q Series:
Table of Contents

Advertisement

(2) test1.asp
<%@ Language=VBScript %>
<%
Option Explicit
Dim Password 'Password(not set)
Dim disp
'Return value
Dim Value
'Result
Dim DevData 'Device data(use input value)
Dim Answer
'For display
%>
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" Content="text/html; charset=x-sjis">
<META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0">
</HEAD>
<%
If Request.ServerVariables("REQUEST_METHOD")="POST" Then
Dim Object
Set Object=Server.CreateObject("QeAccess.McProtcol")
Dim HostName 'Host name
HostName=" . . . "
Dim NetNo
NetNo="00"
Dim PcNo
PcNo="FF"
Dim CpuTime
CpuTime="0040"
'Click Set,Clear
If Request.Form("SetData")<>"" Then
'Call command data
Dim DevCode
DevCode="M*"
Dim DevNo
DevNo="000100"
CHAPTER 5 EXAMPLE OF CREATING FILE FOR ACCESSING PROGRAMMABLE CONTROLLER
'Communication library
'Network number
'PC number
'CPU monitoring timer
'Device code
'Device number
5
45

Advertisement

Table of Contents
loading

Table of Contents