Verwendung von ADO mit Visual Basic

SPRACHE AUSWÄHLEN SPRACHE AUSWÄHLEN
Artikel-ID: 172403 - Produkte anzeigen, auf die sich dieser Artikel bezieht
Eine Microsoft Visual Basic .NET Version dieses Artikels finden Sie unter 308656.
Alles erweitern | Alles schließen

Auf dieser Seite

Zusammenfassung

Adovb.exe ist eine selbstextrahierende komprimierte Datei, die mit Beispielcode, das den mit ActiveX Data Objects (ADO) in Visual Basic veranschaulicht.

Weitere Informationen

Die folgende Datei steht im Microsoft Download Center zum Download zur Verfügung:
http://download.microsoft.com/download/vb60pro/demo/1/WIN98/EN-US/AdoVB.EXE
Weitere Informationen zum Download von Microsoft Support-Dateien finden Sie in folgendem Artikel der Microsoft Knowledge Base:
119591So erhalten Sie Dateien vom Microsoft Support im Internet
Microsoft hat diese Datei auf Viren überprüft. Microsoft hat dazu die neueste Software zur Virenerkennung verwendet, die zum Zeitpunkt der Bereitstellung verfügbar war. Die Datei befindet sich auf Servern mit verstärkter Sicherheit, wodurch nicht autorisierte Änderungen an der Datei weitestgehend verhindert werden.
Tabelle minimierenTabelle vergrößern
DateinameGrößeDatum
AdoDemo.mdb332 KB7/28/97
AdoVB18 KB8, 5/97
AdoVB.vbp1 KB8, 5/97
AdoVbEx6 KB7/28/97

Welche Adovb demonstriert

Adovb veranschaulicht ordnungsgemäße Verwendung der Ausgabe und Rückgabeparameter (für SQLServer) und ein parametrisiertes Recordset für eine Microsoft Access und SQL Server-Datenquellen öffnen. Ebenfalls enthalten ist eine generische Vorlage für die Fehlerbehandlung mit 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
				
NOTES:
  • Wenn ADOVB mit ADO 2.0 oder höher verwenden, sollten Sie entfernen den Verweis auf Microsoft OLE DB ActiveX Data Objects 1.0 und festlegen ein Verweises auf die neueste Version von Microsoft ActiveX Data Objects verfügbar.
  • Wenn ADO 2.0 oder höher, auf die OriginalValue-Eigenschaft eines ADO Field-Objekts verweisen erhalten den folgenden Fehler, wenn LockType eines ADO-Recordset schreibgeschützt ist:
    Laufzeitfehler '3251': der von der Anwendung angeforderte Vorgang wird vom Anbieter nicht unterstützt.
    Um diesen Fehler in ADOVB zu vermeiden, entfernen oder die folgende Codezeile in der Click-Ereignisprozedur für die CmdAccess in das Codefenster für FrmADOVB:
    List1.AddItem vbTab & "OriginalValue= " & rs1.Fields(i).OriginalValue
    					

Informationsquellen

Über die ADO 1-Serie der Beispiele

Dies ist eine mehrere identische Beispiele, die mithilfe von ADO in verschiedenen Produkten implementiert, wie unten aufgeführt. Der Vorteil ist, dass dieser Artikel eine demonstrieren sowohl die Ähnlichkeiten und Unterschiede in verschiedenen Sprachen mit ADO identische Schnittstelle/Funktionalität, / Mechanismen:
172403Datei: Adovb.exe demonstriert die Verwendung ADO mit Visual Basic
220152Beispiel: ADOVC1 Simple ADO / VC++-Anwendungen
185033Datei: Adoacc.exe demonstriert die Verwendung von ADO mit Access 97

Eigenschaften

Artikel-ID: 172403 - Geändert am: Mittwoch, 2. März 2005 - Version: 3.4
Die Informationen in diesem Artikel beziehen sich auf:
  • 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
Keywords: 
kbmt kbdownload kbcode kbdatabase kbfile kbinfo kbsample kbstoredproc KB172403 KbMtde
Maschinell übersetzter Artikel
Wichtig: Dieser Artikel wurde maschinell und nicht von einem Menschen übersetzt. Die Microsoft Knowledge Base ist sehr umfangreich und ihre Inhalte werden ständig ergänzt beziehungsweise überarbeitet. Um Ihnen dennoch alle Inhalte auf Deutsch anbieten zu können, werden viele Artikel nicht von Menschen, sondern von Übersetzungsprogrammen übersetzt, die kontinuierlich optimiert werden. Doch noch sind maschinell übersetzte Texte in der Regel nicht perfekt, insbesondere hinsichtlich Grammatik und des Einsatzes von Fremdwörtern sowie Fachbegriffen. Microsoft übernimmt keine Gewähr für die sprachliche Qualität oder die technische Richtigkeit der Übersetzungen und ist nicht für Probleme haftbar, die direkt oder indirekt durch Übersetzungsfehler oder die Verwendung der übersetzten Inhalte durch Kunden entstehen könnten.
Den englischen Originalartikel können Sie über folgenden Link abrufen: 172403
Microsoft stellt Ihnen die in der Knowledge Base angebotenen Artikel und Informationen als Service-Leistung zur Verfügung. Microsoft übernimmt keinerlei Gewährleistung dafür, dass die angebotenen Artikel und Informationen auch in Ihrer Einsatzumgebung die erwünschten Ergebnisse erzielen. Die Entscheidung darüber, ob und in welcher Form Sie die angebotenen Artikel und Informationen nutzen, liegt daher allein bei Ihnen. Mit Ausnahme der gesetzlichen Haftung für Vorsatz ist jede Haftung von Microsoft im Zusammenhang mit Ihrer Nutzung dieser Artikel oder Informationen ausgeschlossen.

Ihr Feedback an uns

 

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