(转载)QTP DotNetFactory使用解析

Set var_CreateInstance= DotNetFactory.CreateInstance (TypeName[,Assembly][,args])

[Description("Enables you to create an instance of a .NET object, and access its methods and properties."), Guid("15494157-E302-4a17-95C7-24C545CA8F53"), ClassInterface(ClassInterfaceType.None), ProgId("Mercury.DotNetFactory.1"), ComVisible(true)]
publicclassDotNetFactory: IObjFactory, IReflect, IObjFactoryServices
{
// Fields
privateArrayList_ArgList;

// Methods
staticDotNetFactory()

    {
    Trace.WriteLine("ObjectFactory");
    RegistryKeycurrentUser= Registry.CurrentUser;
    RegistryKeykey2= currentUser.OpenSubKey(@"Software\Mercury Interactive\QuickTest Professional\MicTest\ReservedObjects\DotNetFactory");//见下图

    stringstr= (string) key2.GetValue("PreloadAssemblies",null);
    if(str !=null)
    {
        string[]strArray= str.Split(newchar[] {';'});
        DotNetFactoryfactory=newDotNetFactory();
        currentUser.Close();
        key2.Close();
        foreach(stringstr2instrArray)
        {
            try
            {
                Trace.WriteLine(str2);
                factory.LoadAssembly(str2);
                Trace.WriteLine("Loaded");
            }
            catch
            {
                Trace.WriteLine("Failed");
            }
        }
    }
    }

publicDotNetFactory();

    {
       this._ArgList =newArrayList();
    }

privatevoidAddArg(object arg)
    {
        if(argisDispWrapper)
        {
            arg = ((DispWrapper) arg)._object;
        }
        this._ArgList.Add(arg);
    }

privatevoidClearArgs();

publicobjectCreateInstance(string TypeName, object assembly,paramsobject[] CtorArgs)

    {
        objectobj3;
        ConstructorInfo[]constructors;
        this._ArgList.Clear();
        if(CtorArgs !=null)
        {
            foreach(objectobj2inCtorArgs)
            {
                this.AddArg(obj2);
            }
        }
        if((assemblyisstring) && (((string) assembly).Length >0))
        {
            this.LoadAssembly(assemblyasstring);
        }
        Assembly[]assemblies= AppDomain.CurrentDomain.GetAssemblies();//获取当前应用程序域加载的所有程序集
        TypeconversionType=null;
        foreach(Assemblyassembly2inassemblies)
        {
            conversionType = assembly2.GetType(TypeName);//如果CreateInstance仅有一个参数无须带任何可选参数，帮助里说程序集已在内存中，如例2和例3             

             if(conversionType !=null)
            {
                break;
            }
        }
        if(conversionType ==null)
        {
            thrownewException("Type '"+ TypeName +"' not found in any loaded assembly");
        }
        if(this._ArgList.Count ==0)
        {
            constructors = conversionType.GetConstructors();//值来自于如果CreateInstance仅有一个参数
            if((constructors ==null) || (constructors.Length ==0))
            {
                if(conversionType.IsValueType)
                {
                    stringstr="0";
                    try
                    {
                        obj3 = Convert.ChangeType(str, conversionType);
                    }
                    catch(InvalidCastException)
                    {
                        obj3 =newDispWrapper(conversionType);
                    }
                }
                else
                {
                    obj3 =newDispWrapper(conversionType);
                }
            }
            else
            {
                obj3 = conversionType.Assembly.CreateInstance(TypeName);
            }
        }
        else
        {
            object[]args=newobject[this._ArgList.Count];
            for(inti=0; i <this._ArgList.Count; i++)
            {
                args[i] =this._ArgList[i];
            }
            this.ClearArgs();
            constructors = conversionType.GetConstructors();//值来自于如果CreateInstance仅有一个参数
            if((constructors ==null) || (constructors.Length ==0))
            {
                obj3 =newDispWrapper(conversionType);
            }
            else
            {
                obj3 = conversionType.Assembly.CreateInstance(TypeName,false, BindingFlags.CreateInstance,null, args,null,null);//此步能接受例4和例5的输入
            }
            if(obj3 ==null)
            {
                thrownewException("Cannot create instance of "+ TypeName);
            }
        }
        if(!(obj3isstring) && !(obj3isDispWrapper))
        {
            obj3 =newDispWrapper(obj3);
        }
        returnobj3;
    }

publicvoidLoadAssembly(string partialName)

    {
    stringstr= partialName.ToLower();
    if(str.IndexOf(".dll") >0)
    {
        this.LoadAssemblyByPath(partialName);
    }
    elseif(str.IndexOf(".exe") >0)
    {
        this.LoadAssemblyByPath(partialName);
    }
    elseif(Assembly.LoadWithPartialName(partialName) ==null)
    {
        thrownewFileNotFoundException("Cannot load Assembly "+ partialName);
    }
    }

privatevoidLoadAssemblyByPath(string path)

    {
    Assembly.LoadFrom(path);
    }

    FieldInfo IReflect.GetField(string name, BindingFlags bindingAttr);
    FieldInfo[] IReflect.GetFields(BindingFlags bindingAttr);
    MemberInfo[] IReflect.GetMember(string name, BindingFlags bindingAttr);
    MemberInfo[] IReflect.GetMembers(BindingFlags bindingAttr);
    MethodInfo IReflect.GetMethod(string name, BindingFlags bindingAttr);
    MethodInfo IReflect.GetMethod(string name, BindingFlags bindingAttr, Binder binder, Type[] types, ParameterModifier[] modifiers);
    MethodInfo[] IReflect.GetMethods(BindingFlags bindingAttr);
    PropertyInfo[] IReflect.GetProperties(BindingFlags bindingAttr);
    PropertyInfo IReflect.GetProperty(string name, BindingFlags bindingAttr);
    PropertyInfo IReflect.GetProperty(string name, BindingFlags bindingAttr, Binder binder, Type returnType, Type[] types, ParameterModifier[] modifiers);
    object IReflect.InvokeMember(string name, BindingFlags invokeAttr, Binder binder, object target, object[] args, ParameterModifier[] modifiers, CultureInfo culture, string[] namedParameters);publicobjectUnwrap(object wrapper);

// Properties
protectedvirtualTypeMyType{get; }
Type IReflect.UnderlyingSystemType{get; }
}

[ComVisible(true), ClassInterface(ClassInterfaceType.AutoDispatch)]
internalclassDispWrapper: IReflect
{
// Fields
internalException_exception;
internalobject_object;
privateType_ObjectType;

// Methods
internalDispWrapper(object obj)
{
    this._object = obj;
    this._ObjectType = obj.GetType();
}

internalDispWrapper(Type t)
{
    this._object =null;
    this._ObjectType = t;
}
publicFieldInfoGetField(string name, BindingFlags bindingAttr);
publicFieldInfo[]GetFields(BindingFlags bindingAttr);
publicMemberInfo[]GetMember(string name, BindingFlags bindingAttr);
 public MemberInfo[] GetMembers(BindingFlags bindingAttr);
 public MethodInfo GetMethod(string name, BindingFlags bindingAttr);
 public MethodInfo[] GetMethods(BindingFlags bindingAttr);
 public PropertyInfo[] GetProperties(BindingFlags bindingAttr);  public PropertyInfo GetProperty(string name, BindingFlags bindingAttr, Binder binder, Type returnType, Type[] types, ParameterModifier[] modifiers);
 public object InvokeMember(string name, BindingFlags invokeAttr, Binder binder, object target, object[] args, ParameterModifier[] modifiers, CultureInfo culture, string[] namedParameters); MethodInfo IReflect.GetMethod(string name, BindingFlags bindingAttr, Binder binder, Type[] types, ParameterModifier[] modifiers); PropertyInfo IReflect.GetProperty(string name, BindingFlags bindingAttr);
 
// Properties
publicTypeUnderlyingSystemType{get; }
}