锐客网

  1. 首页 > 睿知 > it技术 > >

log10vb.net的简单介绍( 六 )

IT技术就让


);
}
}
用midl编译成IClassFactory2.tlb，并导入到vb.net的工程当中 。
声明如下api用于得到IClassFactory2接口：
Declare Function CoGetClassObject Lib "ole32.dll" (ByRef rclsid As Guid, ByVal context As Short, ByRef serverInfo As IntPtr, ByRef riid As Guid, ByRef ppv As IntPtr) As Integer
'添加如下代码：
Const bstrInventorApplication As String = "{B6B5DC40-96E3-11d2-B774-0060B0F159EF}"
Const bstrIClassFactory2 As String = "{B196B28F-BAB4-101A-B69C-00AA00341D07}"
Const bstrIDispatch As String = "{00020400-0000-0000-C000-000000000046}"
Private IClsFry2 As INVENTOROCIDL.IClassFactory2
Dim bstrLicence As String = "12345678"'licence key
Dim guidInventorApplication As Guid = New Guid(bstrInventorApplication)
Dim guidIClassFactory2 As Guid = New Guid(bstrIClassFactory2)
Dim guidIDispatch As Guid = New Guid(bstrIDispatch)
Dim InventorGuid As INVENTOROCIDL.GUID'used by CreateInstanceLic,defined in INVENTOROCIDL
'transform Guid of IDispatch to INVENTOROCIDL.GUID
Dim byteArry() As Byte = guidIDispatch.ToByteArray()
Dim MyGC As GCHandle = GCHandle.Alloc(byteArry, GCHandleType.Pinned)
InventorGuid = CType(Marshal.PtrToStructure(MyGC.AddrOfPinnedObject, InventorGuid.GetType()), INVENTOROCIDL.GUID)
'get the IClassFactory2 Interface
Dim obj As IntPtr
CoGetClassObject(guidInventorApplication, CInt(INVENTOROCIDL.enuCLSCTX.enuCLSCTX_LOCAL_SERVER), Nothing, guidIClassFactory2, obj)
IClsFry2 = CType(Marshal.GetTypedObjectForIUnknown(obj, System.Type.GetTypeFromCLSID(guidIClassFactory2)), INVENTOROCIDL.IClassFactory2)
'create Inventor Instance by using Licence
obj = IClsFry2.CreateInstanceLic(Nothing, Nothing, InventorGuid, bstrLicence)
InvApp = CType(Marshal.GetTypedObjectForIUnknown(obj, System.Type.GetTypeFromCLSID(guidInventorApplication)), Inventor.Application)
致此创建成功！
windows中都有那些类型的文件？他们具体的含义是什么？ACAMicrosoft的代理使用的角色文档
acf系统管理配置
acm音频压缩管理驱动程序,为Windows系统提供各种声音格式的编码和解码功能
aif声音文件log10vb.net，支持压缩log10vb.net，可以使用Windows Media Player和QuickTime Player播放
AIF音频文件log10vb.net，使用Windows Media Player播放
AIFC音频文件，使用Windows Media Player播放
AIFF音频文件，使用Windows Media Player播放
ani动画光标文件扩展名，例如动画沙漏 。
ansASCII字符图形动画文件
arc一种较早的压缩文件，可以使用WinZip,WinRAR,PKARC等软件打开
arj压缩文件 。可以使用WinZip,WinRAR,PKARC等软件打开
asf微软的媒体播放器支持的视频流 ， 可以使用Windows Media Player播放
asp微软的视频流文件 ， 可以使用Windows Media Player打开
asp微软提出的Active Server Page,是服务器端脚本 ， 常用于大型网站开发 ， 支持数据库连接，类似PHP 。可以使用Visual InterDev编写，是目前的大热门
asxWindows Media 媒体文件的快捷方式
au是Internet中常用的声音文件格式，多由Sun工作站创建，可使用软件Waveform Hold and Modify 播放 。Netscape Navigator中的LiveAudio也可以播放.au文件
avi一种使用Microsoft RIFF规范的Windows多媒体文件格式，用于存储声音和移动的图片
bak备份文件，一般是被自动或是通过命令创建的辅助文件，它包含某个文件的最近一个版本，并且具有于该文件相同的文件名
basBasic 语言源程序文件，可编译成可执行文件,目前使用Basic开发系统的是Visual Basic
bat批处理文件，在MS-DOS中，.bat文件是可执行文件，有一系列命令构成，其中可以包含对其他程序的调用
bbs电子告示板系统文章信息文件
bfcWindows的公文包文件

推荐阅读


上一篇：如何推广公共交通英语演讲，发展公共交通 英语

下一篇：女仆或者校花养成游戏动漫，女仆或者校花养成游戏动漫在线观看