ソースを参照

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

csx 3 年 前
コミット
32dbdcc190
共有1 個のファイルを変更した16 個の追加2 個の削除を含む
  1. 16 2
      service/gdyb_service.go

+ 16 - 2
service/gdyb_service.go ファイルの表示

@@ -20,6 +20,9 @@ import (
20 20
 	"syscall"
21 21
 	"time"
22 22
 	"unsafe"
23
+
24
+	ole "github.com/go-ole"
25
+	"github.com/go-ole/oleutil"
23 26
 )
24 27
 
25 28
 const (
@@ -56,8 +59,19 @@ func Gdyb1201(certNo string, org_name string, doctor string, fixmedins_code stri
56 59
 	gdyb_paasid := beego.AppConfig.String("gdyb_paasid")
57 60
 	url := gdyb_url + "1201"
58 61
 
59
-	DllDef := syscall.MustLoadDLL("yh_hb_sctrl.dll")
60
-	Iinit := DllDef.MustFindProc("DllGetClassObject")
62
+	//DllDef := syscall.MustLoadDLL("yh_hb_sctrl.dll")
63
+	//Iinit := DllDef.MustFindProc("DllGetClassObject")
64
+
65
+	ole.CoInitialize(0)
66
+	unknown, _ := oleutil.CreateObject("yinhai.yh_hb_sctr")
67
+	xmlhttp, _ := unknown.QueryInterface(ole.IID_IDispatch)
68
+
69
+	fmt.Println("~~~~~~~~")
70
+	fmt.Println(unknown)
71
+	fmt.Println("~~~~~~~~")
72
+	fmt.Println("~~~~~~~~")
73
+	fmt.Println(xmlhttp)
74
+	fmt.Println("~~~~~~~~")
61 75
 
62 76
 	var str3 string
63 77
 	ret, _, _ := Iinit.Call(StrPtr("1201"), StrPtr(string(bytesData)), StrPtr(str3))