Foxtable(狐表)用户栏目专家坐堂 → 关于把压缩包转换成字节数组


  共有4725人关注过本帖树形打印复制链接

主题:关于把压缩包转换成字节数组

帅哥哟,离线,有人找我吗?
s111321
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:44 积分:510 威望:0 精华:0 注册:2020/6/27 10:03:00
关于把压缩包转换成字节数组  发帖心情 Post By:2022/10/20 14:45:00 [只看该作者]

1       9101-文件上传输入文件为TXT文件的ZIP压缩包,TXT文件各数据项以“TAB”制表符隔开,并按照输出文件参数说明序号排序,每行数据占据一行;

2        9101入参代码“in”为字节数组,机构需要将上传的ZIP文件转换为字节数组(有符号)填到“in”中,如下入参示例:

3         9101入参代码“文件名”、“机构编号”按医院上传情况填写;

4)         成功上传后,【9101】会把“文件名”和“文件查询号”返回,his系统需要保存此文件名和文件查询号(file_ q u r y _ no)用于后续文件下载。


{


"infno": "9101",


"msgid": "H44200100048202012141712113480",


"mdtrtarea_admvs":"330101",


"insuplc_admdvs": "330101",


"recer_sys_code": "DAREWAY",


"dev_no": "test-PC",


"dev_safe_info": "",


"cainfo": "",


"signtype": "",


"infver": "V1.0",


"opter_type": "1",


"opter": "TEST",


"opter_name": "test",


"inf_time": "2020-12-14 17:12:11",


"fixmedins_code": "H33010100001",


"fixmedins_name": "测试医院",


"sign_no": "1230232",


"input": {


"fsUploadIn": {


"in": [80,75,3,4,20,0,0,0,8,0,-52,-119,-114,81,71,122,-6,22,44,0,0,0,60,0,0,0,21,0,0,0,72,52,52,50,48,48,49,48,48,48,49,56,45,51,50,48,50,46,116,120,116,61,-119,-79,13,0,32,12,-61,-26,60,83,37,-91,-123,-14,-1,99,100,-62,-109,101,-117,-84,-108,54,44,77,-35,70,85,-14,-29,122,-92,-63,98,54,-61,-30,55,21,18,8,62,80,75,1,2,31,0,20,0,0,0,8,0,-52,-119,-114,81,71,122,-6,22,44,0,0,0,60,0,0,0,21,0,36,0,0,0,0,0,0,0,32,0,0,0,0,0,0,0,72,52,52,50,48,48,49,48,48,48,49,56,45,51,50,48,50,46,116,120,116,10,0,32,0,0,0,0,0,1,0,24,0,103,-35,-49,-124,-7,-47,-42,1,-115,-32,-128,68,-10,-50,-42,1,-115,-32,-128,68,-10,-50,-42,1,80,75,5,6,0,0,0,0,1,0,1,0,103,0,0,0,95,0,0,0,0,0],


"filename": "H44200100018-3202.zip",


"fixmedins_code": "H44200100018"


}


}

}



 回到顶部
帅哥哟,离线,有人找我吗?
s111321
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:44 积分:510 威望:0 精华:0 注册:2020/6/27 10:03:00
  发帖心情 Post By:2022/10/20 14:46:00 [只看该作者]

之前根据蓝老师的方法,下载的解决了,还有这个上传文件的帮忙看看

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106207 积分:540158 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/20 14:55:00 [只看该作者]

Dim data() As Byte = System.IO.File.ReadAllBytes("c:\abc.zip")

 回到顶部