Cuestión : GUID de un ActiveX OCX

Estoy intentando conseguir el GUID principal de un ActiveX OCX apenas de la trayectoria llena del OCX.
1. No puede ser colocado así que no puedo conseguirlo de Registry.
2. No puedo utilizar TlbInf32.Dll porque las aplicaciones ITypeLib del programa de eliminar dependencies.

Here son el código que estoy utilizando: el rel= " nofollow " del " _blank " del target= de " http://www.jsware.net/jsware/zips/tlbread.zip " del href= del
el re/zips/tlbread.zip
Article de http://www.jsware.net/jswa está aquí: rel= " nofollow " del " _blank " del target= de " http://www.jsware.net/jsware/vbcode.php3#tlbc " del href= del
re/vbcode.php3#tlbc
de http://www.jsware.net/jswa class= del

Respuesta : GUID de un ActiveX OCX

El parecer como para:

Función IsLike (valor, patrón)
regEx dévil
   
    Fijar el regEx = CreateObject (“vbscript.regexp”)
        Con el regEx
            . Global = verdad
            .IgnoreCase = verdad
            . El patrón = “^” y substituye (patrón, “*”,”. {0,} ") y “$”
            IsLike =. Probar (valor)
        Terminar con
    Fijar el regEx = nada
Terminar la función

Aceptará códigos de control entre las secuencias mientras que

Función IsLike (ByVal TextVal, patrón de ByVal)
  RXP dévil
  IsLike = falso
  Fijar RXP = nuevo RegExp
    Con RXP
      . Global = verdad
      .IgnoreCase = verdad
      . El patrón = “^” y substituye (patrón, “*”,” [\ x20- \ x7E] *") y “$”
      IsLike =. Probar (TextVal)
    Terminar con
  Fijar RXP = nada
Terminar la función

Se asegurará que los únicos carácteres entre los componentes sean alfanuméicos y puntuación común.

Chris
Otras soluciones  
 
programming4us programming4us