Foutbericht 'Typen komen niet overeen' bij het uitvoeren van de methode OpenRecordset

BELANGRIJK: Dit artikel is vertaald door middel van automatische vertalingssoftware van Microsoft en is mogelijk nabewerkt door de Microsoft Community via CTF-technologie (Community Translation Framework) of door een menselijke vertaler. Microsoft biedt zowel automatisch vertaalde, door mensen vertaalde en door de community nabewerkte artikelen aan, zodat er in meerdere talen toegang is tot alle artikelen in onze Knowledge Base. Een vertaald of bewerkt artikel kan fouten bevatten in vocabulaire, syntaxis of grammatica.. Microsoft is niet verantwoordelijk voor eventuele onjuistheden, fouten of schade ten gevolge van een foute vertaling van de inhoud van een bericht of het gebruik van deze vertaalde berichten door onze klanten.

De Engelstalige versie van dit artikel is de volgende: 181542
Symptomen
Als u een object als een Recordset dimensie en stel vervolgens dat object todatabaseobject. OpenRecordset(source), verschijnt de volgende foutmelding:
Fout '13' tijdens uitvoering: Typen komen niet met elkaar overeen
Oorzaak
Als uw project verwijzingen naar de Data Access Objects (DAO)-bibliotheek zowel de ActiveX Data Objects (ADO)-bibliotheek bevat, ziet u mogelijk een multipleRecordset posten in de lijst wanneer u het Recordset -object dimension. Deze fout treedt op wanneer u de ADO-bibliotheek met een hogere prioriteit betaalt DAO-objectbibliotheek in het dialoogvenster verwijzingen , ongeacht welke Recordsetentry u in de lijst selecteren.
Oplossing
Zorg dat de verwijzing naar de DAO-objectbibliotheek heeft een hogere prioriteit in het dialoogvenster verwijzingen als u alleen de DAO- Recordset -object, of schakelt u de verwijzing naar het Microsoft ActiveX Data Objects.

Als u moet verwijzen naar DAO- en ADO- Recordset -objecten, dimension-objecten expliciet als volgt:
   Dim adoRS As ADODB.Recordset   Dim daoRS As DAO.Recordset				
Meer informatie

Stappen om het gedrag te reproduceren

  1. Start Visual Studio. Het dialoogvenster Nieuw Project wordt weergegeven.
  2. Klik op openen. Formulier1 wordt weergegeven.
  3. Klik met de rechtermuisknop op het formulier Form1 en klik vervolgens op Programmacode weergeven. De Project1 - Form1 (Code) venster verschijnt.
  4. Plak de volgende code in de codetabel Project1:
    Dim dbs AS DatabaseDim rs AS Recordset  ' When you press the spacebar after "AS," the                           ' list box includes multiple Recordset entries.                           ' Pick any Recordset item, or type "Recordset."Private Sub Form_Load()Set dbs=OpenDatabase(dbname)Set rs=dbs.OpenRecordset(source)  ' The error occurs when this line                                        ' of code executes.End Sub
  5. Klik op verwijzingenin het menu Project . Het dialoogvenster verwijzingen - Project1 wordt weergegeven.
  6. Klik op Microsoft DAO-objectbibliotheek 3.x, klikt u op Microsoft ActiveX Data Objects 2.x bibliotheek, en klik vervolgens op OK.

    Opmerking Zorg dat de ADO-bibliotheek heeft de hoogste prioriteit in de lijst van het dialoogvenster verwijzingen boven de DAO-bibliotheek.
  7. Klik op Start om het programma uitvoeren in het menu uitvoeren . Verschijnt het foutbericht dat wordt vermeld in de sectie 'Symptomen'.
OpenRecordset DAO incompatibel tijd fout 13 uitvoeren

Waarschuwing: dit artikel is automatisch vertaald

Savybės

Straipsnio ID: 181542 – Paskutinė peržiūra: 06/11/2016 21:11:00 – Peržiūra: 3.0

Microsoft Visual Basic 5.0 Enterprise Edition, Microsoft ActiveX Data Objects 2.7, Microsoft Visual Basic 5.0 Learning Edition, Microsoft Visual Basic 5.0 Professional Edition, Microsoft Visual Basic 6.0 Professional Edition, Microsoft Access 2000 Standard Edition

  • kbprb kbmt KB181542 KbMtnl
Atsiliepimai