pb9 mswinsck.ocx 难题

2020-03-21 09:36:44 636 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

Cadence元件库介绍 Cadence安装完之后，在安装目录下，会有默认自带的一些常用元件库。例如，我的Candece安装目录为： D:\Cadence\Cadence_SPB_17.2-2016 元件库所在目录为： D:\Cadence\Cadence_SPB_17.2-2016\tools\capture\library 各个元件库对应的内容如下： AMPLIFIER.OLB 共 182 个零件，存放模拟放大器 IC，如 CA3280，TL027C，EL4093 等。 ARITHMETIC.OLB 共 182 个零件，存放阅读详情

用pb 的mswinsck控件连接一台医疗设备HL7协议，调试程序debug时都能把传输的数据接过来，直接跑程序去传输不过来，百思不得其解。其中有写日志的代码，在文件夹里能查询到数据源日志有数据传过来。请高人指点

String ls_receiver,ls_data,ls_temp,ls_graphall,ls_graph,ls_outdata,ls_xx
String lns_string[]
Long ll_num,ll_i,ll_at,ll_length,ll_j
string ls_sour1,ls_sour2,ls_sour3

winsock.Object.GetData(ref ls_receiver)

is_tempstr = ls_receiver
//messagebox('is_tempstr',is_tempstr)

IF cbx_1.Checked THEN
gf_write_log(is_deviceid,'receive-->'+ls_receiver)
END IF

//入库
if pos(is_tempstr,'M') > 0 then
insert into l_source (soufull , deviceid,ComputerName ) values (:is_tempstr,:is_deviceid,:Gs_ComputerName) ;
commit ;
gf_write_log(is_deviceid + '-original',is_tempstr)//写源数据日志
is_tempstr = '' //置空
end if

...全文