AdsWrite[Datatype]Connect

AdsWriteBoolConnect

AdsWriteIntegerConnect

AdsWriteLongConnect

AdsWriteSingleConnect

AdsWriteDoubleConnect

Stellt eine feste Verbindung zwischen einer Visual Basic-Variablen vom Typ Boolean, Integer, Long, Single oder Double und einem Datum aus einem ADS-Gerät her.

object.AdsWrite[Datatype]Connect(
  nIndexGroupAs Long,
  nIndexOffset As Long,
  cbLength As Long,
  nRefreshType As Integer,
  nCycleTime As Integer,
  pData As [Datatype]
) As Long

Parameter

nIndexGroup

[in] Index-Gruppe der ADS-Variable

nIndexOffset

[in] Index-Offset der ADS-Variable

cbLength

[in] Länge der Daten in Byte (siehe VB-Variablenlängen)

nRefreshType

[in] Art des Datenaustausches zwischen VB-Variable und ADS-Variable (siehe Datentyp ADSOCXTRANSMODE)

nCycleTime

[in] Schreib-Zyklus in ms

pData

[in] Visual Basic-Variable, aus der die Daten in die ADS-Variable geschrieben werden

Rückgabewert

Siehe ADS-Fehlercodes

Bemerkungen

Wird die Verbindung der ADS-Variable nicht mehr benötigt, sollte diese über die Methode AdsWrite[Datatype]Disconnect() wieder freigegeben werden. Wenn in einer Form nur bestimmte Werte benötigt werden, sollte die Verbindung erst beim Laden der Form erzeugt werden und beim Schließen der Form wieder freigegeben werden.

Beispiel

Dim VBVar As Integer

'wird beim Starten des Programms aufgerufen ---
Private Sub Form_Load()
    'Verbindung zur Variable herstellen
    Call AdsOcx1.AdsWriteIntegerConnect(&H4020&, 0&, 2&, 1, 110, VBVar)
End Sub

'wird beim Beenden des Programms aufgerufen
Private Sub Form_Unload(Cancel As Integer)
    'Verbindung zu den Variablen in SPS beenden
    Call AdsOcx1.AdsWriteIntegerDisconnect(VBVar)
End Sub

'wird durch den Bediener aufgerufen
Private Sub Cmd_write_Click()
    VBVar = CInt(Text1.Text)
End Sub