Problem bei einer SQL abfragw

  • VB6

    Problem bei einer SQL abfragw

    Hallo Leute,
    ich arbeite wieder mal an einem Neuen Projekt, und schon habe ich wieder ein Problemchen

    hier der Code


    Code:

    Quellcode

    1. Dim rs As New adodb.Recordset
    2. Username = "SELECT username FROM users WHERE username = '" & Username & "'"
    3. rs.Open Username, Mysql_Connection
    4. MySQL.Array_Query = rs.GetString
    5. getUsername = MySQL.Array_Query
    6. If EncodeName(LCase(getUsername)) = True Then
    7. Form1.SckClient(Socket).SendData "ok"
    8. Else
    9. Form1.SckClient(Socket).SendData "nicht ok"
    10. End If
    11. rs.Close

    der fehler ist : Run-Time error '3021':

    Entweder BOF oder EOF ist True, oder der Aktuelle Datensatz wurde gelöscht. Der angeforderte Vorgang benötigt einen aktuellen Datensatz.

    kann jemand weiter helfen?


    *Topic verschoben*

    Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von „Marcus Gräfe“ ()