Die Methode 'Open' für das Objekt '_Recordset' ist fehlgeschlagen

18/03/2009 - 08:22 von Andreas Ahrens | Report spam
Hi NG,

woran kann das liegen, dass der untere Code folgende Fehlermeldung erzeugt?

Laufzeitfehler -2147467259(80004005)
Die Methode 'Open' für das Objekt '_Recordset' ist fehlgeschlagen

Code:

Private Sub sFbriefErstellen_Click()
'Brief erstellen

'Datensatz speichern
'DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

Dim db As ADODB.Connection
Dim rs As ADODB.Recordset
Dim wo As Object
Dim ABF As String
Set db = CurrentProject.Connection
Set rs = New ADODB.Recordset
Set wo = CreateObject("Word.Application")
ABF = "A-Brief"

'Laufzeitfehler -2147467259(80004005)
'Die Methode 'Open' für das Objekt '_Recordset' ist fehlgeschlagen
rs.Open CurrentDb.QueryDefs(ABF).SQL, db, adOpenStatic, adLockReadOnly

rs.Filter = "BriefID = " & Me.BriefID

'MsgBox CStr(rs.Fields("Formularname"))

wo.Documents.Add
wo.Selection.TypeText CStr(rs.Fields("Betreff"))
wo.Selection.TypeText vbCrLf
wo.Selection.TypeText CStr(rs.Fields("Text"))
wo.Visible = True

End Sub

Gruß
Andy
 

Lesen sie die antworten

#1 Josef Poetzl
18/03/2009 - 09:11 | Warnen spam
Hallo!

Andreas Ahrens schrieb:
woran kann das liegen, dass der untere Code folgende Fehlermeldung erzeugt?


[...]
ABF = "A-Brief"

'Laufzeitfehler -2147467259(80004005)
'Die Methode 'Open' für das Objekt '_Recordset' ist fehlgeschlagen
rs.Open CurrentDb.QueryDefs(ABF).SQL, db, adOpenStatic, adLockReadOnly



Vielleicht passt die SQL-Anweisung nicht für das ADODB-Recordset.
(z. B. wegen direkten Formbezügen oder Nutzung von
Access/VBA-Funktionen.)
Warum verwendest du eigentlich ADODB?

rs.Filter = "BriefID = " & Me.BriefID



Und warum baust du das nicht direkt in die SQL-Anweisung von oben ein?

Prinzip:
dim rs as dao.recordset
set rs = currentdb.openrecordset( _
"select * from [A-Brief] where BriefID = " & Me!BriefID)


mfg
Josef

EPT: (Access Error Prevention Table) http://access.joposol.com/
FAQ: (Access-FAQ von Karl Donaubauer) http://www.donkarl.com/

Ähnliche fragen