Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Suchfeld Barcode
Gehe zu Seite 1, 2  Weiter
zurück: Formular eintrag (Datensatz) wieder löschen weiter: Formular kopieren Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
salmi
Access anfänger


Verfasst am:
03. Jan 2010, 15:27
Rufname: salmi

Suchfeld Barcode - Suchfeld Barcode

Nach oben
       Version: Office 2007

Hallo Leute,

ich habe hier im Forum gesucht aber nicht richtiges gefunden.

ich möchte gerne für mein kassensystem einen suchformular erstellen wo ich dann per Barcodescanner den code einlesen kann und anschließend der artikel gesucht wird und dann auf das aktuelle mitglied gebucht wird !

Kann mir bei diesem Problem wer heflen ?

Bitte für einen Anfänger erklären !

DANKE

_________________
Lg Stefan
Bitsqueezer
Office-VBA-Programmierer


Verfasst am:
03. Jan 2010, 16:44
Rufname:


AW: Suchfeld Barcode - AW: Suchfeld Barcode

Nach oben
       Version: Office 2007

Hallo Stefan,

das ist i.d.R. kein Problem, da die Barcodescanner einfach nur Tastatureingaben ersetzen. Du mußt also nur ein Feld im Formular haben, in das der Code eingelesen werden soll und setzt dieses Feld z.B. auf das erste Feld in der Tab-Reihenfolge, damit beim Öffnen des Formulars in diesem Feld der Cursor steht.

Dann fügst Du einen Speichern-Knopf hinzu, dessen Eigenschaft "Default" Du auf "True" setzt, damit beim Drücken der Enter-Taste die Eingabe gespeichert wird bzw. eine wie auch immer geartete Aktion wie "Buchen" ausgelöst wird.

Der Barcodescanner muß dann nur so konfiguriert werden, daß er als letztes Zeichen nach dem Scan ein Enter-Zeichen sendet, das mußt Du im Hardwarehandbuch des Scanners nachsehen.

Wenn Du dann das Formular öffnest, steht der Cursor im Codefeld, wenn Du scannst, kopiert der Barcodescanner die gescannte Zahl in das Feld und durch das Auslösen des Enter-Zeichens wird gleichzeitig der Speichern-Knopf ausgelöst - fertig ist die Buchung.
Als letzte Aktion nach der Buchung kann der Code veranlassen, das Formular zu einem neuen Datensatz springen zu lassen, damit Du sofort weiterscannen kannst.

Gruß

Christian
salmi
Access anfänger


Verfasst am:
03. Jan 2010, 16:56
Rufname: salmi

AW: Suchfeld Barcode - AW: Suchfeld Barcode

Nach oben
       Version: Office 2007

Danke Christian,

brauche ich dazu einen vba code für die such ?

der EAN ist im frmArtikel unter EAN gespeichert das suchfeld ist im frmKassa, wie muss ich das einstellen das den artikel dort sucht und bucht ?

Danke

_________________
Lg Stefan
Bitsqueezer
Office-VBA-Programmierer


Verfasst am:
03. Jan 2010, 19:14
Rufname:

AW: Suchfeld Barcode - AW: Suchfeld Barcode

Nach oben
       Version: Office 2007

Hallo Stefan,

klar, von alleine passiert nun mal nichts...

Wie man Suchformulare erstellt, dazu gibt's hier anderweitig genug Anleitungen, und was wie wo gebucht werden soll und auf welche Weise, kannst nur Du wissen.

Alternativ, wenn Du VBA scheust, kannst Du auch Makros verwenden. Ist aber sicher nicht die bessere Methode.

Jedoch das Programmieren kann ich Dir nicht beibringen. Lernen vor dem Programmieren ist nunmal notwendig.

Gruß

Christian
salmi
Access anfänger


Verfasst am:
04. Jan 2010, 19:58
Rufname: salmi


AW: Suchfeld Barcode - AW: Suchfeld Barcode

Nach oben
       Version: Office 2007

Hallo Leute,

habe gerade versucht mit diesem code einen suche zu erstellen habt aber lieder nicht funktioniert kann mir wer helfen ?
Code:
    Dim rst As Recordset
   
    'Überprüfung, ob das Suchkriterien leer ist
    If IsNull(Me![Artikelbezeichnung]) Then
        MsgBox "Bitte eine Artikelbezeichnung eingeben !"
        Exit Sub
    End If
    'Durchführung der Suche
    Set rst = Me.RecordsetClone
                                                 ' Aus + mach & by Willi Wipp!
    rst.FindFirst "[ART_BEZEICHNUNG] Like '*" & Me![Artikelbezeichnung] & "*'"
    rst.FindFirst "[ART_NUMMER] Like '*" & Me![Artikelbezeichnung] & "*'"
    If rst.NoMatch Then
        MsgBox "Nicht gefunden !"
        rst.Close
        Exit Sub
      Else
        Me.Bookmark = rst.Bookmark
    End If
    'Markieren des Suchergebnisses in der Liste
    Controls![Artikelliste] = Me![ART_KEY]
Anbei die DB !
_________________
Lg Stefan



Kasse.zip
 Beschreibung:

Download
 Dateiname:  Kasse.zip
 Dateigröße:  299.77 KB
 Heruntergeladen:  37 mal

Willi Wipp
Moderator


Verfasst am:
05. Jan 2010, 02:27
Rufname:
Wohnort: Raum Wiesbaden

Re: Suchfeld Barcode - Re: Suchfeld Barcode

Nach oben
       Version: Office 2007

Hi salmi,

und nach was genau willst Du jetzt suchen?

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
salmi
Access anfänger


Verfasst am:
05. Jan 2010, 11:04
Rufname: salmi

AW: Suchfeld Barcode - AW: Suchfeld Barcode

Nach oben
       Version: Office 2007

ich möchte die artikel suchen und anschießend soll der artikel auf das mitglied gebucht werden !

DANKE

_________________
Lg Stefan
Willi Wipp
Moderator


Verfasst am:
06. Jan 2010, 05:27
Rufname:
Wohnort: Raum Wiesbaden

Re: Suchfeld Barcode (II) - Re: Suchfeld Barcode (II)

Nach oben
       Version: Office 2007

Hi salmi,

suchst Du etwas in der Art?
Code:
    rst.FindFirst "[ART_NUMMER] Like '*" & Me![Artikelbezeichnung] & "*'" _
            & " OR [ART_BEZEICHNUNG] Like '*" & Me![Artikelbezeichnung] & "*'"
Wobei mir nicht klar ist warum sich der Barcode mal in der ART_NUMMER und mal in der ART_BEZEICHNUNGbefinden soll Confused
Warum machst Du die Auswahl nicht ueber ein (oder mehrere) Kombinationsfeld(er)?

_________________
Eine kurze Rueckmeldung waere nett
SL Willi Wipp

(Anleitung fuer das Anhaengen von Dateien: Klicke links auf [www], Gaeste muessen sich dafuer anmelden)
salmi
Access anfänger


Verfasst am:
06. Jan 2010, 12:47
Rufname: salmi

AW: Suchfeld Barcode - AW: Suchfeld Barcode

Nach oben
       Version: Office 2007

Hallo,

der barcode ist in der tblArtikel unter ART_NUMMER hinterlegt und nach diesem möchte ich suchen und soll dann gebucht werden, ich möchte gerne nicht nur über die button meiner DB arbeiten würde in zukunft auch gerne per Barcodescanner arbeiten und da benötige ich ein feld das die Artikel sucht und dann bucht!

Danke für deine Antwort aber bei diesem code bekomme ich eine fehlermeldung siehe anhang !

Danke

_________________
Lg Stefan



fehler.jpg
 Beschreibung:
 Dateigröße:  27.63 KB
 Angeschaut:  1448 mal

fehler.jpg


MissPh!
Office-VBA-Programmiererin


Verfasst am:
06. Jan 2010, 16:16
Rufname:
Wohnort: NRW

AW: Suchfeld Barcode - AW: Suchfeld Barcode

Nach oben
       Version: Office 2007

Hi,

wenn das Formular keine Datenherkunft hat, kannst du auch nicht RecordsetClone einsetzen.
Wo also willst du den Artikel suchen bzw. wohin willst du ihn buchen?

_________________
Gruß MissPh!
salmi
Access anfänger


Verfasst am:
06. Jan 2010, 17:34
Rufname: salmi

AW: Suchfeld Barcode - AW: Suchfeld Barcode

Nach oben
       Version: Office 2007

Hallo,

ich möchte das ich die artikel auch per barcodeeingabe in mein kassensystem buchen (tblBon) !

wie kann diese wünsche dann verwircklichen ?

_________________
Lg Stefan
MissPh!
Office-VBA-Programmiererin


Verfasst am:
06. Jan 2010, 17:37
Rufname:
Wohnort: NRW

AW: Suchfeld Barcode - AW: Suchfeld Barcode

Nach oben
       Version: Office 2007

Bekommst du denn die reine Artikelnummer beim Einscannen oder sind da evtl. noch Sonderzeichen (wie z.B. '*') drum herum?
_________________
Gruß MissPh!
salmi
Access anfänger


Verfasst am:
06. Jan 2010, 17:42
Rufname: salmi

AW: Suchfeld Barcode - AW: Suchfeld Barcode

Nach oben
       Version: Office 2007

Hallo,

ja bekomme eine reine Artikelnummer (EAN13) !

_________________
Lg Stefan
MissPh!
Office-VBA-Programmiererin


Verfasst am:
06. Jan 2010, 17:48
Rufname:
Wohnort: NRW

AW: Suchfeld Barcode - AW: Suchfeld Barcode

Nach oben
       Version: Office 2007

OK, versuche es mal hiermit:
Code:
Private Sub button_suchen_Click()
    Dim rst As Recordset
   
    'Überprüfung, ob das Suchkriterien leer ist
    If IsNull(Me![Artikelbezeichnung]) Then
       MsgBox "Bitte eine Artikelbezeichnung eingeben !"
    Else
    'Durchführung der Suche
        Set rst = CurrentDb.OpenRecordset("Select ArtikelNr, Preis From tblArtikel " & _
                                  "Where ART_NUMMER ='" & Me![Artikelbezeichnung] & "'")
        If rst.EOF Or rst.BOF Then
           MsgBox "Nicht gefunden !"
        Else
           CurrentDb.Execute "Insert Into tblBon (ArtikelNr, Preis, Mitglied_ID) " & _
                              "Values(" & RS(0) & ", " & Str(RS(1)) & ", " & Me.cmboMitglied & ")"
        End If
        rst.Close
        Me!ufrmBon.Requery
       
        'Markieren des Suchergebnisses in der Liste ???
        '??? Controls![Artikelliste] = Me![ART_KEY]
    End If
End Sub

_________________
Gruß MissPh!
salmi
Access anfänger


Verfasst am:
06. Jan 2010, 18:02
Rufname: salmi


AW: Suchfeld Barcode - AW: Suchfeld Barcode

Nach oben
       Version: Office 2007

Hallo,

danke für den code aber der code verursacht einen fehler

siehe anhang

_________________
Lg Stefan



fehler1.jpg
 Beschreibung:
 Dateigröße:  96.94 KB
 Angeschaut:  1419 mal

fehler1.jpg


Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Gehe zu Seite 1, 2  Weiter
Diese Seite Freunden empfehlen

Seite 1 von 2
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Access Formulare: Formular mit Suchfeld auf Unterformular 3 AllenWalker86 105 05. Nov 2013, 17:12
MissPh! Formular mit Suchfeld auf Unterformular
Keine neuen Beiträge Access Formulare: Suchfeld im Formular 2 nuehre 88 26. Jun 2013, 14:53
sebahier Suchfeld im Formular
Keine neuen Beiträge Access Formulare: Suchfeld und Kombinationsfeld 34 masterofdisaster711 927 23. Nov 2011, 12:15
masterofdisaster711 Suchfeld und Kombinationsfeld
Keine neuen Beiträge Access Formulare: Suchfeld einfügen 1 Katharina1006 703 18. Mai 2011, 15:43
gisiangel Suchfeld einfügen
Keine neuen Beiträge Access Formulare: Suchfeld verknüpft mit Kombifeld, welches Ergebnis anzeigt 13 ThaHell 300 28. Apr 2011, 23:38
ThaHell Suchfeld verknüpft mit Kombifeld, welches Ergebnis anzeigt
Keine neuen Beiträge Access Formulare: Horizontaler Scrollbalken verdeckt Suchfeld in DS-Formular 0 Stefan24 799 06. Feb 2011, 17:47
Stefan24 Horizontaler Scrollbalken verdeckt Suchfeld in DS-Formular
Keine neuen Beiträge Access Formulare: Textfeld als Suchfeld 1 Matze20041984 203 02. Nov 2010, 10:59
aba Textfeld als Suchfeld
Keine neuen Beiträge Access Formulare: Probleme mit Suchfeld 0 Mirko K 190 01. Sep 2010, 22:53
Mirko K Probleme mit Suchfeld
Keine neuen Beiträge Access Formulare: Kombinationsfeld als Suchfeld 2 HdW 1410 20. Okt 2009, 11:09
HdW Kombinationsfeld als Suchfeld
Keine neuen Beiträge Access Formulare: Schwierigkeiten mit Suchfeld 10 Scheibenmitte 291 30. Aug 2009, 06:22
Willi Wipp Schwierigkeiten mit Suchfeld
Keine neuen Beiträge Access Formulare: Suchfeld mit Unterformular verbinden 2 Martin1983 1199 09. Jun 2009, 17:10
MissPh! Suchfeld mit Unterformular verbinden
Keine neuen Beiträge Access Tabellen & Abfragen: Felddatentyp als Barcode formatieren 5 goofi 707 03. Okt 2008, 12:10
Willi Wipp Felddatentyp als Barcode formatieren
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: HTML CSS