VB中的DDE是什么技術(shù)

DDE是一種動態(tài)數(shù)據(jù)交換機(jī)制（Dynamic Data Exchange，DDE），是 16 位 Windows 時(shí)代實(shí)現(xiàn)不同應(yīng)用程序之間互相交換數(shù)據(jù)和控制的技術(shù)。使用DDE通訊需要兩個Windows應(yīng)用程序，其中一個作為服務(wù)器處理信息，另外一個作為客戶機(jī)從服務(wù)器獲得信息。客戶機(jī)應(yīng)用程序向當(dāng)前所激活的服務(wù)器應(yīng)用程序發(fā)送一條消息請求信息，服務(wù)器應(yīng)用程序根據(jù)該信息作出應(yīng)答，從而實(shí)現(xiàn)兩個程序之間的數(shù)據(jù)交換。目前此技術(shù)已經(jīng)被淘汰。

創(chuàng)新互聯(lián)公司2013年至今，是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司，擁有項(xiàng)目成都網(wǎng)站建設(shè)、做網(wǎng)站網(wǎng)站策劃，項(xiàng)目實(shí)施與項(xiàng)目整合能力。我們以讓每一個夢想脫穎而出為使命，1280元平?jīng)鲎鼍W(wǎng)站,已為上家服務(wù),為平?jīng)龈鞯仄髽I(yè)和個人服務(wù),聯(lián)系電話:18982081108

VB DDE連接問題

我認(rèn)為那是肯定的，源內(nèi)容肯定是更換了地址或已刪除，原來的地址自然登陸不上去了。

VB 6.0 下能不能用DDE通訊啊 總是提示282錯誤，外部程序沒有響應(yīng)

VB 6.0 下能用DDE通訊.要設(shè)置窗體和控件的link屬性。很簡單的，去看看幫助吧。

用vb.net實(shí)現(xiàn)網(wǎng)絡(luò)通信

用 vb.net socket通信

Dim th As Threading.Thread

2 Dim tcpl As System.Net.Sockets.TcpListener

3

4 Private Sub Form1_Load()Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

5 th = New System.Threading.Thread(New System.Threading.ThreadStart(AddressOf MyListen))

6 th.Start()

7 End Sub

8

9 Public Sub SendMessage()Sub SendMessage(ByVal IP As String, ByVal SendMsg As String)

10 Try

11 If IP "" Then

12 Dim tcpc As New System.Net.Sockets.TcpClient(IP, 5656)

13 Dim tcpStream As Net.Sockets.NetworkStream = tcpc.GetStream

14 Dim reqStream As New IO.StreamWriter(tcpStream)

15 reqStream.Write(SendMsg)

16 reqStream.Flush()

17 tcpStream.Close()

18 tcpc.Close()

19 End If

20 Catch ex As Exception

21 MsgBox(ex.Message.ToString)

22 End Try

23 End Sub

24 Private Sub MyListen()Sub MyListen()

25 Try

26 Dim ipAddress As System.Net.IPAddress = System.Net.Dns.Resolve(System.Net.Dns.GetHostName).AddressList(0)

27 tcpl = New System.Net.Sockets.TcpListener(ipAddress, 5656)

28 tcpl.Start()

29 While True

30 Dim s As System.Net.Sockets.Socket = tcpl.AcceptSocket()

31 Dim MyBuffer(1024) As Byte

32 Dim i As Integer

33 i = s.Receive(MyBuffer)

34 If i 0 Then

35 Dim lstrRec As String

36 Dim j As Integer

37 For j = 0 To i - 1

38 TextBox1.Text += Chr(MyBuffer(j)) ","

39 Next

40 End If

41 End While

42 Catch ex As Exception

43 MsgBox(ex.Message.ToString)

44 End Try

45 End Sub

46

47 Private Sub Button1_Click()Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

48 SendMessage("192.168.0.61", TextBox2.Text)

49 End Sub

當(dāng)前題目：vb.netdde通訊,vb網(wǎng)絡(luò)通信
網(wǎng)站網(wǎng)址：http://jinyejixie.com/article42/hsidec.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供動態(tài)網(wǎng)站、微信公眾號、網(wǎng)站排名、標(biāo)簽優(yōu)化、企業(yè)網(wǎng)站制作、搜索引擎優(yōu)化

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時(shí)需注明來源： 創(chuàng)新互聯(lián)