FIX: ???? ???? ??? ???????? ?? ????????? ??? ??????? ?? ?????? ??? API OLE DB

?????? ????????? ?????? ?????????
???? ???????: 296905 - ??? ???????? ???? ????? ????? ??? ???????.
??? ????? ??? ???????. ????? "??? ??" ??? ??? ??????? ??? ????.
BUG #: 11327 (Plato7.x)
????? ???? | ?? ????

?? ??? ??????

???????

??? ????? ??????? ???????? ???? ??? ???????? ????????? ?? ???????? ????? ?????? ??????? ???????? ???? ?????? ?? API OLEDB ???? ????? ????? OLEDB ???????:
-???? ???? (80040e4) 2147217916 ??? ????

????

??? ??? ???????? ??? ?????? ??? ???? ???? ???? ?? Microsoft SQL Server 2000 (Analysis Services ?????? ??- Sql2kasp1.exe). ?????? ??? ??????? ??????? ???? ??? ??? ??????? ?????? ?????? ?? "????? ??????? ?? Microsoft:
290211INF: ????? ?????? ??? ???? ???? ???? ??????? SQL Server 2000

?????

???? Microsoft ?? ??? ????? ?? ??????? 8.0 ?? ????? ????? SQL Server 2000. ?? ????? ??? ??????? ???? ??? ?? ????? ????? ???????? ?? Microsoft SQL Server 2000 Service Pack 1.

??????? ????

????? ????? ????? ??????

  1. ????? ????? Visual Basic EXE ????? ????.
  2. ????? ???? ??? ????? ?????? ???????? ?????? ?? Microsoft.
  3. ????? ???? ????? ??? ??????? ?? ?? ?????? ???????? ???????? ???????:
    Public Sub Main()
      Dim cn As New ADODB.Connection
      Dim cmd As New ADODB.Command
      Dim rs As New ADODB.Recordset
       
      On Error GoTo ErrH
      
      cn.Open "Provider=MSDMINE;Mining Location=C:\Program Files\" & _
        "Microsoft Analysis Services\Data\FoodMart 2000"
      rs.Open "SELECT t.num_children_at_home, t.marital_status," & _
         " t.yearly_income, [Member Card RDBMS].[Member Card] FROM" & _
         "[Member Card RDBMS] PREDICTION JOIN OPENROWSET('Microsoft.Jet.OLEDB.4.0'," & _
         "'data source=C:\Program Files\Microsoft Analysis Services\Samples\FoodMart 2000.mdb'," & _
         "'SELECT [Customer_ID], num_children_at_home, marital_status, yearly_income" & _
         " FROM Customer') AS t ON  [Member Card RDBMS].[Customer ID] = t.[Customer_ID]" & _
         " AND [Member Card RDBMS].[Num Children at home] = t.num_children_at_home" & _
         " AND [Member Card RDBMS].[marital status] = t.marital_status AND" & _
         " [Member Card RDBMS].[yearly income] = t.yearly_income", cn
      rs.Move 4
      Debug.Print rs.Fields(1).Value
      rs.Close
      cn.Close
      Exit Sub
      
    ErrH:
      MsgBox CStr(Err.Number) & vbCrLf & Err.Description, vbOKOnly + vbInformation, "Error"
      Err.Clear
      Resume Next
    End Sub
    					
  4. ????? ?????? Visual Basic.

???????

???? ???????: 296905 - ????? ??? ??????: 04/???? ??????/1435 - ??????: 1.2
????? ???
  • Microsoft SQL Server 2000 Analysis Services
????? ??????: 
kbnosurvey kbarchive kbmt kbbug kbfix kbsqlserv2000sp1fix kbssas800sp1fix KB296905 KbMtar
????? ????
???: ??? ????? ??? ?????? ???????? ?????? ????? ???? ????? ?????????? ????? ?? ????????? ?????? ????. ???? ???? ?????????? ???? ?? ???????? ???????? ?????? ????????? ????? ????????? ???????? ????? ???????? ?????? ?? ?????? ??? ?? ???????? ???????? ?? ????? ??????? ?????? ??? ??????? ?????? ??. ?????? ?? ???? ??? ??????? ???????? ????? ?? ???? ????? ?????? ??? ????? ??? ????? ??????? ?? ????? ?? ?????? ??? ??? ??????? ??????? ?? ????? ????? ????? ????? ?????. ?? ????? ???? ?????????? ??????? ??? ????? ?? ??????? ?? ????? ?????? ?? ??? ????? ?? ????? ??????? ?? ???????? ?? ??? ???????. ???? ???? ?????????? ???????? ??? ????? ?????? ??????? ??????
???? ??? ????? ??????? ?????? ??????????296905

????? ???????

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com