Browse Source

Merge branch 'master' of http://git.shengws.com/csx/gdyb

csx 3 years ago
parent
commit
32f3f4f02d
1 changed files with 28 additions and 9 deletions
  1. 28 9
      service/gdyb_service.go

+ 28 - 9
service/gdyb_service.go View File

62
 	//DllDef := syscall.MustLoadDLL("yh_hb_sctrl.dll")
62
 	//DllDef := syscall.MustLoadDLL("yh_hb_sctrl.dll")
63
 	//Iinit := DllDef.MustFindProc("DllGetClassObject")
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
 	unknown, _ := oleutil.CreateObject("yinhai.yh_hb_sctr")
84
 	unknown, _ := oleutil.CreateObject("yinhai.yh_hb_sctr")
67
-	xmlhttp, _ := unknown.QueryInterface(ole.IID_IUnknown)
85
+	xmlhttp, _ := unknown.QueryInterface(ole.IID_IDispatch)
86
+
68
 	var str3 string
87
 	var str3 string
69
 	//str := make([]byte, 256)
88
 	//str := make([]byte, 256)
70
 	//str1 := make([]byte, 256)
89
 	//str1 := make([]byte, 256)
72
 
91
 
73
 	result, _ := oleutil.CallMethod(xmlhttp, "yh_hb_call", "1201", string(bytesData), str3)
92
 	result, _ := oleutil.CallMethod(xmlhttp, "yh_hb_call", "1201", string(bytesData), str3)
74
 
93
 
75
-	fmt.Println(str3)
94
+	fmt.Println(result.Val)
76
 	fmt.Println("~~~~~~~~")
95
 	fmt.Println("~~~~~~~~")
77
 	fmt.Println(result)
96
 	fmt.Println(result)
78
 	fmt.Println(result.ToString())
97
 	fmt.Println(result.ToString())
169
 	gdyb_url := beego.AppConfig.String("gdyb_url")
188
 	gdyb_url := beego.AppConfig.String("gdyb_url")
170
 	gdyb_paasid := beego.AppConfig.String("gdyb_paasid")
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
 	//url := "http://igb.hsa.gdgov.cn/ebus/gdyb_api/prd/hsa/hgs/1101"
198
 	//url := "http://igb.hsa.gdgov.cn/ebus/gdyb_api/prd/hsa/hgs/1101"
180
 	url := gdyb_url + "1101"
199
 	url := gdyb_url + "1101"