Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

error registering file 'c:\winnt\system32\cbmdaq.ocx

Status
Not open for further replies.

jeneric

Programmer
Aug 18, 2005
2
CA
I'm trying to install a program written on a computer that ran Windows98 onto computers that run XP and 2000, but I get this error message:

"an error ocurred while registering file 'C:\WINNT\system32\cbmdaq.ocx"

Is this because the registry files are different in Windows98 versus XP and 2000? How can I solve this?

Thanks for any advice you can give.

Eric Stouffer
Department of Psychology
McGill University

 
Thanks so much. Installing InstaCal before installing my program seems to have worked.

Eric
 
Hello,

I have an problem with Stopping the program when the close button is clicked. The button does not work, the program continues running.

This application is a MDI form with one child form. The child form is the one with the start and stop button on it. If I click Start, the program starts and it is designed to continue running 24X7 since it processes incoming ftp files, decrypts, unzips, converts, loads, archives etc, this is all in two subs. But I can never get focus back to the stop button, I click and nothing, the program continues to run. Now, with a MDI child form, you can't run it as Modal.

Here is the pseudo code:
+++++++++++++++++++++++++++++++
Public Sub MDIForm_Load() 'MDI form load on startup
Decrypter.Show vbModeless 'loads child form
MDIForm1.Arrange vbCascade
End Sub


'Maim Program Child Form Decrypter
Public StopMe As Boolean
Public Sub main()
Dim fso As New FileSystemObject
Dim MyCon As New ADODB.Connection
Dim rsAutoDirty As New ADODB.Recordset

Decrypter.Visible = True 'Child Form
StopMe = False

Do While not ... 'Program runs

Code.....
Call Sub2()

If StopMe Then 'When cmdStopProcess clicked
Exit Do
Text1.Text = ""
SourceFile = ""
SourceDir = ""
DirName1 = ""
DirName2 = ""
rsAutoDirty.Close
outFile.Close
MyCon.Close
Set rsAutoDirty = Nothing
Set MyCon = Nothing
End
Exit Sub
End If

Loop
End Sub

Private Sub Command2_Click() 'Start Module
Call main End Sub

Public Sub cmdStopProcess_Click() 'Stop Module
StopMe = True
End Sub
++++++++++++++++++++++++++++++++

 
See faq222-2244 for information on how to get the best answers from the forum, scriptaddict.
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top