oracle ole 32,ole32.go

最新推荐文章于 2024-02-25 22:49:49 发布
最新推荐文章于 2024-02-25 22:49:49 发布
阅读量189 收藏
点赞数
文章标签： oracle ole 32

// Copyright 2010 The win Authors. All rights reserved.

// Use of this source code is governed by a BSD-style

// license that can be found in the LICENSE file.

// +build windows

package win

import (

"syscall"

"unsafe"

)

const (

CLSCTX_INPROC_SERVER = 0x1

CLSCTX_INPROC_HANDLER = 0x2

CLSCTX_LOCAL_SERVER = 0x4

CLSCTX_INPROC_SERVER16 = 0x8

CLSCTX_REMOTE_SERVER = 0x10

CLSCTX_INPROC_HANDLER16 = 0x20

CLSCTX_RESERVED1 = 0x40

CLSCTX_RESERVED2 = 0x80

CLSCTX_RESERVED3 = 0x100

CLSCTX_RESERVED4 = 0x200

CLSCTX_NO_CODE_DOWNLOAD = 0x400

CLSCTX_RESERVED5 = 0x800

CLSCTX_NO_CUSTOM_MARSHAL = 0x1000

CLSCTX_ENABLE_CODE_DOWNLOAD = 0x2000

CLSCTX_NO_FAILURE_LOG = 0x4000

CLSCTX_DISABLE_AAA = 0x8000

CLSCTX_ENABLE_AAA = 0x10000

CLSCTX_FROM_DEFAULT_CONTEXT = 0x20000

CLSCTX_ACTIVATE_32_BIT_SERVER = 0x40000

CLSCTX_ACTIVATE_64_BIT_SERVER = 0x80000

CLSCTX_ENABLE_CLOAKING = 0x100000

CLSCTX_PS_DLL = 0x80000000

CLSCTX_ALL = CLSCTX_INPROC_SERVER | CLSCTX_INPROC_HANDLER | CLSCTX_LOCAL_SERVER | CLSCTX_REMOTE_SERVER

)

// Verbs for IOleObject.DoVerb

const (

OLEIVERB_PRIMARY = 0

OLEIVERB_SHOW = -1

OLEIVERB_OPEN = -2

OLEIVERB_HIDE = -3

OLEIVERB_UIACTIVATE = -4

OLEIVERB_INPLACEACTIVATE = -5

OLEIVERB_DISCARDUNDOSTATE = -6

)

// OLECLOSE constants

const (

OLECLOSE_SAVEIFDIRTY = 0

OLECLOSE_NOSAVE = 1

OLECLOSE_PROMPTSAVE = 2

)

type IID syscall.GUID

type CLSID syscall.GUID

type REFIID *IID

type REFCLSID *CLSID

var (

IID_IClassFactory = IID{0x00000001, 0x0000, 0x0000, [8]byte{0xC0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x46}}

IID_IConnectionPointContainer = IID{0xB196B284, 0xBAB4, 0x101A, [8]byte{0xB6, 0x9C, 0x00, 0xAA, 0x00, 0x34, 0x1D, 0x07}}

IID_IOleClientSite = IID{0x00000118, 0x0000, 0x0000, [8]byte{0xC0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x46}}

IID_IOleInPlaceObject = IID{0x00000113, 0x0000, 0x0000, [8]byte{0xC0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x46}}

IID_IOleInPlaceSite = IID{0x00000119, 0x0000, 0x0000, [8]byte{0xC0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x46}}

IID_IOleObject = IID{0x00000112, 0x0000, 0x0000, [8]byte{0xC0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x46}}

IID_IUnknown = IID{0x00000000, 0x0000, 0x0000, [8]byte{0xC0, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x46}}

)

func EqualREFIID(a, b REFIID) bool {

if a == b {

return true

}

if a == nil || b == nil {

return false

}

if a.Data1 != b.Data1 || a.Data2 != b.Data2 || a.Data3 != b.Data3 {

return false

}

for i := 0; i < 8; i++ {

if a.Data4[i] != b.Data4[i] {

return false

}

}

return true

}

type IClassFactoryVtbl struct {

QueryInterface uintptr

AddRef uintptr

Release uintptr

CreateInstance uintptr

LockServer uintptr

}

type IClassFactory struct {

LpVtbl *IClassFactoryVtbl

}

func (cf *IClassFactory) Release() uint32 {

ret, _, _ := syscall.Syscall(cf.LpVtbl.Release, 1,

uintptr(unsafe.Pointer(cf)),

0,

0)

return uint32(ret)

}

func (cf *IClassFactory) CreateInstance(pUnkOuter *IUnknown, riid REFIID, ppvObject *unsafe.Pointer) HRESULT {

ret, _, _ := syscall.Syscall6(cf.LpVtbl.CreateInstance, 4,

uintptr(unsafe.Pointer(cf)),

uintptr(unsafe.Pointer(pUnkOuter)),

uintptr(unsafe.Pointer(riid)),

uintptr(unsafe.Pointer(ppvObject)),

0,

0)

return HRESULT(ret)

}

type IConnectionPointVtbl struct {

QueryInterface uintptr

AddRef uintptr

Release uintptr

GetConnectionInterface uintptr

GetConnectionPointContainer uintptr

Advise uintptr

Unadvise uintptr

EnumConnections uintptr

}

type IConnectionPoint struct {

LpVtbl *IConnectionPointVtbl

}

func (cp *IConnectionPoint) Release() uint32 {

ret, _, _ := syscall.Syscall(cp.LpVtbl.Release, 1,

uintptr(unsafe.Pointer(cp)),

0,

0)

return uint32(ret)

}

func (cp *IConnectionPoint) Advise(pUnkSink unsafe.Pointer, pdwCookie *uint32) HRESULT {

ret, _, _ := syscall.Syscall(cp.LpVtbl.Advise, 3,

uintptr(unsafe.Pointer(cp)),

uintptr(pUnkSink),

uintptr(unsafe.Pointer(pdwCookie)))

return HRESULT(ret)

}

type IConnectionPointContainerVtbl struct {

QueryInterface uintptr

AddRef uintptr

Release uintptr

EnumConnectionPoints uintptr

FindConnectionPoint uintptr

}

type IConnectionPointContainer struct {

LpVtbl *IConnectionPointContainerVtbl

}

func (cpc *IConnectionPointContainer) Release() uint32 {

ret, _, _ := syscall.Syscall(cpc.LpVtbl.Release, 1,

uintptr(unsafe.Pointer(cpc)),

0,

0)

return uint32(ret)

}

func (cpc *IConnectionPointContainer) FindConnectionPoint(riid REFIID, ppCP **IConnectionPoint) HRESULT {

ret, _, _ := syscall.Syscall(cpc.LpVtbl.FindConnectionPoint, 3,

uintptr(unsafe.Pointer(cpc)),

uintptr(unsafe.Pointer(riid)),

uintptr(unsafe.Pointer(ppCP)))

return HRESULT(ret)

}

type IOleClientSiteVtbl struct {

QueryInterface uintptr

AddRef uintptr

Release uintptr

SaveObject uintptr

GetMoniker uintptr

GetContainer uintptr

ShowObject uintptr

OnShowWindow uintptr

RequestNewObjectLayout uintptr

}

type IOleClientSite struct {

LpVtbl *IOleClientSiteVtbl

}

type IOleInPlaceFrameVtbl struct {

QueryInterface uintptr

AddRef uintptr

Release uintptr

GetWindow uintptr

ContextSensitiveHelp uintptr

GetBorder uintptr

RequestBorderSpace uintptr

SetBorderSpace uintptr

SetActiveObject uintptr

InsertMenus uintptr

SetMenu uintptr

RemoveMenus uintptr

SetStatusText uintptr

EnableModeless uintptr

TranslateAccelerator uintptr

}

type IOleInPlaceFrame struct {

LpVtbl *IOleInPlaceFrameVtbl

}

type IOleInPlaceObjectVtbl struct {

QueryInterface uintptr

AddRef uintptr

Release uintptr

GetWindow uintptr

ContextSensitiveHelp uintptr

InPlaceDeactivate uintptr

UIDeactivate uintptr

SetObjectRects uintptr

ReactivateAndUndo uintptr

}

type IOleInPlaceObject struct {

LpVtbl *IOleInPlaceObjectVtbl

}

func (obj *IOleInPlaceObject) Release() uint32 {

ret, _, _ := syscall.Syscall(obj.LpVtbl.Release, 1,

uintptr(unsafe.Pointer(obj)),

0,

0)

return uint32(ret)

}

func (obj *IOleInPlaceObject) SetObjectRects(lprcPosRect, lprcClipRect *RECT) HRESULT {

ret, _, _ := syscall.Syscall(obj.LpVtbl.SetObjectRects, 3,

uintptr(unsafe.Pointer(obj)),

uintptr(unsafe.Pointer(lprcPosRect)),

uintptr(unsafe.Pointer(lprcClipRect)))

return HRESULT(ret)

}

type IOleInPlaceSiteVtbl struct {

QueryInterface uintptr

AddRef uintptr

Release uintptr

GetWindow uintptr

ContextSensitiveHelp uintptr

CanInPlaceActivate uintptr

OnInPlaceActivate uintptr

OnUIActivate uintptr

GetWindowContext uintptr

Scroll uintptr

OnUIDeactivate uintptr

OnInPlaceDeactivate uintptr

DiscardUndoState uintptr

DeactivateAndUndo uintptr

OnPosRectChange uintptr

}

type IOleInPlaceSite struct {

LpVtbl *IOleInPlaceSiteVtbl

}

type IOleObjectVtbl struct {

QueryInterface uintptr

AddRef uintptr

Release uintptr

SetClientSite uintptr

GetClientSite uintptr

SetHostNames uintptr

Close uintptr

SetMoniker uintptr

GetMoniker uintptr

InitFromData uintptr

GetClipboardData uintptr

DoVerb uintptr

EnumVerbs uintptr

Update uintptr

IsUpToDate uintptr

GetUserClassID uintptr

GetUserType uintptr

SetExtent uintptr

GetExtent uintptr

Advise uintptr

Unadvise uintptr

EnumAdvise uintptr

GetMiscStatus uintptr

SetColorScheme uintptr

}

type IOleObject struct {

LpVtbl *IOleObjectVtbl

}

func (obj *IOleObject) QueryInterface(riid REFIID, ppvObject *unsafe.Pointer) HRESULT {

ret, _, _ := syscall.Syscall(obj.LpVtbl.QueryInterface, 3,

uintptr(unsafe.Pointer(obj)),

uintptr(unsafe.Pointer(riid)),

uintptr(unsafe.Pointer(ppvObject)))

return HRESULT(ret)

}

func (obj *IOleObject) Release() uint32 {

ret, _, _ := syscall.Syscall(obj.LpVtbl.Release, 1,

uintptr(unsafe.Pointer(obj)),

0,

0)

return uint32(ret)

}

func (obj *IOleObject) SetClientSite(pClientSite *IOleClientSite) HRESULT {

ret, _, _ := syscall.Syscall(obj.LpVtbl.SetClientSite, 2,

uintptr(unsafe.Pointer(obj)),

uintptr(unsafe.Pointer(pClientSite)),

0)

return HRESULT(ret)

}

func (obj *IOleObject) SetHostNames(szContainerApp, szContainerObj *uint16) HRESULT {

ret, _, _ := syscall.Syscall(obj.LpVtbl.SetHostNames, 3,

uintptr(unsafe.Pointer(obj)),

uintptr(unsafe.Pointer(szContainerApp)),

uintptr(unsafe.Pointer(szContainerObj)))

return HRESULT(ret)

}

func (obj *IOleObject) Close(dwSaveOption uint32) HRESULT {

ret, _, _ := syscall.Syscall(obj.LpVtbl.Close, 2,

uintptr(unsafe.Pointer(obj)),

uintptr(dwSaveOption),

0)

return HRESULT(ret)

}

func (obj *IOleObject) DoVerb(iVerb int32, lpmsg *MSG, pActiveSite *IOleClientSite, lindex int32, hwndParent HWND, lprcPosRect *RECT) HRESULT {

ret, _, _ := syscall.Syscall9(obj.LpVtbl.DoVerb, 7,

uintptr(unsafe.Pointer(obj)),

uintptr(iVerb),

uintptr(unsafe.Pointer(lpmsg)),

uintptr(unsafe.Pointer(pActiveSite)),

uintptr(lindex),

uintptr(hwndParent),

uintptr(unsafe.Pointer(lprcPosRect)),

0,

0)

return HRESULT(ret)

}

type IUnknownVtbl struct {

QueryInterface uintptr

AddRef uintptr

Release uintptr

}

type IUnknown struct {

LpVtbl *IUnknownVtbl

}

type OLEINPLACEFRAMEINFO struct {

Cb uint32

FMDIApp BOOL

HwndFrame HWND

Haccel HACCEL

CAccelEntries uint32

}

type COAUTHIDENTITY struct {

User *uint16

UserLength uint32

Domain *uint16

DomainLength uint32

Password *uint16

PasswordLength uint32

Flags uint32

}

type COAUTHINFO struct {

dwAuthnSvc uint32

dwAuthzSvc uint32

pwszServerPrincName *uint16

dwAuthnLevel uint32

dwImpersonationLevel uint32

pAuthIdentityData *COAUTHIDENTITY

dwCapabilities uint32

}

type COSERVERINFO struct {

dwReserved1 uint32

pwszName *uint16

pAuthInfo *COAUTHINFO

dwReserved2 uint32

}

var (

// Library

libole32 uintptr

// Functions

coCreateInstance uintptr

coGetClassObject uintptr

coTaskMemFree uintptr

oleInitialize uintptr

oleSetContainedObject uintptr

oleUninitialize uintptr

)

func init() {

// Library

libole32 = MustLoadLibrary("ole32.dll")

// Functions

coCreateInstance = MustGetProcAddress(libole32, "CoCreateInstance")

coGetClassObject = MustGetProcAddress(libole32, "CoGetClassObject")

coTaskMemFree = MustGetProcAddress(libole32, "CoTaskMemFree")

oleInitialize = MustGetProcAddress(libole32, "OleInitialize")

oleSetContainedObject = MustGetProcAddress(libole32, "OleSetContainedObject")

oleUninitialize = MustGetProcAddress(libole32, "OleUninitialize")

}

func CoCreateInstance(rclsid REFCLSID, pUnkOuter *IUnknown, dwClsContext uint32, riid REFIID, ppv *unsafe.Pointer) HRESULT {

ret, _, _ := syscall.Syscall6(coCreateInstance, 5,

uintptr(unsafe.Pointer(rclsid)),

uintptr(unsafe.Pointer(pUnkOuter)),

uintptr(dwClsContext),

uintptr(unsafe.Pointer(riid)),

uintptr(unsafe.Pointer(ppv)),

0)

return HRESULT(ret)

}

func CoGetClassObject(rclsid REFCLSID, dwClsContext uint32, pServerInfo *COSERVERINFO, riid REFIID, ppv *unsafe.Pointer) HRESULT {

ret, _, _ := syscall.Syscall6(coGetClassObject, 5,

uintptr(unsafe.Pointer(rclsid)),

uintptr(dwClsContext),

uintptr(unsafe.Pointer(pServerInfo)),

uintptr(unsafe.Pointer(riid)),

uintptr(unsafe.Pointer(ppv)),

0)

return HRESULT(ret)

}

func CoTaskMemFree(pv uintptr) {

syscall.Syscall(coTaskMemFree, 1,

pv,

0,

0)

}

func OleInitialize() HRESULT {

ret, _, _ := syscall.Syscall(oleInitialize, 1, // WTF, why does 0 not work here?

0,

0,

0)

return HRESULT(ret)

}

func OleSetContainedObject(pUnknown *IUnknown, fContained bool) HRESULT {

ret, _, _ := syscall.Syscall(oleSetContainedObject, 2,

uintptr(unsafe.Pointer(pUnknown)),

uintptr(BoolToBOOL(fContained)),

0)

return HRESULT(ret)

}

func OleUninitialize() {

syscall.Syscall(oleUninitialize, 0,

0,

0,

0)

}

一键复制

编辑

Web IDE

原始数据

按行查看

历史

熙公主的爪牙
关注
pb打开web ole控件
09-20
4. **交互与控制**：除了浏览网页，还可以使用OLE控件的一些特定方法，如`GoBack`、`GoForward`、`Stop`、`Refresh`等，模拟浏览器的前进、后退、停止和刷新功能。此外，通过`Document`属性，开发者可以访问到HTML...
为什么DoDragDrop在线程中不能正常？请高手看看。
Kintar的专栏
07-29 1761
在主线程中如下代码能正常： HRESULT hRetSource = DropSource.QueryInterface(IID_IDropSource, (void**)&pDropSource); HRESULT hRetObject = DataObject.QueryInterface(IID_IDataObject, (void**)&pDataObject); if ((hRe
转贴：[转]所有 OLE api 和接口的目的
weixin_30448603的博客
01-12 280
转自http://support.microsoft.com/kb/126157/zh-cn http://apps.hi.baidu.com/share/detail/18909481 比较有用,记录下来供查阅 常规 函数： lUnknown目的: 控制的接口协商的对象生存期。普遍存在的任何组件，而不考虑实现。QueryInterface 公开传入的接口。 函数： IEnum目的...
CoCreateInstanceEx详解
ozhanjun的专栏
08-29 1886
CoCreateInstanceEx常用于创建远程组件，因为考虑到远程访问时要在网络上来回传递信息，所以此函数允许一次询多个接口。  CoCreateInstanceEx参数说明  共有如下六个参数，分别为：  REFCLSID   rclsid：指定要实例化COM组件的GUID  IUnknown   *punkOuter：  DWORD   dwClsCtx：指定服务器组件的类型
进程内服务器，进程外服务器，远程服务器
商少
11-10 916
  EXE 中的服务器 不同的进程 DLL也被称作是进程中服务器, 而EXE则被称作是进程外服务器,远程服务器指的是运行于另外一个不同的机器上的进程外服务器。 对于跨越进程边界的接口，我们需要考虑如下一些条件： 一个进程需要能够调用另外一个进程中的函数 一个进程需要能够将数据传递给另一个进程 客户无需关心她所访问的服务器是进程内服务器还是进程外服务器 本地过程调用 调整 对指针的...
xls转mdb代码以及.exe执行软件
05-09
FROM OpenDataSource( 'Microsoft.Jet.OLEDB.4.0', 'Data Source="c:\test.xls";User ID=Admin;Password=;Extended properties=Excel 5.0')...xactions /*动态文件名 declare @fn varchar(20),@s varchar(1000) set...
minisqlquery：适用于任何.NET DB提供程序的简约SQL查询工具-SQL，SQLite，SQL CE，Oracle，Access。
01-28
支持多个数据库**（MSSQL，SQL Compact Edition，MS Access，SQLite，Oracle，OLEDB，SharePoint- 等） 集成的文本模板系统，用于生成SQL，代码或数据脚本 语法突出显示（具有打印支持） 加载和保存SQL脚本文件 ...
两个不同数据库中的表之间的操作(包含sql server /oracle)
08-19
### 不在同一个数据库中的两张表之间的操作（含SQL Server与Oracle） #### 概述 本文主要探讨了在不同数据库环境中如何实现数据交互的问题，重点对比分析了SQL Server和Oracle这两种主流数据库系统之间的表操作...
EXCEL-VBA整合数据库应用从基础到实践-代码大全.docx
10-01
- **关系型数据库（RDBMS）**：如Microsoft Access、MySQL、Oracle等，这些数据库基于表格形式组织数据，通过SQL语言进行查询和操作。 - **非关系型数据库（NoSQL）**：如MongoDB、Cassandra等，这类数据库通常不...
CoCreateInstanceEx函数使用
joyce5008的博客
07-10 1108
CoCreateInstanceEx常用于创建远程组件，因为考虑到远程访问时要在网络上来回传递信息，所以此函数允许一次询多个接口。 CoCreateInstanceEx参数说明 共有如下六个参数，分别为： REFCLSID   rclsid：指定要实例化COM组件的GUID IUnknown   *punkOuter： DWORD   dwClsCtx：指定服务器组件的类型，可以为以
分布组件对象模型(DCOM)研究
weixin_34221112的博客
12-23 123
　　在Microsoft推出Windows NT4.0之后，以往只有在大型主机或者工作站上才可能出现的分布式处理终于可以在PC的世界中工作了。造成Windows NT可以成为企业计算环境除了NT的日渐成熟和执行效率增加以外，最重要的就是加入了DCOM(Distributed Component Object Mode1)的功能。Microsoft在NT4.0中第一次推出了该项技术，但是Mic...
在dll内实现消息机制_COM编程攻略（十九 AppID、Dll代理）
weixin_39819138的博客
12-03 413
上一篇文章谈到COM中组件类别的含义和用途：Froser：COM编程攻略（十八 组件类别）​zhuanlan.zhihu.com这一篇文章来说一下，AppID是什么，以及Dll代理又是什么。一、dll代理(DLL Surrogates)我们之前说到了COM开发跨进程的组件：Froser：COM编程攻略（七 COM跨进程组件开发实战）​zhuanlan.zhihu.com简单来说，就是使用CoCre...
CoCreateInstanceEx远程激活
如鹿渴慕泉水的专栏
11-21 873
CLSID clsid; //BITS IID CLSIDFromString(OLESTR("{26D6311A-A724-4C8C-B83A-2E60ECD47480}"), &amp;clsid); //CLSIDFromString(OLESTR("{4991d34b-80a1-4291-83b6-3328366b9097}"), &amp;clsid); CLSID tmp; ...
CLSCTX Enumeration类型说明
道亦无名
12-10 556
成员 描述 CLSCTX_INPROC_SERVER 创建和管理此类对象的代码是一个 DLL，它与指定类上下文的函数调用者在同一进程中运行。 CLSCTX_INPROC_HANDLER 表示一个处理程序 dll，它与调用者在同一进程上运行。 CLSCTX_LOCAL_SERVER 表示服务器可执行文件，它与调用者在同一台机器上运行，但在不同的进程上。 CLSCTX_INPROC_SERVER16 过时的 CLSCTX_REMOTE_SERVER 表示服务器可执行文件，它在与调...
Win10 突然蓝屏，蓝屏代码0x113:VIDEO_DXGKRNL_FATAL_ERROR
热门推荐
本博客，博文仅代表个人操作经验，不能完全解决你的问题，仅供参考，佛系回复。
12-13 1万+
组装台式机Win10 专业版。
ole32.dll文件丢失导致程序无法运行问题
最新发布
2301_76755223的博客
02-25 1734
其实很多用户玩单机游戏或者安装软件的时候就出现过这种问题，如果是新手第一时间会认为是软件或游戏出错了，其实并不是这样，其主要原因就是你电脑系统的该dll文件丢失了或没有安装一些系统软件平台所需要的动态链接库，这时你可以下载这个ole32.dll文件(挑选合适的版本文件)把它放入到程序或系统目录中，当我们执行某一个.exe程序时，相应的DLL文件就会被调用，因此将缺失的文件放回到原目录之后就能打开你的软件或游戏了.那么出现ole32.dll丢失要怎么解决？
Oracle OLEDB Driver安装指南
"ORACLE OLEDB Driver的安装文档提供了详细的步骤，用于在Windows系统上安装驱动，以便通过VBA连接到Excel与Oracle数据库进行数据交互。安装过程包括执行安装程序、配置安装路径、选择组件、设置数据库连接参数以及...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值