????? ??????? ADO ?? Visual Basic

?????? ????????? ?????? ?????????
???? ???????: 172403 - ??? ???????? ???? ????? ????? ??? ???????.
?????? ??? ????? Microsoft Visual Basic .NET ?? ??? ???????? ???? 308656.
????? ???? | ?? ????

?? ??? ??????

??????

Adovb.exe ?? ??? ????? ????? ????????? ???? ???? ????? ??? ????? ????????? ???????? ???? ???? ????? ??????? ?????? ?????? ActiveX "(ADO) ???? Visual Basic.

??????? ????

????? ????? ?????? ??????? ?? "???? ??????? ?? Microsoft":
http://download.microsoft.com/download/vb60pro/demo/1/WIN98/EN-US/AdoVB.EXE
?????? ??? ??????? ?????? ??? ????? ????? ????? ??? Microsoft "? ???? ??? ??? ??????? ?????? ?????? ??" ????? ??????? ?? Microsoft:
119591????? ?????? ??? ????? ??? Microsoft ?? ??????? ??? ????????
???? Microsoft ???? ??? ????? ????? ?? ?????????. ??????? Microsoft ???? ?? ?????? ??? ??????? ??????? ??? ??????? ???? ?? ??? ?????. ??? ????? ????? ??? ?????? ????? ?????? ???? ????? ??? ??? ????? ??? ??????? ??? ???? ??? ??? ?????.
?? ??? ??????????? ??? ??????
??? ?????????????
AdoDemo.mdb332 ????????28 7 97
AdoVB???????? 185 8 97
AdoVB.vbp1 ???? ????5 8 97
AdoVbEx6 ???? ????28 7 97

Adovb ????

???? Adovb ??????? ???????? ??????? ?????? ??????? (?? SQL Server) ?? ??? ?????? ????? ??? ?????? ?????? ???????? ?? Microsoft Access ? SQL Server. ????? ????? ????? ?? ???? ???? ?? ??? ?? ?????? ?? ??? ADO:
   Private Sub cmdTemplate_Click()
      Dim Conn1 As adodb.Connection

      On Error GoTo VbError   ' Trap (non-ADO) error/exceptions

      ' Create Connection Object (using early binding)
      Set Conn1 = new ADODB.Connection

      On Error GoTo AdoError  ' Trap any error/exception

      Conn1.ConnectionString = AccessConnect
      Conn1.Open

      '----------------------
      ' YOUR CODE GOES HERE!
      '----------------------

      ' Successful Shutdown
      Conn1.Close

   Done:
      ' Miscellaneous (graceful) Cleanup
      On Error Resume Next

      Set Conn1 = Nothing

      Exit Sub

   ' ADO Error/Exception Handler
   AdoError:
      ' Save Error Information!
      ErrNumber = Err.Number
      ErrSource = Err.Source
      ErrDescription = Err.Description

      AdoErrorEx List1, Conn1

   ' Non-ADO Native error/exception handler
   VbError:
      VbErrorEx List1, ErrNumber, ErrSource, ErrDescription
      GoTo Done

   End Sub
				
?????????:
  • ??? ??????? ADOVB ?? ADO 2.0 ?? ??????? ??????, ???? ??? ????? ?????? ??? Microsoft OLE DB ActiveX ?????? ?????? 1.0 ?????? ???? ??? ???? ????? ?? ?????? ?????? ActiveX Microsoft ????????.
  • ??? ??????? ADO 2.0 ?? ???? ??? ?????? ??? ????? OriginalValue ???? ADO ??? ????? ????? ?????? ??? ??? LockType ?????? ??????? ADO ??????? ???:
    ??? ??? ??????? '3251': ??????? ???????? ?? ??? ??????? ??? ????? ?? ??? ??????.
    ????? ??? ????? ?? ADOVB ??????? ?????? ?? ????? ????? ?????? ?? ????????? ????????? ?? ????? ????? Click cmdAccess ?? ???? ????????? ???????? frmADOVB:
    List1.AddItem vbTab & "OriginalValue= " & rs1.Fields(i).OriginalValue
    					

?????

??? ????? ADO * ?????

??? ??? ??? ????? ??????? ????? ???????? ADO ???? ???????? ???????? ??? ?? ???? ?????. ?????? ????? ??? ???????? ??? ??????? ?????/???????? demonstrating ???? ????? ????? ???????? ???????? ADO ?? ???? ?????? / ?????:
172403FILE: Adovb.exe ???? ????? ??????? ADO ?? Visual Basic
220152ADO ????? ADOVC1 ?????: / VC ++ ???????
185033?????: ??????? ADO ?? Access 97 ???? Adoacc.exe

???????

???? ???????: 172403 - ????? ??? ??????: 21/????/1426 - ??????: 3.4
????? ???
  • Microsoft ActiveX Data Objects 1.5
  • Microsoft ActiveX Data Objects 2.0
  • Microsoft ActiveX Data Objects 2.1 Service Pack 2
  • Microsoft ActiveX Data Objects 2.5
  • Microsoft ActiveX Data Objects 2.6
  • Microsoft ActiveX Data Objects 2.7
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
????? ??????: 
kbmt kbdownload kbcode kbdatabase kbfile kbinfo kbsample kbstoredproc KB172403 KbMtar
????? ????
???: ??? ????? ??? ?????? ???????? ?????? ????? ???? ????? ?????????? ????? ?? ????????? ?????? ????. ???? ???? ?????????? ???? ?? ???????? ???????? ?????? ????????? ????? ????????? ???????? ????? ???????? ?????? ?? ?????? ??? ?? ???????? ???????? ?? ????? ??????? ?????? ??? ??????? ?????? ??. ?????? ?? ???? ??? ??????? ???????? ????? ?? ???? ????? ?????? ??? ????? ??? ????? ??????? ?? ????? ?? ?????? ??? ??? ??????? ??????? ?? ????? ????? ????? ????? ?????. ?? ????? ???? ?????????? ??????? ??? ????? ?? ??????? ?? ????? ?????? ?? ??? ????? ?? ????? ??????? ?? ???????? ?? ??? ???????. ???? ???? ?????????? ???????? ??? ????? ?????? ??????? ??????
???? ??? ????? ??????? ?????? ??????????172403

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

 

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