Temat: Ściąganie danych z tabeli

Wypraszam sobie takie negatywne oceny. Od 10 lat pracuję na ksiegowości przez siebie zrobionej i działa bez zarzutu. Wystawia faktury, robi korekty, zbiera multum informacji. Wiec proszę mi nie wmawiać, źe jest do bani, bo praktyka pokazuje coś wręcz odwrotnego. To czy relacje tabel są ustawione na numeracji czy na wartościach nie ma żadnego znaczenia.
W mojej próbce tablice muszą być powiązane, bo zbudowane na nich Formularz i Podformularz muszą wiązać tablice inaczej nie będą współgrać, wiec chyba pan nie dojrzał tego co oczywiste.

Temat: Ściąganie danych z tabeli

Nie wiem skad ta agresja?!
Ja jedynie pokazalem jak z bazodanowego punktu widzenia to powinno wygladac. W zaden sposob nie neguje Pana umiejetnosci. Skoro zaprojektowal Pan cos co dziala i ma sie dobrze to po co zmieniac?
Teorie relacyjnych baz danych wymyslono w latach 70 ub stulecia i do dzisiaj nie ulegla zmianie. Napisalem (czas przeszly dokonany) ze prosze aby potraktowal Pan moj zalacznik jako przyklad do nauki. Sa tam wszystkie wykorzystane zagadnienia o ktore Pan pytal.

Ma Pan racje - zupelnie sie nie znam. W ogole nie powinienem pracowac w zawodzie. Od jutra zajme sie skladaniem dlugopisow.

Temat: Ściąganie danych z tabeli

Nie twierdze, źe pan się nie zna.
Nie twierdzę również, źe ja się znam na accessie. Dlatego próbuje znaleźć kogoś życzliwego na forum, kto chce naprawdę pomoc. Moja reakcja wynika, według mnie, z dość niesprawiedliwej oceny jaką pan wydał na temat moich działań: „wyrzucenie do kosza” itp. Niestety na wszystkich forach ludzie zbyt łatwo feruja negatywne wyroki, chyba chcą się dowartościować kosztem innych. Myślę, że jak się chce komuś pomoc to nie należy zaczynać od sugestii, że o niczym nie ma pojęcia. To dość niepedagogiczne i niegrzeczne. Radziłbym swoje sugestie ubierać w bardziej parlamentarne określenia.
Jeśli chce mi pan naprawdę pomoc to prosiłbym albo o stworzenie kodu do mojej bazy, albo wytłumaczenie do czego odnoszą się 2 ostatnie zera w kodzie. O ile dobrze zrozumiałem 1 zero odnosi się do 1 kolumny w kwerendzie z której pochodzi wartość kombi „nazwa”.

Temat: Ściąganie danych z tabeli

Private Sub nazwa_AfterUpdate()
Me.cena = DLookup("[cena]", "Albumy-cena", "[nazwa]='" & Me.nazwa.Column(0) & "'")
End Sub

A teraz clou całego tego wątku. Coś o czym pisałem od samego początku.

Dla albumu 2 jest pobierana cena ponieważ nazwy są zgodne, natomiast dla albumu 1 cena jest równa null, ponieważ istnieje różnica pomiędzy nazewnictwem. "Album1" to nie to samo co "Album 1".

Zeby uniknąć wartość Null to można użyc funkcji NZ(wartość, wartość_jeżeli_Null_zero)
Private Sub nazwa_AfterUpdate()
Me.cena = Nz(DLookup("[cena]", "Albumy-cena", "[nazwa]='" & Me.nazwa.Column(0) & "'"),"BRAK CENY!!")
End Sub


Lepiej żebyśmy nie używali języka parlamentarnego.

PozdrawiamTen post został edytowany przez Autora dnia 14.01.19 o godzinie 08:52

Temat: Ściąganie danych z tabeli

Używając mojego pliku i po podpięciu kodu tego pod spodem w Formularzu Faktura, kombi "nazwa" w zdarzeniu "Po aktualizacji" w programie VBA, poprawie Album 1 na Album1 niestety nie pojawia mi się cena przy wyborze jakiegoś albumu.

Temat: Ściąganie danych z tabeli

Jakby Pan mógłby przysłać moją databazę z działającym kodem byłbym wdzięczny. Może wtedy ogarnę na czym to polega.

Temat: Ściąganie danych z tabeli

Nie ma sensu podsyłać bazy ale proszę bardzo.
Problem jest w tym ze pobiera Pan nazwy albumów z tabeli "Albumy-nazwa" a ceny z tabeli "Albumy-cena" i nazwy albumów nie są takie same!

Najlepszym przykładem jest "Album1". W tabeli "Albumy-nazwa" ten sam album nazywa się "Album1" a w tabeli "Albumy-cena" - "Album[SPACJA]1".

Dla każdego programu komputerowego te dwie nazwy nie są i nie będą takie same. Wynika to z braku relacji pomiędzy albumami a cenami.
https://1drv.ms/u/s!AttmjDiVAHWDpHCNS4YNsDenxhKG

Temat: Ściąganie danych z tabeli

Ok. To już poprawiłem, mimo to nie działa.

Temat: Ściąganie danych z tabeli

A plik przesłany przeze mnie też nie działa?

Temat: Ściąganie danych z tabeli

Tak, ale u pana konstrukcja jest inna, co już uzgodniliśmy. Muszę pozostać przy swojej.



Wyślij zaproszenie do