Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
  HOME    TRACKER    Visual Basic

File Name Or Class Name Not Found During Automation Operation

I have made VB Package and when I install on Windows 98. It is installed properly, but when I run the application I get the following error:

run time error 432
File name or class name not found during Automation operation

Please help me!!!

View Complete Forum Thread with Replies

See Related Forum Messages: Follow the Links Below to View Complete Thread
This Is Urgent: Automation Error/illegal Operation In VBexe File
error -2147217887
error description, automation error

our program works well in vb environment (sql server back-end) but when our program is compiled in exe. file, it crashes when creating new records...


Reading In Listbox.list Value Into An Fso Operation To Do A File Move Operation?
I have a huge log file and am pretty new to vb. I have read in the file into multiple listbox. I am having problems figuring out how to use the listbox.list value in a move fso operation. Is there a better way or better suggestion to accomplish this? Or suggestions?

When Programs Compiled In VB 6.0 (Automation Error, ILLEGAL OPERATION Occur)
error code : -2147417848
error description : Automation Error

We are using ADO(DATA ENVIRONMENT) and SQL SERVER 7.0 as the back end. An error occurs when saving the data(when creating new record only).This happens only when the program is in excutable(.exe) while if you are in VB 6.0 Environment the Programs are ok(no BUGS).

Do you know any Microsoft patch for this type of problem with the compiler?

Automation Error - The Specified Module Cannot Be Found
HI!! i am using class module in my project and after making exe ( without using p & d) when i run the exe on my machine it works fine, but when i run the exe on other machine it gives the error ' automation error - the specified module cannot be found'. any vb expert it will be a great on your part if you can help me ... thanks

Automation Error - Specified Module Could Not Be Found.
I don't know why I have suddenly got this error.
I have a reference to a dll file in my project.
I have checked this reference, I have made sure the dll is registered.
I haven't worked with any code that is assosiated with this dll.

All of a sudden it throws this error

I have done a search and looked thorugh many threads, but can't find an answer to this.

Filename Not Found During Automation Error 432


  I have finished an application(using VB) that runs well on my computer. I created a deployment package.

    My original deployment package I created for my application had 'dx7vb.dll' to be included in the installation process. However, when I tried the installation (on a different computer) the installation process froze when installing that file(dx7VB.dll).
   My solution was to re-do the package and deployment and skip the dx7vb.dll. I manually copied 'dx7vb.dll' to the windowssystem32 directory of the computer I was going to install my application on.

  I tried to install the application onto that computer. It installed successfully but when I went to run the application the following error occurred :

 " Error '432' Filename or classname not found during automation process"

   ...... it does not list what the filename or classname is.

 I also simply burned my executable onto a cd, and tried to run the executable directly from the cd drive of 2 different computers. The same error occurred.

   According to MSDN help site, the error occurs when GetObject() function is called ..... however, I do NOT have GetObject anywhere in my code.

 Could anyone give me some information on this problem? Any help is much appreciated!



The Object Found Has Been Disconnected From Its Clients.. Automation Error -214714784
Hello ,

I have encountered a problem of system error -2147147848
Automation Error..
The Object found has been disconnected from its clients.

Also this is while trying to open a crystal report via a VB Application

and while registering with the server
regsvr32 crpe32.dll

The error message

crpe32.dll was loaded, but the DLLRegisterServer entry point was not found.

DllRegisterServer may not be exported, or a curropt version of crpe32.dll may be in the memory. Consider using PView to detect and remove it.

If anyone has a solution please post it over...

Many Thanks,

[RESLOVED] Word Automation - Selection.Find - How To Test If Not Found
In automating a series of documents I have created tags, and am using Word's search and replace to do various text replacements. In some cases, however, when I find a certain tag, I need to do more than a simple replace (i.e., need to insert text, create a table, etc.). I have a generic routine that handles different documents, so not all documents will have all tags. If I am doing a Selection.Find on a particular tag, how can I test in code if that tag is not there (so that the insert and create table logic does not get performed unconditionally)?

Class Factories Not Found ???
Dear all,
system throwing this message " Class factories not found .... etc " to my applications.
the application already installed in my user computer, and i'm making a few changes in my DLL without changes the old functions or procedures, and when i 'm making an update for the modules ( DLL ) and register the DLL, system throws me this error.

i don't understand that error mean, somebody pls explain to me

Regard, Noob

Class Factory Not Found
I have developed an application with vb6. This application uses xmlhttp component. This application is running fine in all systems except in the following case.

When installed in windows 2000 as an adminstrator it is working perfectly when i am logging in as an adminstrator.
But when i am logging in as a power user it is not working and throwing an error : Class Factory not found.

Please help me by explaining the reason of the error and the means to resolve it.

Urgent Help! Error 432 Class Name Not Found

i'm starting to be really desperate. I've a problem with the application's instalation setup i've made. I know this is not the suited forum for this but i've trying to fix it for one day and i've succed

Problem is:

I made an instalation setup with inno of an application that already worked in vb ide. So i installed the prog in the same computer where i developed.
Then when i ran the program i get this error :

error 432 file name or class name not found during automation operation

What's happening here? Something wrong in the setup file?

Help please!

Class Factory And Path Not Found
Hello everybody!

I’m facing a weird problem. I have a program that uses ADO and windows common controls 6.0. It doesn’t use any COM components that I have made. When user runs this program he gets a “Class Factory Cannot supply the requested class” error. I suppose this is an ADO problem, so I asked him to re-install the application (installs MDAC as well). This error still exists.
However the most weird thing is that he’s getting a “Path not Found” error in the line that says “Open strFileName For Output As #nfileHandle” and we’ve checked that the path to the file exists and none of the parent directories are hidded or read only or anything!! Any suggestions please?

Class Automation ****
There are no errors on my VB code when im using XP. But when i transfered my codes using Windows NT4, in the command...

Set rs=New AdoDb.Recordset

theres an error.. "Class does not support automation......"

What cud b the problem??
I also encountered this problem on deployment....


Class Automation
i am using the internet control in my vb program but when i create an instance for it it gives me error that" Class does not support automation or does not support interface"
please help me. i have installed Visual studio sp4 too, but nothing happens
thanks in advance


How To Continue Search For A Class Name After 1st Match Found?

Can someone tell me how to continue a search for a handle by class name after finding the first match? I know how to find the first match of a handle by class name and then search for another class name within that program but do not know how to continue searching the main apps. This is what I do to search for the first match and then search within it for a child window:

A1 = FindWindow("MyProg", vbNullString)
A2 = FindWindowEx(A1, 0, "Child_Window", vbNullString)

The only way I know off hand to look for the next match of "MyProg" is by doing this:

A3 = GetNextWindow(1, GW_HWNDNEXT)

This will get the handle of the next window and then I have to check the class name. But is there a call I can make to continue a seach for "MyProg" incase there are multiple windows with that class name?


Automation Of Class Module
HI!! i am using class module in my project and after making exe ( without using p & d) when i run the exe on my machine it works fine, but when i run the exe on other machine it gives the error ' automation error - the specified module cannot be found'. it will be a great on your part if you can help me ... thanks

Class Does Not Support Automation
I have made a DLL to use Globally. However, when i try to reference it in another application and run that application i get an error like "The Class Does Not Support Automation".

Does anyone know why this is?


Class Does Not Support Automation ....
ive tried the solution found at msdn... it worked but when i intall
them on more than 1 computers, it still comes out.. but on some pc with the same OS.. it does not comes out... please help.....

Class Does Not Support Automation ....
i get this error message when i run the program after installation....

"Class Does Not Support Automation or Does Not Support Expected Interface"

Please help...


Class Does Not Support Automation

I've an issue that perhaps you can help me with ?

I run an app that uses the Inet Control. Running it interactively in debug>VB it runs fine. Compiled, to an EXE and run on the same machine I get "Class does not support Automation ?"

I didn't deploy it as it's running on the same machine. and the clear theory sohuld be that if it runs interactively it should compile and run as an EXE??




Class Does Not Support Automation ???
hi gusz,

can anyone help me on this?

i have a program that works well in my pc. however when it was installed on a different pc, it executes some part of my program then an error occurred:

"Runtime error 430
Class does not support automation or does not support expected interface"

The only thing that is special with my program is that i used ADO.

Program was installed on a Windows95 OS.

Thanks in advance..

Class Does Not Support Automation
i just tried installing my app on another pc. the installation goes ok, and i can run the app, but when i use some forms, i get the error 430 - "Class does not support Automation or does not support expected interface". it seems to be caused due to the listviews i have on these forms. any ideas how to fix it?

btw, i've installed it on other PCs, and it all works fine on them.

430 - Class Does Not Support Automation
What is the meaning of this? I get this when I try to run my DLL from my program. It only appears when the code is compiled.....Someone got any advice on fixing it?


- 430 - Class does not suppot Automation or does not support expected interface.

Class Does Not Support Automation
I'm desperate!

I have written a standard exe, in the same manner that I have written any other exe at the office (which work fine), only with this program, when I run it on Windows NT 4.0 (works fine on 95 and 98) I get the following message:

"Class does not support Automation or does not support expected interface".

I have found this occurs whenever I try and access the database - which is using the following code:

With CHKConn
.CursorLocation = adCursor 'constant declared
.Open TempConnectStr 'constant
End With
SQLString = "SELECT " & ProgName & " as TABUSED FROM ADesign"
CHKRecSet.Open SQLString, CHKConn, adOpen, adLock

The error occurs on the CHKRecset.Open line.
I have not created an ActiveX dll and then an Exe, I started the program as a standard I believe all the help that i've seen around that points to this as the culprit doesn't apply in this case.
Any leads to what could be causing it and a fix would be greatly appreciated.

Automation Class For Wininet.dll
Automation Class for wininet.dll ...?

Error 430: Class Does Not Support Automation
I have an application (standard exe) that just runs and loads data from a text file into a SQL Server database. It sure runs well on my mahcine, but when I try to run it on any other machine, it get:

Error 430: Class does not support automation or does not support expected interface.

The error occurs on the line:

set cmd = CreateObject("ADODB.Command")

and doesn't work when I change it to:

set cmd = New ADODB.Command

I've checked the MS site for help, but wasn't able to find anything that I thought applied to my problem. Can anyone give me a little insight or answers?


Class Does Not Support Automation (Error 430)
I'm trying to install some updated software on a machine.

Although On running teh software after unistalling the old software and installing the updated software, the follwoing error is displayed.

" Error 430:
Class does not support Automation or does not support expected interface"

NB the old software and updated software were complied on different computers.

Any help would really be appreciated


Dynamic Class Automation Behind Form
This is a second attempt on this question. The first I believe was being overlooked in the General Category.

I've created a function that creates a form dynamically, this part works how I wish it to. My problem is when I use the CreateEventProc method, the class is created with the form, but the VBE window appears. This obviously would not be acceptable during runtime. Below is my code.

Function WorklogForm() As Boolean
Dim frm As Form
Dim Frm_Min, Frm_date_lbl, Frm_Min_Lbl As Control
Dim Frm_comment, Frm_enterby, Frm_Date As Control
Dim Frm_Close As Control
Dim intDataX As Integer, intDataY As Integer
Dim cevent As Module
Dim eventInt As Long

On Error GoTo Error_WorklogForm

intDataX = 1440
intDataY = 230.4

Set frm = CreateForm(worklog, "worklog subform")
With frm
.DataEntry = True
.RecordSelectors = False
End With
Set Frm_date_lbl = CreateControl(frm.Name, acLabel, , "[Frm_Date]", "", 57.6, 57.6, 900, 240.5)
With Frm_date_lbl
.Caption = "Entered on:"
End With
Set Frm_Date = CreateControl(frm.Name, acTextBox, , "", "[enteredon]", 1008, 57.6, 3888, 240.5)
With Frm_Date
.BackColor = 12632256
.SpecialEffect = Flat
.FontWeight = 700
End With
Set Frm_comment = CreateControl(frm.Name, acTextBox, , "", "[comments]", 60, 360, 7920, 840)
Set Frm_Close = CreateControl(frm.Name, acCommandButton, , "", "", 60, 1320, 1008, 403.2)
With Frm_Close
.Caption = "Submit"
End With
Set cevent = frm.Module

eventInt = cevent.CreateEventProc("Click", Frm_Close.Name)
cevent.InsertLines eventInt + 1, vbTab & "DoCmd.Close acForm, Me.Name, acSaveNo"

Exit Function

MsgBox Err & " :" & Err.Description
Resume Exit_WorklogForm
End Function

I'v been beating my head against the wall for three days on this. I know I'm close, but just not close enough..

Any help would be appreciated

Class Does Not Support Automation...msado26.tlb
Hi All,

Plz help me, i m in a big trouble and not finding any solution for this problem.

I have created setup (Package) for my application. I used Package and Deployment wizard for the same. When i deployed the setup at client location and try to run the application i got an error Class does not support automation or does not support expected interface.

To find out where the problem occurs i install VB at client machine and debug the application, then i found that error occured at line
Set oCmd = New ADODB.Command
Application uses the reference of Microsoft ActiveX Data Objects 2.6 Library. Location of this file is...CommonFilesSystemADOmsado26.tlb

I know that .tlb files are created with .dll files and used to set the reference to the component.

There should be a msado26.dll file exist on client machine, so that instance of the component can be created. But i dont find any such file on my pc and hence i m unable to register it on client location.....

Plz help me, I dont know how to solve this problem,

Thanks in advance,

Class Doesn't Support Automation
I have a VB program that accesses a DLL at a point in the program to handle some data encryption, etc. I had the program working perfectly on my development computer - the DLL is accessed, all works according to plan, etc.

However, I moved it over to test on another computer (this one has only the VB6 runtime files) and I get an error whenever it tries to access the DLL. The error is:

Class doesn't support Automation (error 430).

I looked it up and it's this one:

MSDN page

However, that doesn't really help me much. Why does it work on one machine and not the other? Is it a windows thing? One machine is using XP while the test machine is using 98 - does that matter? Is it because the developer mahcine has all the tools and libraries VB needs and the test machine has only the runtimes?

Is there a fix for this?

Error Help: On Class Does Not Support Automation
what does it mean when i get the following error when i run the exe file i created with VB

run time error 430
Class does not support Automation or does not support expected interface

Dev Dll Erroring With 'Class Does Not Support Automation'
I have dll's that I use in my asp pages, some dll's call other dll's in addition to being called from the web pages.  All dll's have a Dev Version and a Prod version (they have Dev or Prod at the beginning to signify which one they are).  The dev and prod versions use the same cls files, but have different project files.  Up till now this process has worked wonderfully.
Using the Prod dll's everything works fine, but when I use the Dev dll's on the same site, one of my dll's consistently fails with the error 'Class does not support automation or does not support expected interface.'
I've compared the project setting of this dll with it's prod one and with other dev dll's, but there doesn't seem to be a difference.  I've rebuilt it multiple times, but to no avail.

Any ideas?!
Thank you!

Error 430 Class Does Not Support Automation
hello guys,

there is a program developed in visual basic.  i reinstalled windows and installed that vb application again.  this time i'm getting error 430 Class does not support automation which before was fine.  i tried installing mdac 2.8, still didnt work.  i dont have the code/project file so i couldn't change the project component version compatibility to binary compatibility.  if this software worked before,  is there any workaround on this problem? any suggestions are greatly appreciated....


Error: Could Not Locate Automation Class

I have recently upgraded a VB6.0 ActiveX DLL to VB.NET. This DLL is basically used for playback of java and vb scripts.

I earlier used to register the VB6.0 DLL with REGSVR32.EXE so the generated scripts (java and VB) can use the COM objects.

However, now after upgrading to VB.NET, and installing the .NET framewrok also on my machine, I am getting the following error while playing the scripts.

Error:"Could not locate automation class named APRecPlay.TInput."
Source: WScript.CreateObject

I also tried registring the VB.NET DLL with regasm.exe. But that doesnt help either.

Any suggestions?


Can't Locate Automation Class Of COM Object
I have created a COM object with C++ using ATL. It is a wrapper for an existing dll. It registers successfully.
I can call it successfully from visual basic code, like this:


Public Class form1
Dim gTestATL As My_ScriptWrap.CScrWrap
gTestATL = New My_ScriptWrap.CScrWrap

rc = gTestATL.connect("connectionString")
etc... with other class methods working as well
End Class

But when I call it from my VBScript file, like this:


dim rc
dim myapi_obj

WScript.Echo "Testing MyWrapper"

set myapi_obj = WScript.CreateObject("My_ScriptWrap.CScrWrap")
rc = myapi_obj.connect("VBSConnectionStr")

I get the following error:
Could not locate automation class named "My_ScriptWrap.CScrWrap".
Code: 80020009

Let's see - other useful info?
I'm using Windows Script Host v5.6.
I just call my vbs file from the command line.
Compiled COM object with VS 2005, running XP Pro w/SP2

Thanks in advance,

Class Does Not Support Automation Error

When I compile and create an executable for my application and place the executable in my server, I amnot able to use the same executable in another system. I get an error message "Class does not support Automation or Expected Interface".

Can anyone help me with resolving this issue?


Class Doesn't Support Automation
HI everybody!

I am having trouble with a setup routine for one pc in particular and looking for suggestions to troubleshoot the situation.

I am receiving an "CLASS DOESN'T SUPPORT AUTOMATION (Error 430)". The microsoft knowledge base says that this is caused by a project that may have been changed from dll to exe and is somehow causing a conflict.

Microsoft says I must manually unregister the old .dll or .exe to avoid the problem.

Unfortunately I am having a hard time finding what I must unregister. Please let me know if you have any suggestions to find the right dll or exe that is causing the problem.

Thanks !

Grrr..vb5.0/class Does Not Support Automation
Greetings all-

Using the setupkit that came with vb5.0, I am trying to make an .exe for distribution. It says that my MSCAL.ocx (dependency) file is out of date. If I leave the mscal.ocx box checked (so mscal is included as a dependency file), then I get an error "The file 'CWindowsSystem$(DLLSelfRegisterE)' could not be registerd because it was not found." when I try to install the program. If uncheck the box so it is not included, then the setup program works well (on my computer), and the vb app. runs as intended.

When I installed the app & ran it on a friend's computer, the following message appeared: " Run-time error '430': Class doesn't support Automation "

I hope that all made sense?! I am not certain if the out-of-date error in the setup program has anything to do with the 430 error? I just want the program to run on another computer!

If anyone can give me some insight as to what the problem might be, I would be truly grateful.

Much thanks in advance!

430 - Class Does Not Support Automation Or Expected Interface
430 - Class does not support automation or expected interface

Anyone know what this error means? I've got an activex component that works fine on my box and most other boxes except my customer's. I figured it was probably a dependency issue, but I've looked at all of the references and they all look good. Anyone know of another reason this error might occur?

Runtime-error 430: Class Does Not Support Automation.....
I creatred a little app to automatically create a workbook with several worksheets. After creation it adds a module so that a macro is added that runs at runtime. So far so good, i built the app on an XP platform and it runs fine. But when i brought the app/code to work, 2000 Professional, i get this: "Run-time error '430': Class does not support Automation or does not support expected interface." When i migrated the code and program to 2000 i had to change my Project reference from "Microsoft Excel 10.0 Object Library" to "Microsoft Excel 8.0 Object Library". I dont know if this is the problem or not. Any ideas...........? Here is the code that is causing the problem. One last bit of info, If i comment out "Private xlModule as Object" the error stops.

' Excel handle decleration.
Private xlAppHandle As Excel.Application
Private xlWorkBook As Excel.Workbook
Private xlCurrentSheet As Excel.Worksheet
Private xlmodule As Object

'Constants for Excel formatting
Private Const colParamGoup As Integer = 1
Private Const colParamName As Integer = 2
Private Const colExpected As Integer = 3
Private Const colLowerTolerance As Integer = 4
Private Const colUpperTolerance As Integer = 5
Private Const colTestCaseOffset As Integer = 3

Public Sub createSheets(numOptions As Integer, numSettings As Integer, numRigging As Integer)
Dim optPlaceHolder As Integer
Dim setPlaceHolder As Integer
Dim rigPlaceHolder As Integer
Dim sumPlaceHolder As Integer
Dim numSheetsAvailable As Integer
Dim numSheetsNeeeded As Integer
Dim numSheetsToCreate As Integer
Dim testCaseIdentifier As String
Dim xlCurSheetNameStr As String

Set xlAppHandle = New Excel.Application
Set xlWorkBook = xlAppHandle.Workbooks.Add()
Set xlmodule = xlWorkBook.VBProject.VBComponents.Add(1)
numSheetsAvailable = xlWorkBook.Worksheets.Count

numSheetsNeeeded = numOptions + numSettings + numRigging + 1
numSheetsToCreate = numSheetsNeeeded - numSheetsAvailable

For i = 1 To numSheetsToCreate + 3
xlWorkBook.Worksheets.Add After:=xlWorkBook.Worksheets(xlWorkBook.Worksheets.Count)
Set xlCurrentSheet = xlWorkBook.Worksheets(i)

Set xlCurrentSheet = xlWorkBook.Sheets(1)
xlCurrentSheet.Name = "App G-1 (SysId)"

For i = 1 To numOptions
optPlaceHolder = i + 1
Set xlCurrentSheet = xlWorkBook.Sheets(optPlaceHolder)
xlCurrentSheet.Name = "App G-" & i + 1 & " (OptionsTC" & i & ")"

For j = 1 To numSettings
setPlaceHolder = j + optPlaceHolder
Set xlCurrentSheet = xlWorkBook.Sheets(setPlaceHolder)
xlCurrentSheet.Name = "App G-" & j + optPlaceHolder & " (SettingsTC" & j & ")"

For k = 1 To numRigging
rigPlaceHolder = k + setPlaceHolder
Set xlCurrentSheet = xlWorkBook.Sheets(rigPlaceHolder)
xlCurrentSheet.Name = "App G-" & k + setPlaceHolder & " (RiggingTC" & k & ")"

Set xlCurrentSheet = xlWorkBook.Sheets(rigPlaceHolder + 1)
formatSummarySheets numOptions
testCaseIdentifier = "Options"
xlCurrentSheet.Name = "App G-" & rigPlaceHolder + 1 & " (Opt TCs)"
xlCurSheetNameStr = "App G-" & rigPlaceHolder + 1 & " (Opt TCs)"
populateSheets testCaseIdentifier, xlCurSheetNameStr, numOptions, optPlaceHolder

Set xlCurrentSheet = xlWorkBook.Sheets(rigPlaceHolder + 2)
formatSummarySheets numSettings
testCaseIdentifier = "Settings"
xlCurrentSheet.Name = "App G-" & rigPlaceHolder + 2 & " (SettingsTCs)"
xlCurSheetNameStr = "App G-" & rigPlaceHolder + 2 & " (SettingsTCs)"
populateSheets testCaseIdentifier, xlCurSheetNameStr, numSettings, optPlaceHolder

Set xlCurrentSheet = xlWorkBook.Sheets(rigPlaceHolder + 3)
formatSummarySheets numRigging
testCaseIdentifier = "Rigging"
xlCurrentSheet.Name = "App G-" & rigPlaceHolder + 3 & " (RiggingTCs)"
xlCurSheetNameStr = "App G-" & rigPlaceHolder + 3 & " (RiggingTCs)"
populateSheets testCaseIdentifier, xlCurSheetNameStr, numRigging, setPlaceHolder

xlWorkBook.SaveAs destFileString
Set xlWorkBook = Nothing
End Sub

Public Sub populateSheets(testCaseType As String, curShtName As String, numTestCases As Integer, _
testCaseSheetOffset As Integer)
Dim strCode As String

Select Case testCaseType
Case "Options"
For i = 1 To numTestCases
strCode = _
"Sub Options" & i & "()" & vbCr & _
" Sheets(""App G-" & i + 1 & " (OptionsTC" & i & ")"").Select" & vbCr & _
" for j=1 to " & numOfOptionsParameters & vbCr & _
" Range(""A""& j + 1 & """").Select" & vbCr & _
" ActiveCell.FormulaR" & j + 1 & "C" & j + 1 & " = ""='" & curShtName & "'!RC" & vbCr & _
" Range(""B""& j + 1 & """").Select" & vbCr & _
" ActiveCell.FormulaR" & j + 1 & "C" & j + 1 & " = ""='" & curShtName & "'!RC" & vbCr & _
" next" & vbCr & _
"End Sub"
xlmodule.CodeModule.AddFromString strCode
xlAppHandle.Run "Options" & i

Case "Settings"
For i = 1 To numTestCases
strCode = _
"Sub Settings" & i & "()" & vbCr & _
" Sheets(""App G-" & i + testCaseSheetOffset & " (SettingsTC" & i & ")"").Select" & vbCr & _
" for j=1 to " & numOfSettingsParameters & vbCr & _
" Range(""A""& j + 1 & """").Select" & vbCr & _
" ActiveCell.FormulaR" & j + 1 & "C" & j + 1 & " = ""='" & curShtName & "'!RC" & vbCr & _
" Range(""B""& j + 1 & """").Select" & vbCr & _
" ActiveCell.FormulaR" & j + 1 & "C" & j + 1 & " = ""='" & curShtName & "'!RC" & vbCr & _
" next" & vbCr & _
"End Sub"
xlmodule.CodeModule.AddFromString strCode
xlAppHandle.Run "Settings" & i

Case "Rigging"
For i = 1 To numTestCases
strCode = _
"Sub Rigging" & i & "()" & vbCr & _
" Sheets(""App G-" & i + testCaseSheetOffset & " (RiggingTC" & i & ")"").Select" & vbCr & _
" for j=1 to " & numOfRiggingParameters & vbCr & _
" Range(""A""& j + 1 & """").Select" & vbCr & _
" ActiveCell.FormulaR" & j + 1 & "C" & j + 1 & " = ""='" & curShtName & "'!RC" & vbCr & _
" Range(""B""& j + 1 & """").Select" & vbCr & _
" ActiveCell.FormulaR" & j + 1 & "C" & j + 1 & " = ""='" & curShtName & "'!RC" & vbCr & _
" next" & vbCr & _
"End Sub"
xlmodule.CodeModule.AddFromString strCode
xlAppHandle.Run "Rigging" & i

Case Else
End Select
End Sub

Trouble Debugging (Class Does Not Support Automation....
I'm i'm trying to debug my dll. I Run the DLL, start the application. Some functions run, but I get an error only in debug mode on a Enumeration in the one class. Any ideas? Mark P.
Providing Low Cost Powerful Point of Sale Solutions.

Class Does Not Support Automation Or Expected Interface!
After I created .exe file for a app. and installed to other PCs, all computers(except one) work.
The problem is when I click one button, it gave me a error message: Run-time error '430', Class does not support Automation or does not support expected interface. I installed VBRun60.exe file in that computer, but still can not fixed this bug?

Error 430 Class Doesn't Support Automation...Help!!!
Hello and thanks in advance for your suggestions!

I get this error message on opening the application after having newly installed it on a Win95 client machine. It's a VB6 app using ADO and I'm trying to open a recordset on a Sybase database using the ODBC provider for Sybase (System 11). It has been developed on an NT box and tested on both NT and 95 boxes before being packaged and deployed. I have tested it through the development environment and also as a compiled exe and it works fine on the production machines. The 95 target machine is clean (no VB) and has the entire mdac20 components, and Sybase drivers installed and also has Dcom95 installed on it. I also tried it after installing dcom98 but get the same error. The app installs successfully and also packages with no missing dependencies. Although I have tried quite a few things, any suggesitons will be much appreciated. FYI, the project has been compiled with no compatibility, so this does not come into play. I have attached the offending code below.

Module level

private strSQL as string
Dim aDC as ADODB.Connection

In Form_Load()

Dim aRS as new ADOR.Recordset
set aDC = new ADODB.Connection
aDC.Open sDbName, msUserId, msPassword 'sDbName is the DSN for the Sybase provider for ODBC
' which is passed in along with uid and pwd thru an ini file
strSQL = "Select * from CLIENT where CLIENT_ID = '" & strID & "'"

aRS.Open strSQL, aDC, adOpenForwardOnly, adLockReadOnly, adCmdText -- does not open recordset!

Thanks much,

Class Doesnot Support Automation(error 430)
I created ActiveX dll (FormatObject) with one simple class (Format). Then I created another ActiveX dll (Harmonic) with one class (harmCls). This second (Harmonic) dll uses the first dll. Now I tested the second dll by adding a standard EXE project to the second dlls project and making calls to its interface. Every thing works fine. But when I create a new separate exe project and add second dll to its references and make calls to it interface, I get error, Class doesnot support Automation(error 430). And this error occurs where second makes call to first dlls interface functions. Can any one help me in this regard



430 Error. Class Doesn't Support Automation. ONLY In Windows NT!!
Hello to everyone there.

I am getting a 430 Error (Class doesn't support Automation ) in a programm I made. The problem is not in my computer (where I developed it) but in another computer (there that I installed it).

I have just installed the same program in 3 different computers. The 2 of them have Windows 2000 (and everything works OK) and the last (there that I am getting the error) has Windows NT!

Is something special that I have to do while I compile it?

Have you any idea of how can I solve this problem!

Thank's in advance,


Installation Problem: Error 430 - Class Does Not Support Automation ...
My machine is running Win 98 with VB6 Pro and SP4.
I compiled the project and created a setup routine with Install Shield Express 2.13.

After running the setup on one user's machine who also had Win 98 with VB6/SP4 produced no problems when she ran the program.

After running the setup on another user's machine (a 486 with Win 95, no VB) caused the following problem when she tried to run my app:

Error 430 - "Class does not support automation or does not support expected interface."

Any ideas as to what could be causing this? Thanks for your help.

Error 430: This Class Doesn't Support Automation... Very Strange Behaviour !!!!
I'm developing an EXE ActiveX to use in a main app. The problem, is that when I run the main app from environment to debug it, and it tries to instantiate the EXE ActiveX object, using CreateObject function, the app gives the Error 430. If I build the EXE file for main app, and run it, the error dissappears. What's going on???? !!!!

Any idea would be appreciated...

Thanx in advance !!!!!!!


How To Define Two Keys For One Operation Ex:(cntrl+A = Add Operation)
how to define two keys for one operation excntrl+A = Add operation)
(cntrl+P = Print Operation)

when i use single key like this my program run perfectly
if keycode = vbkeyF1 then
msgbox "you press F1 key"

but i want to when use control key and A key it should show this message

please help me my friends

File Operation

I need some help to do some file operation using visual basic 6.0.
How do i cut a file from one folder and paste it into another folder
and change the file name..
Is there any site or reference that i can use to do this operation

thx in advance

Copyright © 2005-08, All rights reserved