Hej! För något år sedan skrev jag så här. Tack för svaret!DDE-koppling i VB6
Jag försöker mig på att göra en VB6-applikation med en DDE-koppling mot IRC-klienten mIRC.
Saken är den att jag får det inte att fungera så bra.
Jag har hittat exempelkod på nätet som fungerar, men det fungerar bara om man sänder ett kommando genom att trycka på en knapp. Använder jag EXAKT samma kod fast i ett annat event (t.ex. Form_Load eller Text1_Change) så skickas det aldrig något kommando via DDE.
Det jag är ute efter är att kunna ta emot info från IRC-klienten, bearbeta denna, och skicka tillbaks den till klienten. Får dock inte till det riktigt. Bör nämnas att det var en redig stund sen jag arbetade i VB6.Sv: DDE-koppling i VB6
DDE fungerar ungefär som ett telefonsamtal
1. Lägg på luren
2. Slå nummer
3. Vänta på svar
4. Lyft luren
5. Prata
6. Lyssna
7. Lägg på luren
I Vb blir det
1. .LinkMode = vbLinkNone
2. .LinkTopic = "Vad skall vi länka mot"
3. .LinkTimeout = 1000
4. .LinkMode = vbLinkManual
5. .LinkPoke eller LinkExecute
6. .LinkRequest
7. .LinkMode = vbLinkNoneSv:DDE-koppling i VB6
Tyvärr fungerar det, som jag sa i frågan, endast i ett event (t.ex. Button1_Click) t.ex:
Private Sub btnSend_Click()
txtCommand.LinkMode = vbLinkNone
txtCommand.LinkTopic = "mIRC|command"
txtCommand.LinkTimeout = 1000
txtCommand.LinkMode = vbLinkManual
txtCommand.LinkExecute (txtCommand.Text)
txtCommand.LinkMode = vbLinkNone
End Sub
Men ej om man gör en egen metod t.ex:
Private Sub SendCommand()
txtCommand.LinkMode = vbLinkNone
txtCommand.LinkTopic = "mIRC|command"
txtCommand.LinkTimeout = 1000
txtCommand.LinkMode = vbLinkManual
txtCommand.LinkExecute (txtCommand.Text)
txtCommand.LinkMode = vbLinkNone
End Sub