Announcement

Collapse
No announcement yet.

Problem beim Rocordset laden

Collapse
X
  • Filter
  • Time
  • Show
Clear All
new posts

  • Problem beim Rocordset laden

    Hallo Leute ich habe eine Frage.
    Ich habe 2 Recordsets.
    Den ersten Recordset kann ich laden.
    Den zweiten kann ich nicht laden.

    CODE:
    Public Function loadRecordset()

    Dim m_rs As Recordset
    Dim m_rD As Recordset

    On Error Resume Next

    Set m_rs = p_SQLDB.OpenRecordset("SELECT SysTables.* FROM SysTables WHERE Prefix = 'Main' OR Prefix = 'Tbl' OR Prefix = 'sql'", dbOpenForwardOnly, dbSQLPassThrough)
    If Not m_rs.EOF Then
    Do Until m_rs.EOF
    Debug.Print m_rs!FullName

    Set m_rD = p_SQLDB.OpenRecordset("SELECT [name] FROM [sys].[views] WHERE name like 'Tbl" & m_rs!FullName & "%'", dbOpenForwardOnly, dbSQLPassThrough)
    If Not m_rD.EOF Then
    Do Until m_rD.EOF
    Debug.Print m_rD!Name
    m_rD.MoveNext
    Loop
    End If
    m_rD.Close
    Loop
    End If
    m_rs.Close
    End Function

  • #2
    Was passiert? Fehlermeldung?

    Comment


    • #3
      das zweite recordset ist immer nothing,
      aber wenn ich den select statement auf dem SQL-Sever ausführe bekomme ich daten
      select statement: z.B
      SELECT [name] FROM [sys].[views] WHERE name like 'TblPerson%'
      Zuletzt editiert von suren16; 20.11.2009, 16:37.

      Comment


      • #4
        Lass Dir mal das 2te Sql Statement ausgeben, wie das aussieht.
        Es reicht ja schon, dass das Feld "FullName" vom Typ char ist und Du massig hängende Leerzeichen hast, schon bekommst Du kein Ergebnis.
        Olaf Helper

        <Blog> <Xing>
        * cogito ergo sum * errare humanum est * quote erat demonstrandum *
        Wenn ich denke, ist das ein Fehler und das beweise ich täglich

        Comment


        • #5
          Ich hab das 2te SQL Statement schon mal ausgegeben.
          und diesen auf dem SQL Sever ausgeführt und was bekommen.

          Comment

          Working...
          X