🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: pl.comp.bazy-danych.msaccess
Article #137729

Re: Pierwszy wolny rekord, edycja

#137729
From: Zbigniew Bratko
Date: Sun, 04 Oct 2020 17:06
36 lines
2546 bytes
W dniu 04.10.2020 o 18:32, Stan pisze:
> Bardzo dziękuję za przykładowy kod, spróbuję z nim powalczyć i zrozumieć :)
> 
> P.S.
> W Tabeli jest też pole "ID" (Autonumeracja).
> W 5-ciu rekordach "Pole1" ma wartość =13. Jako "Pierwszy" rozumiem jeden z tych 5-ciu rekordów: ten o najmniejszym numerze "ID".
> 
> 

Dokładnie tak jak piszesz. Musisz posortować rosnąco zestaw rekordów w/m 
  pola ID, przejść do pierwszego rekordu i zapisać dane.


Tak na pierwszy rzut oka musisz zmienić zmienną sSQL na :

     sSQL = "SELECT  Pole2, Pole3 FROM Tabela1 WHERE " & _
            "(Pole2 Is Null) AND " & _
            "(Pole3 Is Null) AND " & _
            "(Pole1=" & Me!PoleKombi1 & ")" & _
            " ORDER BY ID;"

Klauzula ORDER BY nakazuje posortowanie (domyślnie rosnąco) rekordy 
względem pola ID. No i chyba będzie to pierwszy rekord ;-)


Nie chcę być upierdliwy, ale przemyśl nazewnictwo pól w tabelach oraz
formantów na formularzu. Odwoływanie się do np. pola Pole2 w formularzu, 
można zastąpić odwołaniem Me.txtNazwaPola (musisz nazwać tak formant 
tekstowy formularz), dla pola kombi np. cboTwojaNazwa zamiast 
PoleKombi1. Bonusem zapisu Me. jest korzystanie z podpowiedzi 
IntelliSense oferowanych przez MS Access


-- 
Pozdrawiam
Zbigniew Bratko
Technical Details
Message-ID: <5f7a011c$0$17357$65785112@news.neostrada.pl>
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!newsfeed.pionier.net.pl!news.samoylyk.net!aioe.org!peer03.ams4!peer.am4.highwinds-media.com!news.highwinds-media.com!newsfeed.neostrada.pl!unt-exc-01.news.neostrada.pl!unt-spo-a-01.news.neostrada.pl!news.neostrada.pl.POSTED!not-for-mail
References: <7f747a0f-4b7a-417b-a6f5-a9e566ab6442n@googlegroups.com> <5f79a343$0$553$65785112@news.neostrada.pl> <caf763e7-6e86-4e56-b9be-bade6d359022n@googlegroups.com>

Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!news.icm.edu.pl!newsfeed.pionier.net.pl!news.samoylyk.net!aioe.org!peer03.ams4!peer.am4.highwinds-media.com!news.highwinds-media.com!newsfeed.neostrada.pl!unt-exc-01.news.neostrada.pl!unt-spo-a-01.news.neostrada.pl!news.neostrada.pl.POSTED!not-for-mail
Subject: Re: Pierwszy wolny rekord, edycja
Newsgroups: pl.comp.bazy-danych.msaccess
References: <7f747a0f-4b7a-417b-a6f5-a9e566ab6442n@googlegroups.com> <5f79a343$0$553$65785112@news.neostrada.pl> <caf763e7-6e86-4e56-b9be-bade6d359022n@googlegroups.com>
From: Zbigniew Bratko <adminBEZTEGO@accdb.pl>
Date: Sun, 4 Oct 2020 19:06:33 +0200
User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:78.0) Gecko/20100101 Thunderbird/78.3.1
MIME-Version: 1.0
In-Reply-To: <caf763e7-6e86-4e56-b9be-bade6d359022n@googlegroups.com>
Lines: 62
Message-ID: <5f7a011c$0$17357$65785112@news.neostrada.pl>
Organization: Telekomunikacja Polska
NNTP-Posting-Host: 37.248.157.113
X-Trace: 1601831196 unt-rea-a-01.news.neostrada.pl 17357 37.248.157.113:23813
X-Complaints-To: abuse@news.neostrada.pl
X-Received-Bytes: 2991
X-Received-Body-CRC: 1548561583
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit