Announcement

Collapse
No announcement yet.

Has anyone played with the Perl DDE Module ?

Collapse
X
 
  • Filter
  • Time
  • Show
Clear All
new posts

  • Has anyone played with the Perl DDE Module ?

    I am wondering if anyone has a working perl script I can look at, or has enough knowledge of DDE to figure out how I can grab data. It looks like I am connecting to the DDE server (QLink) but I must not be requesting the data the correct way from the DDE Server.

    Its seems simple enough, all I can do is..
    Request(ITEM)
    Returns the value of ITEM from the DDE server.

    Poke (ITEM, VALUE)
    Pokes VALUE into ITEM at the DDE server.

    Execute (CMD)
    Executes CMD at the DDE server.

    Hopefully someone here can help me out .

    ======= Quick Code ==========
    #!c:\perl\bin\perl.exe
    use Win32:DE::Client;

    $Client = new Win32:DE::Client ('QLink', 'TS');
    die "Unable to initiate conversation" if $Client->Error;

    $ts =$Client->Request ('IBM,10,DEIPSCT,HEADERS');
    print "$ts\n";

    $Client->Disconnect;
    =========================
    Last edited by jmhuff-2; 05-17-2008, 12:59 AM.
    ..

  • #2
    I also grabbed a DDE Client from here http://www.faweb.net/us/ioserver/sample_vb.html

    I can connect with
    AppName: QLink
    Topic: TS

    What syntax does the Item have to be in to request?
    ..

    Comment

    Working...
    X