Mitsubishi Electric MELSEC System Q QJ71E71-100 Manual De Usuario página 367

APPENDIX
Private Sub Command3_Click()
'
' Desconexión
'
Dim rtn As Long
' Desconexión
rtn = ActEasyIF1. Close()
If rtn = 0 Then
MsgBox "The disconnection was successful"
Else
MsgBox "Disconnection Error:" & Hex(rtn)
End If
End Sub
//
// Conexión
//
void CVCDlg::OnOpen()
{
long lRet;
CString szMessage;
UpdateData();
// Consiga Número Lógico de Estación
m_actEasyIF. SetActLogicalStationNumber ( m_lLogicalStationNumber ):
// Conexión
lRet = m_actEasyIF. Open();
if ( lRet == 0) {
MessageBox ( "The connection was successful" )
} else {
szMessage. Format ( "Connection Error: %x", lRet );
MessageBox ( szMessage )
}
}
App - 34
(b) Cuando se usa Visual C++
®
MELSEC-Q
App - 34