Hi Everybody,
I was wondering how I can make my program recive DDE commands... Any ideas?
Printable View
Hi Everybody,
I was wondering how I can make my program recive DDE commands... Any ideas?
What do you mean, are you setting up communication between your apps?
Basicly, Yes
I'm trying to make an application handle DDE commands sent to it. My problem is HOW do I make my application into a DDE server and what event is used in the form to handle incoming DDE commands...?
Ideas Anyone...?
Well actually i'm not sure about the commands, but here's something for you to start, since i haven't used DDE that much. Should work... as communication
Code:'CLient project form
VERSION 5.00
Begin VB.Form Form1
Caption = "DDE Server"
ClientHeight = 555
ClientLeft = 60
ClientTop = 345
ClientWidth = 3390
LinkMode = 1 'Source
LinkTopic = "Form1"
ScaleHeight = 555
ScaleWidth = 3390
StartUpPosition = 3 'Windows Default
Begin VB.TextBox Text1
Height = 285
Left = 120
TabIndex = 0
Text = "Text1"
Top = 120
Width = 3135
End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
'CLient project form
VERSION 5.00
Begin VB.Form Form1
Caption = "DDE Client Demo"
ClientHeight = 600
ClientLeft = 60
ClientTop = 345
ClientWidth = 2565
LinkTopic = "Form1"
ScaleHeight = 600
ScaleWidth = 2565
StartUpPosition = 3 'Windows Default
Begin VB.Timer Timer1
Interval = 2000
Left = 2040
Top = 0
End
Begin VB.Label Label1
Caption = "Label1"
Height = 375
Left = 120
LinkItem = "Text1"
LinkTopic = "Server|Form1"
TabIndex = 0
Top = 0
Width = 2055
Visible = 0 'False
End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
'LINKITEM är den control som man ska linka till, dvs text1
Private Sub Label1_Change()
Caption = Label1.Caption
End Sub