Gets data from a DDE server application.
DDERequest (channel, item-name)
(i) channel: same integer that was returned by DDEInitiate.
(s) item-name: identifies the data to be returned by the server.
(s) information from the server if successful, "***NACK***" on failure.
Use the DDEInitiate function to obtain a channel number.
In order to use this function successfully, you will need appropriate documentation for the server application you wish to access, which must provide information on the DDE functions that it supports and the correct syntax to use.
url = ''
If AppExist('iexplore')
browser = 'iexplore'
channel = DDEInitiate(browser, 'WWW_GetWindowInfo') ;Initialize DDE
If channel != 0 ;If DDE OK Execute DDE Command
url = DDERequest( channel,-1)
DDETerminate(channel)
EndIf
Else
Pause('','No active IE browser')
Exit
EndIf
Message('Active URL in ':browser, url)
Exit