Microsoft KB Archive/169331

From BetaArchive Wiki
< Microsoft KB Archive
Revision as of 12:29, 21 July 2020 by X010 (talk | contribs) (Text replacement - "&" to "&")
(diff) ← Older revision | Latest revision (diff) | Newer revision → (diff)
Knowledge Base

Article ID: 169331

Article Last Modified on 1/13/2001


  • Microsoft Visual Studio 97 Service Pack 3
  • Microsoft Visual Basic 5.0 Learning Edition
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 5.0 Enterprise Edition

This article was previously published under Q169331


RecomputeRepository returns an error if it is run against a database created by the UML.DLL.


Microsoft has confirmed this to be a bug in the Microsoft products listed at the beginning of this article. This has been fixed with in Visual Studio Service Pack 1.

For additional information about the Visual Studio 97 Service Pack 1, please see the following article in the Microsoft Knowledge Base:

170365 INFO: Visual Studio 97 Service Packs - What, Where, and Why


The engine has changed get_item for collections starting in Visual Studio Service Pack 1 so that items can only be retrieved using OBJID's, names and indexes. Previously the Repository allowed initids to be used. ReComputeRepository previously depended on this functionality. Now, the ReComputeRepository function uses OBJID's to get items.

Steps to Reproduce Problem

  1. Start a new Standard EXE project. Add MODULE1.BAS.
  2. Type the following code into MODULE1.BAS:

          Declare Function ReComputeRepository Lib "RepUtil" (ByVal szPath _
          As String,  ByVal szUser As String, ByVal szPwd As String) As Long
          Sub Main()
             'change the following path to the windows location for
             'your machine
             Dim lngRet As Long
             sPath = "c:\WINDOWS\msapps\repository.mdb"
             lngRet = RecomputeRepository(sPath,"","")
             MsgBox "The return value is (" & lngRet & ")!"
          End Sub
  3. Run the code.


The return code is not 0.


The return code be 0.

Keywords: kbbug kbfix kbvbp500sp2fix kbvs97sp1fix kbvs97sp2fix kbvbp500sp1fix KB169331