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

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

?? ????? ??

??????

Adovb.exe ????? ??? ?? ActiveX ???? ???????? (ADO) ??? Visual Basic ?? ????? ???? ?? ??? ???? ????????? ???? ?? ?? ???? self-extracting ??????? ???? ???

???? ???????

????? ????? Microsoft ??????? ?????? ?? ??????? ?? ??? ?????? ??::
HTTP://download.Microsoft.com/download/vb60pro/demo/1/WIN98/EN-US/AdoVB.EXE
Microsoft ?????? ??????? ?? ???? ??????? ???? ?? ???? ??? ???? ????? ?? ???, ????? ???? ?????? ?? ????? ?? ???? ?? Microsoft ???????? ??? ?????::
119591?????? ?????? ?? Microsoft ?????? ??????? ???? ??????? ????
Microsoft ????? ?? ??? ?? ????? ?? ????? ?? ??? Microsoft ?? ?? ?????? ?? ?????? ???? ??????? ?????-??? ?????????? ?? ????? ???? ?? ????? ????? ?? ?? ??.. ????? ?? ?? ???????-??????????? ????? ?? ???????? ???? ??? ?? ?? ????? ??? ???? ?? ??????? ???????? ?? ????? ??? ??? ???? ??..
?? ?????? ?? ??????? ?????? ?????? ?? ??????? ????
FileName??????????
AdoDemo.mdb332 KB7/28/97
AdoVB18 KB8/5/97
AdoVB.vbp1 KB8/5/97
AdoVbEx6 KB7/28/97

????????? ???? ?? ?? ???? Adovb ??

Adovb ????????? ???? ?? ?? ?????? (?? SQL Server) ????? ????????, ?? Microsoft Access ?? SQL ????? ??? ????? ???? ??????? ?? ??? ??? parameterized recordset ????? ?? ?????? ????? ????? 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
				
???:
  • ADO 2.0 ?? ??? ?? ????????? ?? ??? ADOVB ?? ????? ???? ???, ?? ?? ????? Microsoft OLE DB ActiveX ???? ???????? 1.0 ?? ??? ?????? ?? ???????, ?? Microsoft ActiveX ???? ???????? ?????? ?? ?????? ??????? ?? ??? ?? ?????? ??? ?????
  • ADO 2.0 ?? ??? ???, ??? ADO ????? ???????? ?? ??? OriginalValue ???????? ?? ????? ????? ??? ????? ?????? LockType ADO Recordset ?? ???? ???? ?? ??? ?? ???:
    '3251' ??-???? ??????: ??????? ?????? ????????? ?????? ?????? ?? ?? ???????? ??????? ???? ???
    ADOVB ??? ?? ?????? ?? ????, ???? ??????? ?? frmADOVB ?? ??? ??? ????? ??? cmdAccess ?? ??? ????? ???? ????? ????????? ???, ??? ?? ????? ?????? ?? ???????:
    List1.AddItem vbTab & "OriginalValue= " & rs1.Fields(i).OriginalValue
    					

??????

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

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

???

???? ID: 172403 - ????? ???????: 02 ?????? 2010 - ??????: 4.0
???? ???? ???? ??:
  • Microsoft ActiveX Data Objects 2.7
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
??????: 
kbdownload kbcode kbdatabase kbfile kbinfo kbsample kbstoredproc kbmt KB172403 KbMthi
???? ?????? ????????
??????????: ?? ???? ?? ???? ??????? ?? ????? ?? Microsoft ????-?????? ?????????? ?????? ?????? ???? ??? ??. Microsoft ???? ??? ????-???????? ?? ????-???????? ????? ?????? ?? ???? ???????? ???? ?? ???? ????? ????? ??? ?? ??? ?????? ?? ???? ???? ???? ??? ????? ??. ???????, ????-???????? ???? ????? ???? ???? ???? ???. ?????, ????????, ?????-???? ?? ??????? ?? ???????? ?? ???? ???, ???? ?? ??? ?????? ???? ???? ??? ????? ??? ?? ???? ??. Microsoft ??????? ??? ???? ?? ?????? ?? ??????????, ????????? ?? ??? ?????? ?? ???? ????? ?? ???? ???????? ?? ??? ???? ????? ?? ??? ????????? ???? ??. Microsoft ????-?????? ?????????? ?? ????? ?????? ?? ?? ??? ??.
?????????? ?? ??????? ????????? ??????? ??: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