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

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

本帖最后由 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

时不时来看看 {:face (229):}

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 )
        $read = ReabTableDb($conn, "SELECT Photo FROM StockImage WHERE Ids = '" & $aa & "'")
        $file=FileOpen( $ScriptDir&"\Photo\"&$aa, 2+8+16)
        FileWrite ($file,$read)
        FileClose($file)
        GUICtrlSetImage ($Pic1,$ScriptDir&"\Photo\"&$aa)
EndFunc

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

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

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

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

等待神的出现!
页: [1] 2
查看完整版本: 【已解决】 UDP发送一张图片到服务端如何保存