Solved

Is a file registered?

Posted on 2004-10-20
4
155 Views
Last Modified: 2010-05-02
Hi dears
I write a programe with vb that use in autorun.
but I know that vb application need vb dll (vb6.....dll)
(visual basic runtime module)
And i use some activex on it.
how can I do this?
I think for this 2 solution :

1) If any way to know that is this activex is registred or no ? (for Example if have vb dll or another activex)
If yes,please help mo how can i do this.

2) If any way that install nesseray file only in fist time that cd put in drive and next time olny run programe.

Very very thanks.
0
Comment
Question by:msalari
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
4 Comments
 
LVL 70

Accepted Solution

by:
Éric Moreau earned 25 total points
ID: 12357077
Many DLLs and all OCXs needs to be registered before being used by an application.

There are applications that include them within your executable, though.
http://www.bitarts.com/software.htm
http://www.moonlight-software.com/vbpower.htm
0
 
LVL 14

Assisted Solution

by:aelatik
aelatik earned 25 total points
ID: 12361239
You have to check the registry for the class name or perform an error trapped late binding to find out/

To check the registry simply search the HKEY_CLASS_ROOT section of the registry, for example :

Private Sub Form_Load()
    On Error GoTo ERR_OUT
        Dim WSH
        Set WSH = CreateObject("wscript.shell")
            If WSH.RegRead("HKEY_CLASSES_ROOT\Internetexplorer.Application\CLSID\") <> "" Then
                MsgBox "Exist !"
            End If
            Exit Sub
ERR_OUT:
        MsgBox "Does not exist !"
End Sub

Or use late binding to check for it :

Private Sub Form_Load()
    On Error GoTo ERR_OUT
        Set TMP = CreateObject("Internetexplorer.Application")
        If IsObject(TMP) Then MsgBox "Exist !"
        Exit Sub
ERR_OUT:
        MsgBox "Does not exist !"
End Sub
0

Featured Post

On Demand Webinar: Networking for the Cloud Era

Ready to improve network connectivity? Watch this webinar to learn how SD-WANs and a one-click instant connect tool can boost provisions, deployment, and management of your cloud connection.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Most everyone who has done any programming in VB6 knows that you can do something in code like Debug.Print MyVar and that when the program runs from the IDE, the value of MyVar will be displayed in the Immediate Window. Less well known is Debug.Asse…
Not long ago I saw a question in the VB Script forum that I thought would not take much time. You can read that question (Question ID  (http://www.experts-exchange.com/Programming/Languages/Visual_Basic/VB_Script/Q_28455246.html)28455246) Here (http…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…
Suggested Courses
Course of the Month3 days, 11 hours left to enroll

630 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question