|
@@ -62,9 +62,28 @@ func Gdyb1201(certNo string, org_name string, doctor string, fixmedins_code stri
|
62
|
62
|
//DllDef := syscall.MustLoadDLL("yh_hb_sctrl.dll")
|
63
|
63
|
//Iinit := DllDef.MustFindProc("DllGetClassObject")
|
64
|
64
|
|
65
|
|
- ole.CoInitialize(0)
|
|
65
|
+ //ole.CoInitialize(0)
|
|
66
|
+ //
|
|
67
|
+ //ole.CLSIDFromProgID("yinhai.yh_hb_sctr")
|
|
68
|
+ //
|
|
69
|
+ //
|
|
70
|
+ //unknown, err := CreateInstance(clsid, IID_IUnknown)
|
|
71
|
+ //if err != nil {
|
|
72
|
+ // return
|
|
73
|
+ //}
|
|
74
|
+ //defer unknown.Release()
|
|
75
|
+ //
|
|
76
|
+ //dispatch, err := unknown.QueryInterface(IID_IDispatch)
|
|
77
|
+ //if err != nil {
|
|
78
|
+ // return
|
|
79
|
+ //}
|
|
80
|
+ //
|
|
81
|
+ //
|
|
82
|
+ //
|
|
83
|
+
|
66
|
84
|
unknown, _ := oleutil.CreateObject("yinhai.yh_hb_sctr")
|
67
|
|
- xmlhttp, _ := unknown.QueryInterface(ole.IID_IUnknown)
|
|
85
|
+ xmlhttp, _ := unknown.QueryInterface(ole.IID_IDispatch)
|
|
86
|
+
|
68
|
87
|
var str3 string
|
69
|
88
|
//str := make([]byte, 256)
|
70
|
89
|
//str1 := make([]byte, 256)
|
|
@@ -72,7 +91,7 @@ func Gdyb1201(certNo string, org_name string, doctor string, fixmedins_code stri
|
72
|
91
|
|
73
|
92
|
result, _ := oleutil.CallMethod(xmlhttp, "yh_hb_call", "1201", string(bytesData), str3)
|
74
|
93
|
|
75
|
|
- fmt.Println(str3)
|
|
94
|
+ fmt.Println(result.Val)
|
76
|
95
|
fmt.Println("~~~~~~~~")
|
77
|
96
|
fmt.Println(result)
|
78
|
97
|
fmt.Println(result.ToString())
|
|
@@ -169,12 +188,12 @@ func Gdyb1101(certNo string, org_name string, doctor string, fixmedins_code stri
|
169
|
188
|
gdyb_url := beego.AppConfig.String("gdyb_url")
|
170
|
189
|
gdyb_paasid := beego.AppConfig.String("gdyb_paasid")
|
171
|
190
|
|
172
|
|
- DllDef := syscall.MustLoadDLL("yh_hb_sctrl.dll")
|
173
|
|
- Iinit := DllDef.MustFindProc("yh_hb_call")
|
174
|
|
- var str3 string
|
175
|
|
- ret, _, _ := Iinit.Call(StrPtr("1101"), StrPtr(string(bytesData)), StrPtr(str3))
|
176
|
|
- fmt.Println(ret)
|
177
|
|
- fmt.Println(str3)
|
|
191
|
+ //DllDef := syscall.MustLoadDLL("yh_hb_sctrl.dll")
|
|
192
|
+ //Iinit := DllDef.MustFindProc("yh_hb_call")
|
|
193
|
+ //var str3 string
|
|
194
|
+ //ret, _, _ := Iinit.Call(StrPtr("1101"), StrPtr(string(bytesData)), StrPtr(str3))
|
|
195
|
+ //fmt.Println(ret)
|
|
196
|
+ //fmt.Println(str3)
|
178
|
197
|
//
|
179
|
198
|
//url := "http://igb.hsa.gdgov.cn/ebus/gdyb_api/prd/hsa/hgs/1101"
|
180
|
199
|
url := gdyb_url + "1101"
|