Kann auf Feld im Recordset nicht zugreifen

[TomTom2903]

Hallo Zusammen,
ich möchte auf ein paar Felder im Recordset zugreifen. Das funktioniert auch gut, mal abgesehen von zwei Feldern.
Ich habe hier bereits die Namen der Felder ausgelesen die Felder direkt angesprochen. Allerdingsfunktioniert es nicht und ich komm momentan auch nicht weiter.
Hat jmd von euch eine Idee?!
Besonderheit ist evtl. das ich auf eine View im SQL-Server zugreife?!

Code (vb) [Auswählen] Erweitern


Public Function DatensatzHinzufuegen(PA_TeileNr As String, SortID As Integer)
    Dim db As DAO.Database
    Dim dbfill As DAO.Database
    Dim rst As Recordset2
    Dim fillrst As Recordset2
       
       
    Set db = CurrentDb
    Set rst = db.OpenRecordset("tbl_Sortiment_Artikel", dbOpenDynaset)
    Set fillrst = db.OpenRecordset("select PT_ArtName, PT_Size From dbo_view_PT_XML_Main_Exp_MySQL_1 " _
                            & "where [PA_TeileNr] like " & PA_TeileNr & " and PT_Sprache like 'DE' ")
   
    Debug.Print fillrst!PT_Sprache  'PT Sprache ist Feld 13  nach i = 0!
    Debug.Print fillrst.Fields(13)      '[font=Verdana]Hier Treten Fehler 3265 auf[/font]
   
    Stop
    With rst
        .AddNew
        !KndID = SortID
        !ArtikelID = PA_TeileNr
        'Name = fillrst.PT_ArtName
        'Stop
        !Ausführung = fillrst.PT_Qualitaet '[font=Verdana]Hier Tritt Fehler 438 auf[/font]
        !Größe = fillrst.PT_Size
        .Update
    End With
    Set db = Nothing
    Set rst = Nothing
    Set fillrst = Nothing
   
    Debug.Print "Geschafft"
End Function

Die Fehlermeldung ist:
Laufzeitfehler 3265: Element in dieser Auflistung nicht gefunden!

oder
Laufzeitfehler 438: Objekt unterstützt diese Eigenschaft oder Methode nicht!

Danke schon Mal für jede Unterstützung!!!
Gruß
Tom

[DF6GL]

Hallo,

was nicht selektiert wird, auf das kann auch nicht zugegriffen werden:



Set fillrst = db.OpenRecordset("select PT_ArtName, PT_Size , PT_Sprache, PT_Qualitaet  From dbo_view_PT_XML_Main_Exp_MySQL_1 " _
                            & "where [PA_TeileNr] like " & PA_TeileNr & " and PT_Sprache like 'DE' ")

[TomTom2903]

Hallo Franz,
thx, bin mittlerweile auch auf den Fehler gekommen.
Vielen Dank!!!
Grüße
Tom