|
Access : Bestellungen schreiben und Artikel speichern
Oberli Mike am 05.05.2008 um 23:11 Uhr (0)
Hier mal ein Beispiel wie man es machen kann.Allerdings muss man ein paar Dinge, vermutlich mit Makro, noch einpflegen.- und-color: #FFFF99'>Suchen nach einer Bestellnummer- Der Preis Menge mal Artikelpreis sollte ev. in eine Tabelle geschrieben werdenGrussMike------------------ The Power Of Dreams
|
| In das Form Access wechseln |
|
Access : Abfrage - Leerzeichen in Spalten ignorieren
Stelli1 am 29.04.2008 um 12:39 Uhr (0)
Hallo Mario,das war doch eigentlich richtig.Access ist aber etwas eigenwillig. Es entspricht nicht so ganz dem SQL Standard.Wenn du es mit dem Abfragegenerator machst musst du an Stelle von "," ein ";" als Trennzeichen eingeben.Code:NummerOhneBlank: replace([Telefonnummern]![Nummer1];" ";"")entspricht dem SQLCode:NummerOhneBlank: replace([Telefonnummern]![Nummer1], " ", "")In mehreren Feldern könnte man so und-color: #FFFF99'>suchen.Code:SELECT Telefonnummern.ID, Telefonnummern.Nummer1, Telefonnummern.Nummer2FROM Telefonnumme ...
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 22.02.2007 um 21:14 Uhr (0)
Hallo Larsich bekomm es einfach nicht hin vielleicht kanst du dir die mdb mal ansehen siehe auch erläuterung.txtwäre echt nett ------------------Servus,Mario www.the-skier.de
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
BloodyMess am 20.03.2007 um 08:35 Uhr (0)
Wenns übersichtlicher ist .. ------------------ "Soll es funktionieren oder darf es auch etwas von Siemens sein?" ... http://validator.w3.org/check?uri=http://ww3.cad.de/cgi-bin/ubb/Ultimate.cgi
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
BloodyMess am 22.02.2007 um 16:58 Uhr (0)
Füge mal ein GROUP by Tabellenname.Feldname an.------------------ "Soll es funktionieren oder darf es auch etwas von Siemens sein?" ... http://validator.w3.org/check?uri=http://ww3.cad.de/cgi-bin/ubb/Ultimate.cgi
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
BloodyMess am 25.02.2007 um 21:44 Uhr (0)
Habe es nach bestem Wissen und Gewissen implementiert.Fehler musst Du selber behandeln!Beschäftige Dich mit Datenbanken und Programmieren! Mit dem jetzigen Konzept kommst Du nicht weit!Grüssle Lars------------------ "Soll es funktionieren oder darf es auch etwas von Siemens sein?" ... http://validator.w3.org/check?uri=http://ww3.cad.de/cgi-bin/ubb/Ultimate.cgi
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 21.02.2007 um 21:53 Uhr (0)
Hallo Lars,Code:strSQL = "SELECT count(Tabellenname.Feldname), Tabellenname.KL FROM Tabellenname WHERE Tabellenname.Feldname = Suchwert;"funktioniert bei mir aber nicht, Fehler 3122Sie wollten eine Abfrage ausführen, die den angegebenen Ausdruck nicht als Teil der Aggregatfunktion einschließt.------------------Servus,Mario www.the-skier.de
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
BloodyMess am 23.02.2007 um 20:42 Uhr (0)
Hi Mario,ich nehm die Datenbank am Sonntag mal auseinander. Vielleicht könntest Du bis dahin die CodeFragmente noch ein bisschen auskommentieren.Beim ersten drüberschauen scheint er die IDs beim Speichern durcheinander zu werfen, aber ich muss es mir genauer anschauen!so long Lars------------------ "Soll es funktionieren oder darf es auch etwas von Siemens sein?" ... http://validator.w3.org/check?uri=http://ww3.cad.de/cgi-bin/ubb/Ultimate.cgi
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 26.02.2007 um 15:14 Uhr (0)
Hallo Lars,vielen Dank, nun hast du dir auch noch das WE versaut.Ich habe am WE leider keinen PC (Pendler).Mit dem lernen von DB und Prog. hast du ja recht, aber mir fehlt derzeit noch etwas Lektüre, und so sehr oft benötige ich DBs auch nicht.Ich werde mich nun aber mit deinem Code auseinander setzen.ich denke ich werde dadurch net dümmer.vielen Dank nochmals------------------Servus,Mario www.the-skier.de
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 15.02.2007 um 19:01 Uhr (0)
Danke Lars,das Funktioniert ersmal wunderbarfolgende Zeile nochmal zum besseren VerständnisCode:strSQL = "SELECT count(Tabellenname.Feldname) FROM Tabellenname WHERE Tabellenname.Feldname = Suchwert;"wenn ich das so richtig verstanden habenun aber noch bei Case "1" Zitat:Wenn nur ein Datensatz gefunden wird dann soll eine VariableWERT_KL = den Wert aus dem Feld KL dieses Datensatzes der TAB2 erhaltenhier möchte ich den Wert aus Feld KL des gefundenen Datensatzes lesen------------------Servus,Mario www.the ...
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
BloodyMess am 21.02.2007 um 10:58 Uhr (0)
Hallo Mario,DLookUp ist, wenn ich es richtig verstanden habe, nichts anderes als ein SELECT-Statement. Das heisst Du machst im Hintergrund eine erneute SQL-Abfrage auf die Datenbank.Wenn die Möglichkeit besteht alles mit einer Abfrage zu erschlagen, dann würde ich das auch machen.Referenz: http://www.techonthenet.com/access/functions/domain/dlookup.php Grüssle Lars------------------ "Soll es funktionieren oder darf es auch etwas von Siemens sein?" ... http://validator.w3.org/check?uri=http://ww3.cad.de/c ...
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
m-troeger am 20.02.2007 um 19:58 Uhr (0)
Hallo Lars,bin jetzt zu folgender Lösung gekommenCode:Option ExplicitSub test()Dim dbs As ObjectSet dbs = CurrentDbDim strSQL As StringstrSQL = "SELECT count(Tabellenname.Feldname) FROM Tabellenname WHERE Tabellenname.Feldname = Suchwert;"Dim rst As ObjectSet rst = dbs.OpenRecordset(strSQL) hier kommt immer die Anzahl zurück, auch wenn nur 0 drinnenstehtDim sCountValue As StringsCountValue = rst.Fields.Item(0).ValueSelect Case sCountValue Case "0" mache dies Case "1" mache das Dim WERT_KL as S ...
|
| In das Form Access wechseln |
|
Access : VBA, Datensätze und-color: #FFFF99'>suchen
BloodyMess am 15.02.2007 um 13:53 Uhr (0)
Hallo Mario,sowas in der Art sollte Dir weiterhelfen ...Code:Option ExplicitSub test()Dim dbs As ObjectSet dbs = CurrentDbDim strSQL As StringstrSQL = "SELECT count(Tabelle1.value) FROM Tabelle1 WHERE Tabelle1.value = testers;"Dim rst As ObjectSet rst = dbs.OpenRecordset(strSQL) hier kommt immer die Anzahl zurück, auch wenn nur 0 drinnenstehtDim sCountValue As StringsCountValue = rst.Fields.Item(0).ValueSelect Case sCountValue Case "0" mache dies Case "1" mache das Case Else mache jenesEnd S ...
|
| In das Form Access wechseln |