Pytanie : GUID ActiveX OCX

I próbować the magistrala GUID ActiveX OCX od właśnie the pełny ścieżka the OCX.
1. Ono móc rejestrować więc I móc ono od Registry.
2. I móc TlbInf32.Dll ponieważ the program uses ITypeLib dependencies.

Here być the kod I używać:
http://www.jsware.net/jswa re/zips/tlbread.zip
Article być tutaj:
http://www.jsware.net/jswa re/vbcode.php3#tlbc

Odpowiedź : GUID ActiveX OCX

Przy jak dla jak:

Funkcja IsLike (Wartość, Wzór)
Ciemnawy regEx
   
    Ustalony regEx = CreateObject ("vbscript.regexp")
        Z regEx
            . Globalny = Prawdziwy
            .IgnoreCase = Prawdziwy
            . Wzór = "^" & Zamieniać (Wzór, "*",". {(0),} ") & "$"
            IsLike =. Test (Wartość)
        Końcówka Z
    Ustalony regEx = Nic
Końcówka Funkcja

Akceptować kontrolny kod między the sznurek podczas gdy

Funkcja IsLike (ByVal TextVal, ByVal Wzór)
  Ciemnawy RXP
  IsLike = Fałszywy
  Set RXP = Nowy RegExp
    Z RXP
      . Globalny = Prawdziwy
      .IgnoreCase = Prawdziwy
      . Wzór = "^" & Zamieniać (Wzór, "*"," [\ x20- \ x7E] *") & "$"
      IsLike =. Test (TextVal)
    Końcówka Z
  Set RXP = Nic
Końcówka Funkcja

Zapewniać the jedyny charakter między the składnik być alphanumerics i pospolity interpunkcja.

Chris