MS-Office-Forum

Zurück   MS-Office-Forum > Microsoft Access & Datenbanken > Microsoft Access
Registrieren Forum Hilfe Alle Foren als gelesen markieren

Banner und Co.

Antworten
Ads
Themen-Optionen Ansicht
Alt 17.10.2002, 00:17   #1
carni
Neuer Benutzer
Neuer Benutzer
Standard DoCmd.RunSQL ????

Hallo zusammen!

Nach stundenlanger erfolgloser Suche wende ich mich mal an euch.

Ich habe folgendes Problem:

Ich habe ein Formular mit Unterformular. In diesem Unterformular gibt es ein gebundenes Textfeld namens [Menge] und ein Kombifeld mit dem Namen [ProdNr].
Die Werte fuer das Kombifeld stammen aus einer Tabelle 'Preisliste', welche neben den Produktnummern (Prim.schluessel) auch die zugehoerigen Staffelpreise enthaelt.
Ich moechte nun, dass wenn ich eine Menge eingebe und ein Produkt auswaehle der zugehoerige Preis in das ebenfalls gebundene Textfeld Preis eingetragen wird.

Das ganze geht mit 'DoCmd.RunSQL' vonstatten, sobald das Feld 'Preis' den Fokus erhaelt. Ich hab die Schleife auch schon programmiert. Das funktioniert soweit alles wunderbar.
Allerdings bricht mir das ganze dann bei der SQL-Anweisung ab.

Hier mal ein kleines Codebeispiel:

DoCmd.RunSQL "SELECT DISTINCT tbl_PriceList.[1-9] FROM tbl_PriceList WHERE tbl_PriceList.[P/N] = Me![P/N]"

[1-9] ist die Spalte, die die Preise von Stueckzahlen von 1-9 enthaelt.
[P/N] ist die Produktnummer.

Ich hoffe, dass ich mich einigermassen deutlich ausgedrueckt habe und mir jemand helfen kann.

Gruss,

Patrick

P.S. Ich benutze Access 2002.
Achja, der Fehler den ich bekomme lautet:
Run-time error '2342':

A RunSQL action requires an argument consisting of an SQL statement.
carni ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 17.10.2002, 02:21   #2
Nockenwelle
MOF Profi
MOF Profi
Standard

Me kannst du nicht in einem Sql-String benutzen. Du musst den enthaltenen Wert an deinen String anhängen

DoCmd.RunSQL "SELECT DISTINCT tbl_PriceList.[1-9] FROM tbl_PriceList WHERE tbl_PriceList.[P/N] = " & Me![P/N]
Nockenwelle ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 17.10.2002, 05:49   #3
MarioR
MOF Meister
MOF Meister
Standard

Hallo Patrick,

RunSQL verarbeitet keine Auswahlabfragen, damit kommst Du also sowieso nicht zum Ziel.

Bei Kombi- und Listenfeldern gibt es eine bessere Lösung:
Das Preisfeld ist ja schon im Kombifeld enthalten, Du musst nach Auswahl nur noch den Wert auslesen. Das machst Du am besten im Ereignis Nach Aktualisierung vom Kombifeld:
Code:

Me.FeldPreis=Me.ProdNr.Column(1)
Ist das Preisfeld nicht die 2. Spalte, musst Du Column entsprechend anpassen.

__________________

Mario

Fluchen ist die einzige Sprache, die alle Programmierer perfekt beherrschen.
MarioR ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 17.10.2002, 17:31   #4
carni
Threadstarter Threadstarter
Neuer Benutzer
Neuer Benutzer
Danke euch beiden. Vor allem Mario, damit hat es funktioniert. Nun bin ich wieder ein bisschen schlauer.

Gruss,

Patrick
carni ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Ads
Antworten


Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Besucher: 1)
 
Themen-Optionen
Ansicht

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge anzufügen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

vB Code ist An.
Smileys sind An.
[IMG] Code ist An.
HTML-Code ist An.
Gehe zu


Alle Zeitangaben in WEZ +1. Es ist jetzt 22:59 Uhr.


Partner und Co.
Access-Paradies -Alles rund um die Datenbank Microsoft Access -Code -Programme-Tools -Tipps   Kostenlose Tipps & Tricks, Downloads und Programme   www.kulpa-online.com - Tipps - Tricks - Tutorials - Meinungen - Downloads uvm...   vb@rchiv · Willkommen in der Welt der VB Programmierung   Access-Garhammer - Hier finden Sie jede Menge Beispiel-Datenbanken zu Access und mehr ...   mcseboard.de   Die Top Seite für Excel-VBA-Makros uvm.

Powered by: vBulletin Version 3.6.2 (Deutsch)
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

Copyright ©2000-2018 MS-Office-Forum. Alle Rechte vorbehalten.
Copyright ©Design: Manuela Kulpa ©Rechte: Günter Kramer
Eine Verwendung der Inhalte in anderen Publikationen, auch auszugsweise,
ist ohne ausdrückliche Zustimmung der Autoren nicht gestattet.