Is there a way to create dynamic objects by declaring the type of object as parameter

[lotos]

Hey guys, need some ideas about creating dynamic functions and objects which could be used across different platforms, e.g. web, java, windows, etc...
Below is an example of what I am trying to achieve (not even sure this would be possible). So for e.g. I have a check function which in case = true then reports Pass, otherwise reports Fail.

Code:

Public Sub ObjByTitle_Exist(objType, objTitle)
    Set objDesc = Description.Create  
    objDesc("micclass").value = objType
    objDesc("title").value = (objTitle & ".*")


    If objType(objDesc).Exist(5) Then
        ''' Report Pass
    Else
        ''' Report Fail
    End If
End Sub

The intention of such a thing is to be used across different platforms where when using it I just throw in the object type and the system will identify it and do whatever is needed or possible with that specific object.

Then I am looking to use it in this way:

Code:

'in Java:
ObjByTitle_Exist "JavaDialog", "DialogTitle"

'in Windows:
ObjByTitle_Exist "SwfDialog", "DialogTitle"

Another example would be for e.g. I have an SwfButton and a WebButton - no I am trying to access any of those buttons by using a function like the one above - I could create 2 different function for each object type, but this would extend the framework way too much. Any ideas if kind of a combined framework could be created or one to be used across multiple environments would be great?!