Het gebruik van ADO met Visual Basic

Artikel ID: 172403 - Bekijk de producten waarop dit artikel van toepassing is.
Automatische vertalingLET OP: Dit artikel is automatisch vertaald. Meer informatie treft u aan de onderzijde van dit artikel.
Voor een Microsoft Visual Basic.NETTO-versie van dit artikel, raadpleegt u308656
(http://support.microsoft.com/kb/308656/EN-US/ )
.
Alles uitklappen | Alles samenvouwen

Op deze pagina

Samenvatting

Adovb.exe is een zelfuitpakkend gecomprimeerd bestand met voorbeeld code geeft aan hoe u ActiveX Data Objects (ADO) binnen Visual Basic.
Naar boven | Geef ons feedback

Meer informatie

Het volgende bestand wordt gedownload vanaf het Microsoft Download Center:
http://download.Microsoft.com/download/vb60pro/demo/1/Win98/en-us/AdoVB.exe
(http://download.microsoft.com/download/vb60pro/demo/1/WIN98/EN-US/AdoVB.EXE)
Voor meer informatie over het downloaden van Microsoft-ondersteuningsbestanden, klikt u op het volgende artikelnummer in de Microsoft Knowledge Base:
119591
(http://support.microsoft.com/kb/119591/EN-US/ )
Hoe Microsoft-ondersteuningsbestanden via Online Services downloaden
Microsoft heeft dit bestand op virussen. Microsoft gebruikt de meest actuele software voor virusdetectie die beschikbaar was op de datum waarop het bestand werd gepost. Het bestand is opgeslagen op beveiligde servers die onbevoegde wijzigingen aan het bestand verhinderen.
Deze tabel samenvouwenDeze tabel uitklappen
Bestands naamGrootteDatum
AdoDemo.mdb332 KB28-7-97
AdoVB18 KB5-8-97
AdoVB.vbp1 KB5-8-97
AdoVbEx6 KB28-7-97

Adovb toont

Adovb toont een correct gebruik van retour- en uitvoer parameters (voor SQL Server), en een record set parameters voor een Microsoft Access- en SQL Server-gegevensbronnen openen. Het is tevens opgenomen een algemene sjabloon voor fout afhandeling met ADO-code:
   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
OPMERKINGEN:
  • Als u ADOVB met ADO 2. 0 of hoger, moet u Verwijder de verwijzing naar de Microsoft OLE DB ActiveX-gegevens objecten 1,0 en een verwijzing instellen naar de nieuwste versie van Microsoft ActiveX Data Objects beschikbaar.
  • Wanneer u ADO 2. 0 of later, verwijzende verloopt van ADO Field-object geeft de volgende fout als van de ADO-Recordset LockType alleen-lezen is:
    Run time fout '3251': De bewerking door de toepassing wordt niet ondersteund door de provider.
    Om te voorkomen dat deze fout in ADOVB, commentaar of verwijderen van de volgende regel code in de Click-gebeurtenisprocedure voor cmdAccess van het code venster voor frmADOVB:
    List1.AddItem vbTab & "OriginalValue= " & rs1.Fields(i).OriginalValue
Naar boven | Geef ons feedback

Referenties

Over de reeks ADO * monsters

Dit is een van meerdere identieke monsters geïmplementeerd met behulp van ADO binnen diverse producten, zoals hieronder weer gegeven. Het voordeel is dat deze artikelen een identieke interface/functionaliteit, waaruit blijkt dat zowel de overeenkomsten en verschillen in het gebruik van ADO in verschillende talen / mechanismen:
172403
(http://support.microsoft.com/kb/172403/EN-US/ )
BESTAND: Adovb.exe laat zien hoe het gebruik van ADO met Visual Basic
220152
(http://support.microsoft.com/kb/220152/EN-US/ )
Voorbeeld: ADOVC1 Simple ADO / VC + + toepassing
185033
(http://support.microsoft.com/kb/185033/EN-US/ )
BESTAND: Adoacc.exe toont ADO gebruiken met Access 97
Naar boven | Geef ons feedback

Eigenschappen

Artikel ID: 172403 - Laatste beoordeling: vrijdag 25 februari 2011 - Wijziging: 2.0
De informatie in dit artikel is van toepassing op:
  • Microsoft ActiveX Data Objects 2.7
  • Microsoft Visual Basic 5.0 Professional Edition
  • Microsoft Visual Basic 6.0 Professional Edition
Trefwoorden: 
kbdownload kbcode kbdatabase kbfile kbinfo kbsample kbstoredproc kbmt KB172403 KbMtnl
Automatische vertaling
BELANGRIJK: Dit artikel is vertaald door de vertaalmachine software van Microsoft in plaats van door een professionele vertaler. Microsoft biedt u professioneel vertaalde artikelen en artikelen vertaald door de vertaalmachine, zodat u toegang heeft tot al onze knowledge base artikelen in uw eigen taal. Artikelen vertaald door de vertaalmachine zijn niet altijd perfect vertaald. Deze artikelen kunnen fouten bevatten in de vocabulaire, zinsopbouw en grammatica en kunnen lijken op hoe een anderstalige de taal spreekt en schrijft. Microsoft is niet verantwoordelijk voor onnauwkeurigheden, fouten en schade ontstaan door een incorrecte vertaling van de content of het gebruik ervan door onze klanten. Microsoft past continue de kwaliteit van de vertaalmachine software aan door deze te updaten.
De Engelstalige versie van dit artikel is de volgende:172403
(http://support.microsoft.com/kb/172403/en-us/ )
Naar boven | Geef ons feedback

Geef ons feedback

 
Naar bovenNaar boven