.版本 2
.程序集 窗口程序集1
.程序集变量 程序集_数据, 字节集
.子程序 _按钮1_被单击
信息框 (客户1.连接 (“bbs.eyuyan.com”, 80), 0, )
' 信息框 (客户1.连接 (“www.e-sos.cn”, 80), 0, )
程序集_数据 ＝ { }
信息框 (客户1.发送数据 (“GET http://bbs.eyuyan.com/skins/newyear2009/logo.gif” ＋ #换行符 ＋ #换行符), 0, )
' 信息框 (客户1.发送数据 (“GET http://www.e-sos.cn/esos/images/world-e.gif” ＋ #换行符 ＋ #换行符), 0, )
' http://www.e-sos.cn/esos/images/world-e.gif
' http://bbs.eyuyan.com/skins/newyear2009/logo.gif
.子程序 _客户1_数据到达
程序集_数据 ＝ 程序集_数据 ＋ 客户1.取回数据 ()
输出调试文本 (到文本 (程序集_数据))
' 暂停 ()
图片框1.图片 ＝ 取字节集右边 (程序集_数据, 取字节集长度 (程序集_数据) － 寻找字节集 (程序集_数据, 到字节集 (“GIF89”), ) ＋ 1)
写到文件 (“c:\1234567.gif”, 取字节集右边 (程序集_数据, 取字节集长度 (程序集_数据) － 寻找字节集 (程序集_数据, 到字节集 (“GIF89”), ) ＋ 1))
