Problem with Data Environment in VB6

Visual Basic
I added the Designer "Add Data Environment" to my VB Project, but when I click on the "Add Data Environment" from the Project menu item, I get an error in a message box that says: "Class not registered. Looking for object with CLSID:{3D5C6BF2-69A3-11D0-B39300A0C9055D8E}" The Designer "tab" under the Components "window" shows that the source for the Data Environment designer is located at "F:Program FilesCommondesignersMSDE.DLL". So I "registered" that dll (using "regsvr32") and it returned that it had been registered successfully. But I still get the same error from the VB project environment. Any suggestions how to correct this? I did a file search for the "MSDE.DLL" file and found it in three different CAB files and once in the previously mentioned directory location. Two of the CAB files show a much smaller (around 300K) file from 2000, and the other once is the same as the registered one (around 700K) with a date in 2004. Is (perhaps) VB looking for the 'older' version? (And if so, how can I change this to the newer one?) Running on XP-Pro, SP2

Answer Wiki

Thanks. We'll let you know when a new response is added.

Try this, in a new project first:
– Add the Microsoft Data Environment Instance 1.0 to the project via the References.
– Then add the designer to your project.

If it missing then you can browse for it in C:Program FilesCommon FilesdesignerMSDERun.dll. Adding the reference this way causes VB to register the component if it is not already registered.

I hope this helps.


Discuss This Question: 1  Reply

There was an error processing your information. Please try again later.
Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.
  • 1218
    Hello I am using Data Environment Designers, I try to add new record just after A am setting some values to existing record (most of the time to the record that the recordsset point to just after the Open ) This is runing Ok on XP, but now I am moving the application to Windows 7 and what happens is that one record is updated OK but the new record has all the values from the previous record that the Recordset was pointed to (the one that I set values just befor the Recordset.AddNew) The way the code runs is like this '-----------------Open the recordset-------------------------------------- CommandText = deLaw.Commands("Chiuv").CommandText Set rs = New ADODB.Recordset rs.CursorLocation = adUseClient rs.Open CommandText, deTest.Commands("cmmdOrders").ActiveConnection, adOpenStatic, adLockBatchOptimistic rs.Properties("Unique Table").Value = "Chiuv" rs.Properties("Update Resync").Value = ADODB.ADCPROP_UPDATERESYNC_ENUM.adResyncAll rs.Properties("Resync Command").Value = "Select ............Where (ChiuvNum = ?)" '-------------------------Binding--------------------------------------- Dim col As new BindingCollection Set col.DataSource = rs col.Add txtCaseNum, "Text", "CaseNum" '---------------Set the value to the current record------------------------- rs!CaseNum = CaseNum.text '----------------New Record------------------------------ rs.AddNew '-------------------------Update---------------- '---------------------------------------------------------------------------------------- P.S. The application is a VB6 The windows 7 has SP1 The ConnectionString for the Data Environment is Provider=MSDataShape.1;Persist Security Info=False;Data Source=<serverIp>;User ID= <User>;Password=<PW>;Initial Catalog=TestAdo;Data Provider=SQLOLEDB.1;" The Vesrsion of ADODB.Connection on the Data Environment Is on XP "2.8" on Windows 7 "6.1" Thanks, I would be vaery grateful for any help
    10 pointsBadges:

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

Thanks! We'll email you when relevant content is added and updated.


Share this item with your network: