Explorar el Código

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

csx hace 3 años
padre
commit
6fec7fba49
Se han modificado 1 ficheros con 5 adiciones y 4 borrados
  1. 5 4
      service/gdyb_service.go

+ 5 - 4
service/gdyb_service.go Ver fichero

@@ -72,20 +72,21 @@ func Gdyb1201(certNo string, org_name string, doctor string, fixmedins_code stri
72 72
 
73 73
 	//p := (*string)(unsafe.Pointer(str))
74 74
 	//var str6 *string
75
-	str := make([]*byte, 256)
75
+	var str6 *ole.VARIANT
76
+	//str := make([]*byte, 256)
76 77
 	if err != nil {
77 78
 		log.Fatal("QueryInterface: ", err)
78 79
 	}
79 80
 
80
-	r, err1 := xxxx.CallMethod("yh_hb_call", "1201", string(bytesData), str)
81
+	r, err1 := xxxx.CallMethod("yh_hb_call", "1201", string(bytesData), str6.ToString())
81 82
 	//result := oleutil.MustGetProperty(xxxx, "astr_jysc")
82 83
 
83 84
 	if err1 != nil {
84 85
 		log.Fatal("CallMethod: ", err1, " | ", r)
85 86
 	}
86 87
 	fmt.Println("~~~~~~~")
87
-	fmt.Println(str)
88
-	fmt.Println(r)
88
+	fmt.Println(str6.ToString())
89
+	//fmt.Println(r)
89 90
 	fmt.Println("~~~~~~~")
90 91
 
91 92
 	xxxx.Release()