FIX: ??? ADO ????? ??? ????? ??? ????? ???????? Nonvariant

?????? ????????? ?????? ?????????
???? ???????: 274423 - ??? ???????? ???? ????? ????? ??? ???????.
??? ????? ??? ???????. ????? "??? ??" ??? ??? ??????? ??? ????.
????? ???? | ?? ????

?? ??? ??????

???????

????? ???? ?? ????? ??? ?????? ?????? ??? ????? ???????? nonvariant ? ?? ??? ?????? ?????? ActiveX (ADO) ??????? ???? ????? ?????? ?????? ??????? ??? ????????? ????? ????? ?????? ?????? ???.

???? ??? ??????? ?? Microsoft Data Access Components (MDAC) ??????? 2.50.4403.12 (Microsoft Windows 2000/MDAC 2.5 RTM) ? 2.51.5303.5 (Windows 2000/MDAC 2.5 ?????? ????? ?????? SP1). ?? ???? ??? ??????? ?? ????? MDAC 2.60.6526.3 (MDAC 2.6 RTM).

?????

???? ??? ????? ?????? ???? ???????? ??? ?? ??? ??? ????? ??????? ?? ????? ???????? ?????. ??? ?????? ??????? ????????? ?? ???? ???? ????? ????? ?? ?????? ??? ????? ??????? ???. ?? ??? ????? ??? ?????? nonvariants ?? ??? ????? ??????? ?????.

????

??? ??? ??????? ??? ?????? ??? ???? ???? ???? ?? Microsoft ?????? Access Components 2.5. ?????? ??? ??????? ??????? ???? ??? ??? ??????? ?????? ?????? ?? "????? ??????? ?? Microsoft:
293312INFO: ????? ?????? ??? ???? MDAC 2.5 ???? ???????
????? ????? ????? ?????????? ?? ??? ???? ????? (?? ??????) ???????? ?? ?????? ??????. ??? ??? ???????? ???????? ?????? ???? ??????? ???????? ??????? coordinated (UTC). ????? ???? ???? ??????? ?????? ??? ??????? ??? ??????? ??????. ?????? ????? ??? ??????? ??????? (UTC) ???????? ??????? ?????? ????? ??????? ??????? ??????? ?? ???? ??????? ?????? ?? "???? ??????".
   Date       Version        Size             File name
   ----------------------------------------------------------
   8/29/2000  2.51.5629.0     20,480 bytes    Msader15.dll
   8/29/2000  2.51.5629.0    487,696 bytes    Msado15.dll
   8/29/2000  2.51.5629.0    172,304 bytes    Msadomd.dll
   8/29/2000  2.51.5629.0     57,616 bytes    Msador15.dll
   8/29/2000  2.51.5629.0    184,592 bytes    Msadox.dll
   8/29/2000  2.51.5629.0     57,616 bytes    Msadrh15.dll
   8/29/2000  2.51.5629.0     94,480 bytes    Msjro.dll
				

???? ??????

?? ???? ?? ?? ???? ???? ???????.

?????

???? Microsoft ?? ??? ????? ?? ?????? Microsoft ??????? ?? ????? ??? ???????. ?? ????? ??? ??????? ???? ??? ?? Microsoft ?????? Access ?????? 2.5 ?????? ????? ?????? Service Pack 2.

??????? ????

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

  1. ?? ???? ???????? ???????? ??????? ??? ????? Visual Basic:

    ????????? ????? UID <username>?????? ?? ?? PWD = < ???? ?????? ?????? > ???? ??? ????? ??????? ??? ????? ??? ????????? ????????. ???? ?? ?? UID ???? ???????? ???????? ?????? ??? ??????? ??? ????? ????????.
    Dim cn As ADODB.Connection, cnOtherUser As ADODB.Connection
    Dim rs As ADODB.Recordset, rsOtherUser As ADODB.Recordset
    Dim strConn As String, strSQL As String
    Dim varData As Variant, intData As Integer
    
    strConn = "Provider=MSDASQL;Driver={SQL Server};Server=YourServer;Database=Northwind;UID=<user name>;PWD=<strong password>;"
    strSQL = "SELECT * FROM Customers"
    
    Set cnOtherUser = New ADODB.Connection
    cnOtherUser.Open strConn
    Set rsOtherUser = New ADODB.Recordset
    rsOtherUser.Open strSQL, cnOtherUser, adOpenKeyset, adLockPessimistic, adCmdText
    rsOtherUser.MoveFirst
    
    Set cn = New ADODB.Connection
    cn.Open strConn
    cn.CommandTimeout = 10
    Set rs = New ADODB.Recordset
    rs.Open strSQL, cn, adOpenKeyset, adLockPessimistic, adCmdText
    If MsgBox("Use Variant?", vbYesNo) = vbYes Then
        On Error Resume Next
        varData = rs(0)
        If Err.Number <> 0 Then
            MsgBox Err.Description
            Err.Clear
            cn.Errors.Clear
        Else
            MsgBox "No error!"
        End If
        On Error GoTo 0
    Else
        On Error Resume Next
        intData = rs(0)
        If Err.Number <> 0 Then
            MsgBox Err.Description
            Err.Clear
            cn.Errors.Clear
        Else
            MsgBox "No error!"
        End If
        On Error GoTo 0
    End If
    rs.Close
    cn.Close
    
    rsOtherUser.Close
    cnOtherUser.Close
    					
  2. ????? ???? ??? 2.5 ?????? ?????? ActiveX Microsoft ?????.
  3. ????????? ???????? ?? ???? ??? ????? ????? ??? ??????? ?????. ???? ??? ??? '?????? ??????' ????? ????? ???? ??? ????? ??? ??????? ?? ????? ????? ??????.
  4. ????? ????????? ???????? ??? ???? ??????? ??? ????? ?? ????? ????? ??? ??????? ?????. ??? ????? ??? ????? ??? ???? ??? ?? ???? ??? ???? ???? ???? ???? ????? ????? ?????? ?????? ??.

?????

?????? ??? ??????? ??????? ???? ??? ???? ????????? ????????? ??????? ?? "????? ??????? ?? Microsoft:
247757FIX: ??????? ?????? ??????? ?? ADO ???? ?????
264442FIX: ?????? ??????? ADO ???? ????? ??????? ??? ??????? ??????? ?? ?????
264701FIX: ????? ByRef ?????? ??????? ADO ????? ????? ??????? ?????

???????

???? ???????: 274423 - ????? ??? ??????: 28/???? ??????/1435 - ??????: 2.2
????? ???
  • Microsoft ActiveX Data Objects 2.5
  • Microsoft Data Access Components 2.5
  • Microsoft Data Access Components 2.5 Service Pack 1
????? ??????: 
kbnosurvey kbarchive kbmt kbhotfixserver kbqfe kbado250fix kbbug kbfix kbmdac250fix kbqfe KB274423 KbMtar
????? ????
???: ??? ????? ??? ?????? ???????? ?????? ????? ???? ????? ?????????? ????? ?? ????????? ?????? ????. ???? ???? ?????????? ???? ?? ???????? ???????? ?????? ????????? ????? ????????? ???????? ????? ???????? ?????? ?? ?????? ??? ?? ???????? ???????? ?? ????? ??????? ?????? ??? ??????? ?????? ??. ?????? ?? ???? ??? ??????? ???????? ????? ?? ???? ????? ?????? ??? ????? ??? ????? ??????? ?? ????? ?? ?????? ??? ??? ??????? ??????? ?? ????? ????? ????? ????? ?????. ?? ????? ???? ?????????? ??????? ??? ????? ?? ??????? ?? ????? ?????? ?? ??? ????? ?? ????? ??????? ?? ???????? ?? ??? ???????. ???? ???? ?????????? ???????? ??? ????? ?????? ??????? ??????
???? ??? ????? ??????? ?????? ??????????274423

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

 

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