Access Abfrage
2 Abfragen mit einem Button, Formular seperat von Datenbank (als Website) speichern...
Hallo Leute,
wie ihr sehen könnt habe ich mehrere Probleme mit Access . Fangen wir mal der Reihe nach an:
1. ich habe ein Textfeld und zwei Button mit dem einen suche ich nach der PC-ID und mit dem anderen nach dem User, nun möchte ich gerne beides in einem Button vereinen.
Bei "Ereignis.." habe ich folgenes am Beispiel des Buttons "User" eingetragen
Private Sub Befehl43_Click()
Me.Filter = "[User] Like '" & Me!suchen & "'"
Me.FilterOn = True
End Sub
Was muss ich ändern damit ich mit diesem Button auch nach der PC-ID suchen kann?
2. mein zweites Problem liegt daran das ich Formular (frontend) gerne mit nehmen möchte auf meinem Lappi. Die Datenbank soll sich weiterhin in unserem Hauptsitz befinden und ich möchte darauf über Internet (VPN) zugreifen... Oder kann man aus dem Formular eine Website machen??
Ich danke euch schonaml im voraus für eure Hilfe.
Gruß Thomas
Hallo Leute,
wie ihr sehen könnt habe ich mehrere Probleme mit Access . Fangen wir mal der Reihe nach an:
1. ich habe ein Textfeld und zwei Button mit dem einen suche ich nach der PC-ID und mit dem anderen nach dem User, nun möchte ich gerne beides in einem Button vereinen.
Bei "Ereignis.." habe ich folgenes am Beispiel des Buttons "User" eingetragen
Private Sub Befehl43_Click()
Me.Filter = "[User] Like '" & Me!suchen & "'"
Me.FilterOn = True
End Sub
Was muss ich ändern damit ich mit diesem Button auch nach der PC-ID suchen kann?
2. mein zweites Problem liegt daran das ich Formular (frontend) gerne mit nehmen möchte auf meinem Lappi. Die Datenbank soll sich weiterhin in unserem Hauptsitz befinden und ich möchte darauf über Internet (VPN) zugreifen... Oder kann man aus dem Formular eine Website machen??
Ich danke euch schonaml im voraus für eure Hilfe.
Gruß Thomas
Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 53559
Url: https://administrator.de/contentid/53559
Ausgedruckt am: 25.11.2024 um 06:11 Uhr
7 Kommentare
Neuester Kommentar
Wenn man einfach den Suchbegriff in beiden Feldern suchen will:
Private Sub Befehl43_Click()
Me.Filter = "[User] Like '" & Me!suchen & "' or [PCID] Like '" Me!Suchen & "'"
Me.FilterOn = True
End Sub
Falls ein Begriff in beiden vorkommt, findet man natürlich 2 Datensätze.
Für Punkt 2 würde ich eine richtige Datenbank nehmen (z.B. SQL Server). Bei Access wird alle Filterung und Verarbeitung auf dem Client gemacht, d.h. alle Daten müssen über die VPN Leitung. Seeeeehr performant (Gähn) bei langsamer Leitung.
Wie wäre es mit einer Kopie der Accessdatenbank? Dann halt nur zum Daten lesen.
Private Sub Befehl43_Click()
Me.Filter = "[User] Like '" & Me!suchen & "' or [PCID] Like '" Me!Suchen & "'"
Me.FilterOn = True
End Sub
Falls ein Begriff in beiden vorkommt, findet man natürlich 2 Datensätze.
Für Punkt 2 würde ich eine richtige Datenbank nehmen (z.B. SQL Server). Bei Access wird alle Filterung und Verarbeitung auf dem Client gemacht, d.h. alle Daten müssen über die VPN Leitung. Seeeeehr performant (Gähn) bei langsamer Leitung.
Wie wäre es mit einer Kopie der Accessdatenbank? Dann halt nur zum Daten lesen.
Ein Wildcard-Zeichen ist ein Zeichen, das für beliebige andere stehen kann.
In Access gibt es * und ?, wobei ein * beliebig viele beliebige Zeichen darstellt und ein ? ein einziges beliebiges Zeichen.
Will sagen:
Like 'A*s' findet As, A1s, Andreas, Anis etc.
Like 'A?s' findet nur A1s, Ads etc.
Und ich habe ein String Verkettungszeichen vergessen:
Also nicht:
Me.Filter = "[User] Like '" & Me!suchen & "' or [PC-ID] Like '" Me!Suchen & "'"
sondern
Me.Filter = "[User] Like '" & Me!suchen & "' or [PC-ID] Like '" & Me!Suchen & "'"
In Access gibt es * und ?, wobei ein * beliebig viele beliebige Zeichen darstellt und ein ? ein einziges beliebiges Zeichen.
Will sagen:
Like 'A*s' findet As, A1s, Andreas, Anis etc.
Like 'A?s' findet nur A1s, Ads etc.
Und ich habe ein String Verkettungszeichen vergessen:
Also nicht:
Me.Filter = "[User] Like '" & Me!suchen & "' or [PC-ID] Like '" Me!Suchen & "'"
sondern
Me.Filter = "[User] Like '" & Me!suchen & "' or [PC-ID] Like '" & Me!Suchen & "'"