C#如何实现正真意义的ActiveX控件！该控件可能由vb6,c++等调用！
由于参与的项目是两公司做的，而且都用的是不同语言。 现在必须提供ActiveX控件以便对方程序调用。 我们的项目是 .net 开发的。而且本人对其他语言不了解，用着不顺，语法也不是很懂。只对vb和c#熟悉。 但是又不想用vb6做。 我知道怎么实现com调用，然后写vb6程序来处理，但是一些报表等， vb6下又不是很爽。 所以急求.net 实现 activex控件的源码。
[解决办法]
放弃吧,用c#开发activex控件客户端还要装.net框架,不可能的事情
用c++ 吧
vb也可以哈
[解决办法]
可以看看这一页
ms-help://MS.MSDNQTR.v80.chs/MS.MSDN.v80/MS.NETDEVFX.v20.chs/dv_fxtools/html/a487d61b-d166-467b-a7ca-d8b52fbff42d.htm
他说用这个工具可以生成无需.net framework的com组件
[解决办法]
http://topic.csdn.net/t/20050527/17/4040672.html
[解决办法]
顶一下，我也听说C#可以后成A控件，不过不太了解
[解决办法]
http://www.qqread.com/picindex/20060802/bd690187002-1.html
http://www.china-askpro.com/csharp30.shtml
http://www.5iaspx.com/aspnet/Yong-C-BianXie-ActiveX-KongJian-Yi-n1rb0319.html
[解决办法]
关注中...
[解决办法]
也关注中．．．
[解决办法]
关注一下
[解决办法]
关注中！有时间可以研究哈！
[解决办法]
mark 一下
[解决办法]
我也在想这个问题,关注中 .
[解决办法]
vb开发吧，最简单。
[解决办法]
C#不支持完全的ACTIVE X
开发团队开发到一半放弃支持了
现在的支持不完整
[解决办法]
还是用VB6或ＶＣ＋＋写比较实现．．．
C#写的要.Net Framework的支持...
感觉不好...
[解决办法]
学习
[解决办法]
楼主的昵称不错.
[解决办法]
up
[解决办法]
using System.Reflection;
using System.Runtime.InteropServices;
using System.Security;
// 有关程序集的常规信息通过下列属性集
// 控制。更改这些属性值可修改
// 与程序集关联的信息。
[assembly: AssemblyTitle( "ORRSG ")]
[assembly: AssemblyDescription( "ActiveX控件 ")]
[assembly: AssemblyConfiguration( " ")]
[assembly: AssemblyCompany( "麦壳饼小屋 ")]
[assembly: AssemblyProduct( "ORRActiveX ")]
[assembly: AssemblyCopyright( "版权所有 (C) MysticBoy Limited 2007 ")]
[assembly: AssemblyTrademark( " ")]
[assembly: AssemblyCulture( " ")]
[assembly: AllowPartiallyTrustedCallers()]
// 将 ComVisible 设置为 false 使此程序集中的类型
// 对 COM 组件不可见。如果需要从 COM 访问此程序集中的类型，
// 则将该类型上的 ComVisible 属性设置为 true。
[assembly: ComVisible(true )]
// 如果此项目向 COM 公开，则下列 GUID 用于类型库的 ID
[assembly: Guid( "f49a066c-1a61-4d05-8041-cb6948a85f72 ")]
// 程序集的版本信息由下面四个值组成:
//
// 主版本
// 次版本
// 内部版本号
// 修订号
//
// 可以指定所有这些值，也可以使用“修订号”和“内部版本号”的默认值，
// 方法是按如下所示使用“*”:
[assembly: AssemblyVersion( "1.0.* ")]
[assembly: AssemblyFileVersion( "1.0.0.0 ")]
新建一个接口 名为 IObjectSafety
添加
using System.Runtime.InteropServices;
/// <summary>
/// 这个guid不要更改
/// </summary>
[Guid( "CB5BDC81-93C1-11CF-8F20-00805F2CD064 "), InterfaceType(ComInterfaceType.InterfaceIsDual)]
public interface IObjectSafety
{
//
/// <summary>
///
/// </summary>
/// <param name= "riid "> </param>
/// <param name= "pdwSupportedOptions "> </param>
/// <param name= "pdwEnabledOptions "> </param>
void GetInterfacceSafyOptions(
System.Int32 riid,
out System.Int32 pdwSupportedOptions,
out System.Int32 pdwEnabledOptions);
/// <summary>
///
/// </summary>
/// <param name= "riid "> </param>
/// <param name= "dwOptionsSetMask "> </param>
/// <param name= "dwEnabledOptions "> </param>
void SetInterfaceSafetyOptions(
System.Int32 riid,
System.Int32 dwOptionsSetMask,
System.Int32 dwEnabledOptions);
}
新建一个控件
using System;
using System.Reflection;
using System.Runtime.InteropServices;
using System.Text;
using System.Windows.Forms;
using Microsoft.Win32;
namespace orRActiveX
{
/// <summary>
/// 用户控件。
/// </summary>
[ProgId( "ORRActiveX.ORRShowGlass ")] //我们的控件名
[Guid( "E6DB4C0C-4B29-4806-89B5-17DE7BB79C54 ")] //guid.
[ClassInterface(ClassInterfaceType.AutoDual)] //必须的，否则你无法调用 。
public partial class orRShowGlass : UserControl, IObjectSafety //集成用户控件和安全接口。
{
/// <summary>
/// 设置父对象。
/// </summary>
/// <param name= "hWndChild "> 在这里应该是本窗体本身 </param>
/// <param name= "hWndNewParent "> 要显示该窗体的对象。 </param>
/// <returns> </returns>
[DllImport( "user32.dll ")]
private static extern int SetParent(IntPtr hWndChild, int hWndNewParent);
/// <summary>
///
/// </summary>
public orRShowGlass()
{
InitializeComponent();
}
/// <summary>
/// </summary>
public void LoadMe(Int32 hWnd)
{
SetParent(this.Handle, hWnd);
}
/// <summary>
///
/// </summary>
/// <param name= "top "> </param>
/// <param name= "left "> </param>
public void SetLoc(Int32 top, Int32 left)
{
Left = left;
Top = top;
}
/// <summary>
///
/// </summary>
/// <param name= "width "> </param>
/// <param name= "height "> </param>
//[ComEventInterface() ]
public void SetSize(Int32 width, Int32 height)
{
Width = width;
Height = height;
}
/// <summary>
/// 注册函数，假如你能实现标准dll的方式的话，我们就可以做到完全的标准ocx了。
/// </summary>
/// <param name= "key "> 键值，这个是注册时，注册程序给程序传的。 </param>
[ComRegisterFunction()]
public static void RegisterClass(string key)
{
// 去掉这个， 我们不需要他 HKEY_CLASSES_ROOT\
StringBuilder sb = new StringBuilder(key);
sb.Replace(@ "HKEY_CLASSES_ROOT\ ", " ");
// 打开 CLSID\{guid}
RegistryKey k = Registry.ClassesRoot.OpenSubKey(sb.ToString(), true);
// 创建 'Control '键
//ActiveX 控件容器
RegistryKey ctrl = k.CreateSubKey( "Control ");
ctrl.Close();
// 创建CodeBase入口，- 这里是必须的.
RegistryKey inprocServer32 = k.OpenSubKey( "InprocServer32 ", true);
inprocServer32.SetValue( "CodeBase ", Assembly.GetExecutingAssembly().CodeBase);
inprocServer32.Close();
k.Close();
}
/// <summary>
/// 调用反注册控件
/// </summary>
/// <param name= "key "> Tke registry key </param>
[ComUnregisterFunction()]
public static void UnregisterClass(string key)
{
StringBuilder sb = new StringBuilder(key);
sb.Replace(@ "HKEY_CLASSES_ROOT\ ", " ");
// 打开HKCR\CLSID\{guid}
RegistryKey k = Registry.ClassesRoot.OpenSubKey(sb.ToString(), true);
// 删除 'Control '如果不存在，不要抛出错误
k.DeleteSubKey( "Control ", false);
// 下一步，打开InprocServer32
k.OpenSubKey( "InprocServer32 ", true);
//删除 CodeBase键，如果不存在，不要抛出错误
k.DeleteSubKey( "CodeBase ", false);
k.Close();
}
#region 为 html调用提供的接口。 IObjectSafety
/// <summary>
///
/// </summary>
/// <param name= "riid "> </param>
/// <param name= "pdwSupportedOptions "> </param>
/// <param name= "pdwEnabledOptions "> </param>
void IObjectSafety.GetInterfacceSafyOptions(int riid, out int pdwSupportedOptions, out int pdwEnabledOptions)
{
pdwSupportedOptions = 1;
pdwEnabledOptions = 2;
}
/// <summary>
///
/// </summary>
/// <param name= "riid "> </param>
/// <param name= "dwOptionsSetMask "> </param>
/// <param name= "dwEnabledOptions "> </param>
void IObjectSafety.SetInterfaceSafetyOptions(int riid, int dwOptionsSetMask, int dwEnabledOptions)
{
}
#endregion
}
}
然后需要给程序集添上 签名 。 在项目属性中的 生成菜单中选择 为 com Interop 注册 .
要在html中使用 使用下面的方法。
<body >
<object id= "23423 "
classid= "clsid:E6DB4C0C-4B29-4806-89B5-17DE7BB79C54 " >
</object>
</body>
classid 是程序中的控件前面的guid中的内容。
在vb6中调用时先引用生成的 tlb文件，和你的项目名相同。
程序中可以使用下面的方法。
Dim x As New orRShowGlass.ORRShowGlass
Private Sub Form_Load()
x.LoadMe hWnd
' x.SetLoc 1, 1 使用这个也可以
x.Top = 0
x.Left = 0
x.Width = Me.Width / 15
x.Height = Me.Height / 15
x.Refresh
End Sub
Private Sub Form_Resize()
x.Top = 0
x.Left = 0
x.Width = Me.Width / 15
x.Height = Me.Height / 15
x.Refresh
End Sub
InteropFormTools中有更好的实现。
建议采用InteropFormTools，但是他是vb代码的。 c#的目前没有，因为InteropFormTools是微软为vb用户做的！
