[ACCES 2010|VB.NET] Provider kann nicht gefunden werden.

  • VB.NET
  • .NET (FX) 4.5–4.8

Es gibt 6 Antworten in diesem Thema. Der letzte Beitrag () ist von ErfinderDesRades.

    [ACCES 2010|VB.NET] Provider kann nicht gefunden werden.

    Hallo!

    Seit kurzem habe ich mich damit beschäftigt, ein Programm mit Database zu programmieren (Für die Datenbank nutze ich Acces 2010). Leider bekomme ich immer den Fehler
    'Der Provider kann nicht gefunden werden. Möglicherweise ist er nicht richtig installiert worden."
    Hier der Quellcode:
    (Fehler ist in Zeile 17-18)

    VB.NET-Quellcode

    1. Public Function Login()
    3. Dim DBConn As New ADODB.Connection
    5. Dim User As New ADODB.Recordset
    7. Dim Username As String
    9. Dim UserDB As String
    11. Dim passDB As String
    13. Dim UserFound As Boolean
    15. Dim loginerror As String
    17. DBConn.Open("Provider=Microsoft.ACE.OLEDB.12.0;" & _
    18. "Data Source = `" & Application.StartupPath & "\DLD.accdb")
    20. User.Open("UserTable", DBConn, ADODB.CursorTypeEnum.adOpenStatic, ADODB.LockTypeEnum.adLockOptimistic)
    22. UserFound = False
    23. Login = False
    24. Username = "Username = `" & txtUser.Text & "`"
    26. Do
    27. User.Find(Username)
    28. If User.BOF = False And User.EOF = False Then
    29. UserDB = User.Fields("Username").Value.ToString()
    30. passDB = User.Fields("Password").Value.ToString()
    32. If UserDB <> txtUser.Text Then
    33. User.MoveNext()
    34. Else
    35. UserFound = True
    36. If passDB = txtPass.Text Then
    37. User.Close()
    38. DBConn.Close()
    39. Return True
    40. Else
    41. loginerror = "Invalid Password"
    42. User.Close()
    43. DBConn.Close()
    44. Return False
    45. End If
    46. End If
    47. Else
    48. loginerror = "Invalid Username"
    49. User.Close()
    50. DBConn.Close()
    51. Return False
    53. End If
    55. Loop Until UserFound = True
    56. User.Close()
    57. DBConn.Close()
    58. Return False
    60. End Function


    Ich habe keine Ahnung, was den Fehler verursacht. Hoffentlich kann mir hier jemand helfen!

    MfG vich
    “If debugging is the process of removing software bugs, then programming must be the process of putting them in.”
    -Unbekannt

    HolySandvich schrieb:


    DBConn.Open("Provider=Microsoft.ACE.OLEDB.12.0;" & _
    "Data Source = `" & Application.StartupPath & "\DLD.accdb")


    Schau Dir mal die Zeichenfolge genau an. Dann wirst Du sehen, dass am Ende ein "`" fehlt.
    Versuche es mal so:

    Visual Basic-Quellcode

    1. DBConn.Open("Provider=Microsoft.ACE.OLEDB.12.0;" & _"Data Source = `" & Application.StartupPath & "\DLD.accdb") & "`"
    NB. Es ist doch schön, wenn man lesbare Namen vergibt. Siehe auch [VB.NET] Beispiele für guten und schlechten Code (Stil).

    üblicherweise rate ich davon ab, Datenbanken zu benutzen, bevor die Anwendung fertig ist.
    Weil so viele annere Dinge sind vorher zu bewältigen:
    vier Views-Videos
    Daten laden und speichern
    oder überhaupt Datenverarbeitungs-Vorraussetzungen

    Zu 70% schert das die Leuts einen Dreck, weil sie wollen Datenbank wursteln, und dass sie sich mit ihren Krepel-Ansätzen alles verbauen stört sie auch nicht, denn sie lernen es ja garnet erst kennen.

    Aber mit VS2013 dann nochmal mit Adodb.Recordsets einzusteigen ist doch bischen heftig.
    Gugge mindestens "Datenbank in 10 Minuten" oder wenn du meinen selbstgebastelten Tuts nicht traust: Forms over Data-Videos

    INOPIAE schrieb:

    HolySandvich schrieb:


    DBConn.Open("Provider=Microsoft.ACE.OLEDB.12.0;" & _
    "Data Source = `" & Application.StartupPath & "\DLD.accdb")


    Schau Dir mal die Zeichenfolge genau an. Dann wirst Du sehen, dass am Ende ein "`" fehlt.
    Versuche es mal so:

    Visual Basic-Quellcode

    1. DBConn.Open("Provider=Microsoft.ACE.OLEDB.12.0;" & _"Data Source = `" & Application.StartupPath & "\DLD.accdb") & "`"


    Sobald ich das "`" hinzufüge, bekomme ich den Fehler "end-of Anweisung erwartet".
    “If debugging is the process of removing software bugs, then programming must be the process of putting them in.”
    -Unbekannt

    ErfinderDesRades schrieb:

    der fehler ist so blöd - das sollteste selbst finden - ist übrigens schon bei INOPane fehlerhaft.

    Du magst sagen, solch post ist nicht hilfreich, aber isser vlt. doch, indem ich dir zutraue, das eiglich bereits selbst bewerkstelligen zu können.
    Sollte ich mich irren, frag einfach nochmal.


    OK, hab den Fehler jetzt auch erkannt und behoben. Das erklärt aber immernoch nicht die Sache mit dem Provider!
    “If debugging is the process of removing software bugs, then programming must be the process of putting them in.”
    -Unbekannt

    HolySandvich schrieb:

    'Der Provider kann nicht gefunden werden. Möglicherweise ist er nicht richtig installiert worden."
    Da gibts einen berühmten Bug mit Office.
    Hat iwas mit x64-Maschinen zu tun.
    Variiere mal deine Compilier-Optionen x64 - x86 - hat bei mir mal geholfen.
    Oder google mal "ace oledb x86"

Facebook
Telefonspende