【已解决】 UDP发送一张图片到服务端如何保存

261869247 · 发表于 2010-7-26 19:14:49

本帖最后由 261869247 于 2010-7-27 23:32 编辑

服务端

UDPStartup()
$socket = UDPBind("127.0.0.1", 12345)
If @error <> 0 Then Exit
While 1
 $data = UDPRecv($socket, 1024 * 1000, 1)
 If $data <> "" Then
 MsgBox(0, "UDP 数据", $data, 1)
 $data = BinaryToString($data, 4);增加：将二进制数据转换成字符
 $aSplit = StringSplit($data, " ")
EndIf
WEnd

发送端

; 客户端
UDPStartup()
$socket = UDPOpen("127.0.0.1", 12345)
UDPSend($socket,StringToBinary ("1.jpg",4))

261869247 · 发表于 2010-7-26 21:43:46

时不时来看看

rikthhpgf2005 · 发表于 2010-7-26 21:46:55

将文件以二进制分块发送,

261869247 · 发表于 2010-7-26 21:48:02

我总是不会活用

menfan1 · 发表于 2010-7-26 21:54:23

TCPSend（）？

261869247 · 发表于 2010-7-26 21:56:20

本帖最后由 261869247 于 2010-7-27 08:36 编辑

恩U 楼上大哥你看UDP怎么弄

261869247 · 发表于 2010-7-26 22:48:23

刚刚修改了下代码服务端已经能接收到2进制数据了不知道怎么保存到服务器某个目录(d:\123\ 这样)

261869247 · 发表于 2010-7-27 09:02:23

期待中帖子不能沉！

261869247 · 发表于 2010-7-27 10:39:10

都快沉了！！

afan · 发表于 2010-7-27 10:40:48

对这方面比较精通的几位坛友貌似还没上线… 记得好像那个“24”头像的对此有研究

261869247 · 发表于 2010-7-27 11:25:11

哈哈那我在线等！

261869247 · 发表于 2010-7-27 14:32:55

继续等待！

jhun · 发表于 2010-7-27 15:35:11

很简单的，我做过，这是我强制同步SQL的图片的代码

Func _UpdatePic();上传图片
        $aa=_GUICtrlListView_GetItemTextArray($ListView2, -1)
        FileDelete ( $ScriptDir&"\Photo"&$aa[1] )
        $read = ReabTableDb($conn, "SELECT Photo FROM StockImage WHERE Ids = '" & $aa[1] & "'")
        $file=FileOpen( $ScriptDir&"\Photo"&$aa[1], 2+8+16)
        FileWrite ($file,$read[0][0])
        FileClose($file)
        GUICtrlSetImage ($Pic1,$ScriptDir&"\Photo"&$aa[1])
EndFunc

261869247 · 发表于 2010-7-27 16:43:59

本帖最后由 261869247 于 2010-7-27 16:46 编辑

要怎么把获取到的2进制字符转换成图片

261869247 · 发表于 2010-7-27 22:39:45

等待神的出现！

		自动登录	找回密码
密码			加入

[网络通信] 【已解决】 UDP发送一张图片到服务端如何保存

浏览过的版块