dderequest( ) 函数示例

下面的示例使用 ddeinitiate( ) 在 visual foxpro 和 microsoft excel 工作表 sheetl 之间建立一个 dde 通道。‘excel’是服务名，‘sheetl’是主题名，通道号存放在内存变量 mchannum 中以供后续 dde 函数使用。dderequest( ) 请求项 r1c1 是电子表格 sheetl 的第一行第一列中的数据。

mchannum = ddeinitiate('excel', 'sheet1')
if mchannum != -1
   mrequest = dderequest(mchannum, 'r1c1')
   if !empty(mrequest) and ddelasterror( ) = 0 && 成功
      wait window 'r1c1 contents: ' + mrequest
   endif
   = ddeterminate(mchannum) && 关闭通道
endif