Access Tanfolyam #18 – adatok keresése, szűrése
Access Tanfolyam #18 – adatok keresése, szűrése
Sokszor van arra igény, hogy a felhasználók az adatok közt tudjanak keresni. A mostani videóban azt mutatom be, hogyan tudunk olyan űrlapot építeni ahol különböző módon tudnak keresni !
on január 29th, 2009 at 13:41
Tisztelt Faludi Gábor!
Köszönet az új leckéért! Szerintem nagyon hasznosak a videók!
Sokat lehet tanulni belőlük!
Üdvözlettel
Vágó Lajos
on január 29th, 2009 at 21:09
A videók nagyon jók, sokat tanultam belőlük. Sajnos nekem az utolsó videó képminősége nagyon rossznak tűnik, a visual basic-ben irt kód nem kivehető. Nem lehetne megoldani, hogy a videó minősége a 14. leckével azonos legyen? Várom a mihamarabbi folytatást.
Sok sikert!
on január 30th, 2009 at 10:36
Szia Gábor!
Köszi az új videót (#18-as), de van vele egy kis gondom. Sajnos a kép olyan életlen, hogy nem igazán olvasható, hogy éppen mit is írsz be a kódszerkesztőbe (pl. &, “”, *, stb. karakterek esetében). Aki még nem csinált ilyet, annak nem biztos, hogy egyértelmű, hogy mik ezek a karakterek, és sajnos nem is látható pontosan a videódban, hogy éppen melyiket kell használni.
A hanggal is van némi probléma, de nagyjából érthető. Már régóta vártam ezt a videót, szerintem komoly hiánypótlást oldottál meg ezzel. Jó volna, ha lenne olyan videóanyag is, amely ezt a keresést úgy oldaná meg, hogy az űrlap felső részében van a keresőmező, az alsó részben pedig rögtön ki is listázná (pl. adatlap nézet formában) a keresésnek megfelelő rekordokat. De érdekelne a felhasználó-kezelés is, pl. felhasználók hozzáférése az adatbázishoz (username/password, jogosultságok, stb.).
Köszi
czizso
on január 30th, 2009 at 10:40
Üdv.
sztem is jó az anyag a keresésről, de én is csatlakozom az előttem szólóhoz, nálam is az homályosság okozott gondot.
engem azzal kapcsolatban érdekelne egy videoanyag, hogy milyen beállítások szükségesek ahhoz, hogy az általam elkészített adatbázis futtatható-e önálló kis alkalmazásként olyan gépen, ahol Office van telepítve, de Access nincs. Állítólag megoldható, csak nem tudom, hogy hogyan.
Remélem, Te tudod a megoldást!
További sok sikert (és sok hasonló jó anyagot nekünk!)
czs1
on január 30th, 2009 at 20:22
Próbáltam javítani a képminőségen , remélem most jobb !
üdvözlettel,
Faludi Gábor
on január 31st, 2009 at 00:08
sztem nem lett jobb a képminőség, vagy legalábbis nem sokkal, de azért köszi a próbálgatást.
czs1
on január 31st, 2009 at 17:28
Üdv,
Először is gratulálok a honlaphoz és a videókhoz, nagyon – nagyon hasznos információkat találtam bennük, viszont segítséged kérném a következőben.
Egy űrlapon lévő beviteli mezőnek (ami kapcsolódik egy tábla adott mezőjébe) szeretnék alapértelmezett értéket beállítani, viszont a függvényeken kívül semmit nem fogad el, folyton a #NÉV értéket teszi be.
Tehát pl. alapértelmezett érték a date() akkor beírja az aktuális dátumot, ha viszont, az alapértelmezett érték mondjuk egy lekérdezés eredménye, ami ugye 1db érték, tehát mondjuk [Lekérdezés1]![dátum] akkor erre már hibát dob.
Előre is köszönöm szíves válaszod!
on január 31st, 2009 at 19:42
Tisztelt Faludi Gábor
Már nagyon vártam de sajnos, nem igen tudom kivenni. Eddig mind kitünő volt, de szemüveges vagyok és ezt nem igen tudom kivenni.
Tisztelettel: Dávid Lajos
on február 1st, 2009 at 09:51
Kedves Gábor!
Én sem tudom kivenni, hogy mikor kell csillag, vagy idézőjel a kódokban. Esetleg egy .txt fájlban lehetne mellékelni az ilyen kódokat, vagy beíráskor sorolni őket.
Amúgy, nagyon jók a videók.
Köszönettel: Szilágyi Károly
on február 4th, 2009 at 19:25
Kedves Gábor!
Sikerűlt kisilabizálni a kódokban a ‘ * ” jeleket, bár sokat variáltam.
Ha nem baj, bemásolom ide, hátha mást is érdekel,
íme:
Private Sub Parancsgomb11_Click()
Me.Filter = “[Vezetéknév] like ‘ ” & Me.keresomezo & ” * ‘ ”
Me.FilterOn = True
End Sub
on február 8th, 2009 at 00:58
Szia Gábor!
Szuper a videó, várjuk a következőt!
p100
on február 15th, 2009 at 15:40
Katona Zoltán részére !
Kedves Zoltán!
Alapértelmezett értékeket célszerű a tábla definíciójában beállítani. Ebben az esetben azonban nincs lehetőségünk erre mivel egy lekérdezés eredményét kellene beletenni , ami ha jól értem az űrlapon beírt adatok alapján változna?!
Ilyenkor nem az alapértelmezett értékkel kellene operálni , hanem egyszerűen a mező érékét kellene beállítani egy adott értékre (VBA) .
Amennyiben van konkrét példája , küldje el meg fogom nézni és reflektálni fogok reá.
üdvözlettel,
Faludi Gábor
on november 5th, 2010 at 13:42
Kedves Admin!
Egy űrlap szöveges mezőinek a vizsgálatát kell elvégeznem, hogy üres vagy sem.
If IsNull (Forms![Űrlapnév].[Mezőnév].Value) Then
Ez működik is, de mivel a mezők neve hasonló pl: Label1…LabelN, így szeretném ciklusba szervezni a vizsgálatot.
For K= 1 to 4
If IsNull (Forms![Űrlapnév].[Mezőnév & K].Value) Then
Így viszont hibaüzenet a vége!?
Van erre más megoldás?
A videok egyébként nagyon tetszenek, sok hasznos dolgot tanultam.
Üdvözlettel:
Attila
on november 8th, 2010 at 15:05
Kedves Attila ,
a következő kódal lehet megoldani a problémát :
Dim item As Control
For Each item In Me.Controls ‘minden vezérlőt megnézünk
Select Case item.ControlType ‘megnézzük a típusát a vezérlőnek
Case acTextBox, acComboBox, acListBox, acCheckBox ‘amennyiben ezek a következők
If item.ControlSource <> “” Then ‘és van forrásuk
If IsNull(item.Value) Then
MsgBox “nincs értéke a ” & item.Name & ” mezőnek”
Else
MsgBox item.Name & ” rendben! ”
End If
End If
Case Else
End Select
Next
üdvözlettel,
Faludi Gábor
on augusztus 13th, 2011 at 21:30
Tisztelt Faludi Gábor!
Ha a kereső mezőbe olyan név kerül amely nem szerepel az adatbázisban egy teljesen üres űrlap jelenik meg. Csak a szűrés kikapcsolásával áll és látható újra a kereső mező.
Hogyan lehetne ezt megelőzni és lekérdezni a rekordmutatót, vagy a a rekord számot és az alapján engedélyezni a műveletet?
Válaszát előre is köszönöm!
Junger László