DDEPoke (statement)

Syntax DDEPoke channel, DataItem, value
Description Sets the value of a data item in the receiving application associated with an open DDE link.
Comments The DDEPoke statement takes the following parameters:
Parameter Description
Channel Integer containing the DDE channel number returned from DDEInitiate. An error will result if channel is invalid.
DataItem Data item to be set. This parameter can be any expression convertible to a String. The format depends on the server.
Value The new value for the data item. This parameter can be any expression convertible to a String. The format depends on the server. A runtime error is generated if value is Null.
Example This example sets and retrieves a cell in an Excel spreadsheet. 
Sub Main()
  Dim cmd,q,ch%
  Q = Chr(34) ' Define quotation marks.
 
  Id = Shell("c:\excel5\excel.exe",3) 'Start Excel.
  Ch% = DDEInitiate("Excel","Sheet1")
 
  On Error Resume Next
  cmd = "[ACTIVATE(" & q &"SHEET1" & q & ")]" 'Activate worksheet.
  DDEExecute ch%,cmd
 
  DDEPoke ch%,"R1C1","$1000.00"   'Send value to cell.
  'Retrieve value and display.
  MsgBox "The value of Row 1, Cell 1 is: " & DDERequest(ch%,"R1C1")
 
  DDETerminate ch%
  Msgbox "Finished..."
End Sub
See Also DDEExecute (statement); DDEInitiate (function); DDERequest, DDERequest$ (functions); DDESend (function); DDETerminate (statement); DDETerminateAll (statement); DDETimeout (statement).