Archiv pomocí 'Nezařazené' kategorie
Neděli 4.03.2012 |
V tomto příkladu vám ukážu, jak to udělat rešerši na několika slov, v poli formuláře.
Kód použitý v tomto příkladu je užitečné provést další pokročilé vyhledávání.
1 Chcete-li vytvořit tabulku
- Vytvoření tabulky "tbldados" se v těchto oblastech: id (Automatické číslo) / data (text)
2. Vytvořte formulář "Form1"
- Vytvoření formuláře pomocí průvodce a vybrat tbldados jako zdroj dat, zvolte "stůl" do formuláře schématu.
- Poté přejděte do formuláře návrhu a vytvořit textové pole nezávislé, ve formě zápatí, jmenoval txtpesquisa.
- Vytvoření tlačítka na majetku a vložte následující kód:
"************************************************* *************
"Připravil Jose Martins
"Místo: www.accessexemplos.com
"Datum: 09/22/2011
"POZNÁMKA: Neodstraňujte tuto hlavičku. Respektovat autora kódu.
"************************************************* **************
On Error GoTo Err_Comando8_Click
Dim slov () jako řetězec
Dim x As Integer
Dim strSQL As String
Dim strWhere As String
slova = split (Me.txtpesquisa, "")
Pro x = 0 To UBound (Slova)
strWhere = strWhere & "dat, jako je '*" & slov (X) & "*" nebo "
Další x
strWhere = Left $ (strWhere, Len (strWhere) - 3)
strSQL = "SELECT * FROM tbldados kde" a strWhere & "ORDER BY [Data]"
Me.RecordSource = strSQL
Exit_Comando8_Click:
Exit Sub
Err_Comando8_Click:
MsgBox Err.Description
Pokračovat Exit_Comando8_Click
Jaký kód se v podstatě je vytvořit pole složené ze slov v txtpesquisa které byly odhaleny, přes prostory. Po cyklu je vytvořen pro vyhledávání všech slov zadaných v txtpesquisa.
3. Zkouška
- Zadejte data a pak napsat slovo nebo slova, která najdeme v textovém poli odst. txtpesquisa), klikněte na tlačítko a zkontrolovat výsledky.
Níže je odkaz na dowenlod například: RŮZNÉ hledaná slova
Publikováno v Nezařazené | Uživatelské Comment »
Soboty 06.8.2011 |
Dnes jsem přidal tlačítko Google Plus +1. To je další způsob, jak propagovat pracovní místa. Pokud jste pozváni na Google Plus komentáře s vaší e-mailové adresy poslat pozvánku.
Publikováno v Nezařazené | Uživatelské 13 Komentáře »
Středu 13.července 2011 |
To je velmi jednoduché databáze, která slouží ke kontrole výdajů každodenního života.
Hlavní menu
Na obrázku je vidět hlavní menu velmi jednoduché a funkční. V horní části vidíme rok, ve kterém pracujeme.
Rok práce
Chcete-li změnit roční práci klikněte na tlačítko pro výběr roku a otevřenou formu (obr. 2), psaní rok chceme.
Náklady
Výdaje na tlačítko otevřené podobě (obr. 3) pro zadávání dat. Vedle kategorie máme '+' tlačítko pro přidání kategorie a podkategorie jednu stranu '+' jako tlačítko pro přidání podkategorie (kliknutím na podkategoriích, pokud jste nezvolili cetegoria dává chybu a žádá, aby zvolte kategorii . Pokud jste vybrali kategorii se formulář otevře kategorie ve vybrané kategorii).
V oblasti můžeme vybrat poskytovatele ze seznamu, a pokud je, že se zeptá, zda chcete přidat.
Kategorie
Tato forma (obr. 4) se používá ke správě (vložit / změnit / odstranit / vyhledávání), kategorie a jejich podkategorie.
Dodavatelé
Tento formulář se používá ke správě (vložit / změnit / odstranit / vyhledávání) jména dodavatelů.
Zprávy
Kliknutím na toto tlačítko se otevře menu (obrázek 5) zprávy, kde si můžeme vybrat čtyři typy zpráv:
- Náklady na běžný rok (obr. 6) ukazuje zprávu s kategorie, podkategorie, a celkovou hodnotou za měsíc roku, s nimiž pracujeme. To také ukazuje celkové náklady za měsíc a celkem podle skupin.
Tato zpráva obsahuje graf, který ukazuje na dílčí měsíční vývoj každé podkategorii. Tento graf není z mé vlastní, příslušný modul má autora informace, včetně:
"Autor: Philippe Bonnardel (založeno na myšlence Edward Tufte)
- Náklady za rok (obr. 7): zobrazí formulář s náklady podle kategorie v daném roce. Můžeme si vybrat rok výdajů, za předpokladu, že je náklad zaznamenal v tomto roce pro zobrazení grafu. Při poklepání na ikonu kategorie otevírá výroční zprávu podkategorií, které má stejný formát. Při poklepání na ikonu se otevře detail v podkategorii (obr. 8) náklady vzniklé v této podkategorii.
Detail
- Výdaje za měsíc: shodné s výdaji za rok, ale zde můžeme zvolit rok a měsíc si přejete.
- Výdaje dodavatelem zobrazí formulář s náklady na dodavatele v daném roce, a její graf. V této zprávě lze zvolit pouze rok, které chcete zobrazit.
Meziročním srovnání
Ukazuje vývoj výdajů během posledních 10 let. Jsou uvedeny hodnoty pro let a ukazuje graf.
Očekávám vyjádření této databáze, ale přidám funkčnost například jako schopnost tiskových sestav.
Stáhněte si příklad: NÁKLADY
Publikováno v Nezařazené | Uživatelské 12 Komentáře »
Soboty 26.března 2011 |
Tato aktualizace prodejních změn byly následující:
Uvedení image společnosti v této zprávě, která nebyla zobrazena.
Přepracování tisku aspekt prodeje a umístění "Produkt", který nebyl v tisku.
Umístění tabulky IVa a součty.
Vytvoření formuláře výpis denních tržeb, kde můžeme vidět všechny prodeje na den a výpis podle druhu platby.
Změna kódu vložit obraz loga společnosti. Protože obraz je spojen k 'localfoto', což je cesta na disku, kde je obraz v případě, že obraz není na místě chybu a dal neotevřel formulář "podniková data". Tak jsem dal rutinu, která kontroluje chybě a pokud ano, skrývá obraz a skončí funkce není dát chybu. V podstatě zpět do původního stavu, jako by to nemělo obrázek.
Změnilo v podobě a tisknout zprávy o prodeji.
Dodavatelé - forma byla vytvořena pro dodavatele. Kdykoli zadáte nový nákup a dodavatel neexistuje, zeptá, zda chcete přidat. Pokud ano otevření formuláře "Dodavatelé" pro vstup dat.
Nakupování - Pokud to stanovy neexistují, se zeptá, zda chcete vložit.
Stáhněte si: Sales systém
Děkujeme, že jste k testování a připomínky, zlepšení systému.
Publikováno v Nezařazené | Uživatelské 10 Komentáře »
Sobota 12.3.2011 |
V případě přístřeší zvířat a tento systém prodeje je forma, kde můžeme dát fotografii. Po použití tohoto kódu jsem zjistil, že obraz je spojen k 'localfoto', což je cesta na disku, kde je obraz v případě, že obraz není na místě chybu a dal neotevřel formulář. Tak jsem dal rutinu, která kontroluje chybě a pokud ano, skrývá obraz a skončí funkce není dát chybu. V podstatě zpět do původního stavu, jako by to nemělo obrázek.
V příštím příspěvku budu dal další aktualizaci systému prodeje, kde můžeme vidět pracovní kód. Však můžeme udělat test, který je, aby obchodní systém do jiné složky a uvidíme, co se stane, když otevřete formulář firemních dat.
Kód se aktualizuje takto:
"Www.accessexemplos.com
"Jose Martins
'2011-02-28
On Error GoTo Err_mostraimagem
Pokud IsNull (Me.Localfoto) = False pak
Me.FOTO.Picture = Me.Localfoto
FOTO.Visible = True
SEMFOTO.Visible = False
Jiný
Me.FOTO.Picture = ""
SEMFOTO.Visible = True
FOTO.Visible = False
End If
Exit_mostraimagem:
Exit Sub
Err_mostraimagem:
Select Case Err.Number
Case 2220 "Nevidíte obrázek
FOTO.Visible = False
SEMFOTO.Visible = True
Pokračovat Exit_mostraimagem:
Rozsudek jiného, jiné chybě.
MsgBox Err.Number & "" & Err.Description
Pokračovat Exit_mostraimagem:
Konec Vybrat
Publikováno v Nezařazené | Uživatelské Comment »
Sobota 12.3.2011 |
Pro uživatele při zadávání dat vždy napsat velkými písmeny stačí dát následující kód do pole vlastnosti v případě "po stisknutí" (OnKeyPress):
KeyAscii = Asc (UCase (Chr (KeyAscii)))
kde KeyAscii obdrží nový ASCII kód
chr = zobrazí ASCII kód znaku
Funkce 'asc': Vrací celé číslo, které představuje kód (ASCII) znak odpovídající prvnímu písmenu v řetězci.
UCase Funkce: převede řetězec na velká písmena.
Chr funkce: ukazuje charakter ASCII kódu
Chcete-li převést na malá písmena stačí změnit UCase LCase podle:
KeyAscii = Asc (LCase (Chr (KeyAscii)))
Publikováno v Nezařazené | Uživatelské Comment »
Sobota 30 říjnem 2010 |
Všiml jsem si, že někteří čtenáři poslat stejnou zprávu několikrát, protože si myslí, že první nebyl úspěšně odeslán.
Pokud je to poprvé, aby se vyjádřil, tato zpráva musí být schválena, který také schvaluje jako vhodné, aby se vyjádřil.
Toto je ochrana proti nevyžádané poště, ne zprávy vypadají, že má co do činění s blogu.
Takže po odeslání první zprávy, jen čekat, až je schválí a poté na další zprávy nyní zobrazí automaticky.
Stále zatemnění 252 spamové zprávy ...
Publikováno v Nezařazené | Uživatelské 8 komentářů »
Sobotu 23.října 2010 |
Jak již bylo řečeno v předchozí zprávě, jsem změnil místo, kde budou soubory ke stažení.
Od teď sídlí ve službě Box.net , pokud alespoň již nebudou muset čekat na stažení a nemá žádnou reklamu.
Stále máte aktualizovat některé odkazy, které příští týden bude ukončeno. Také dát odkaz v menu na "Ke stažení" blog, který spojuje do složky, kde Box.net všechny soubory jsou dostupné ke stažení.
Případné dotazy a zjistíte, že změněný soubor, děkuji informovat mě.
Publikováno v Nezařazené | Uživatelské 2 Komentáře »
Středu 19.srpen 2009 |
Dnes budu demonstrovat, jak vytvořit panel nabídek, krok za krokem, aby více profesionální a jen umožní přístup k možnosti, že opravdu záleží na konečného uživatele projektu v aplikaci Access.
Na konci budeme mít panel nabídek, která vypadá jako na obrázku níže.
1 - Jděte do nabídky Nástroje a zvolte 'Přizpůsobit ". Objeví se následující nabídka:
2 - Vyberte si na kartu Panely nástrojů 'a vybrat "New" a zadejte jméno, které chcete dát na panel nástrojů, jsem si vybral "menu". Klikněte na OK a objeví se na panelu nástrojů, který bude pracovat, což pro tuto chvíli nemá žádné možnosti.
3 - S vybrané panelu nástrojů klepněte na tlačítko 'Vlastnosti' a objeví se následující nabídka:
4 - Změnit "typ" na "Panel nástrojů" a potom klepněte na tlačítko Zavřít.
5 - Klikněte na tlačítko 'příkazy' a seznamu na levé straně, který říká 'kategoriích "vyberte' nové menu ', která by měla být na posledním místě. Poté klepněte na pole vpravo PROGRAM 'a táhněte pro nového menu' na našich nabídek, jak ilustrovaný na obrázku níže.
Drag pro nového nabídku 'na našich nabídek, na časy požadované množství nabídek, které musíme v tomto případě budu táhnout třikrát, aby se dvě nabídky a podnabídky. Chcete-li podmenu jednoduše přetáhnout "nové menu do menu. Poznámka: počet nabídek lze později změnit, můžete přidat nebo snížit o kolik potřebujete.
6 - Kliknutím pravého tlačítka myši na horní části panelu nové menu ', z našeho panelu nástrojů a změnit název podle potřeby. V příkladu jsem si vybral "zákazníky 'pro 1. a dodavatelům' pro druhé.
7 - Nyní bychom měli nabídky ve formách, které jsme v úmyslu otevřít. Klikněte na tlačítko 'příkazy' a vyberte kategorii "všechny formy" a na pravé straně se zobrazí všechny existující formuláře v aktuálním projektu. Klepněte na formulář, který chcete a přetáhněte panel nástrojů. V příkladu jsem zvolil různé formuláře a sestavy a také možnost uzavřít exit (Access). V této fázi si můžeme vybrat, co chceme, aby náš panel otevřít stačí vybrat, co chceme v kategoriích (tabulky, formuláře, sestavy, dotazy, nabídky přístupů akce, které se objevují jako menu ve výchozím nastavení, atd.).
8 - Po výběru vše, co chcete mít na našem menu můžete kliknout na každý z nich s pravým tlačítkem myši a zobrazte si vlastnosti, které mohou změnit. Podívejte se na obrázek níže.
"Reset" - slouží k dát předmět byl původně před změnit název obrazu, atd..
"Delete" - odstranit položku
"Název" - změnit název položky menu. Zde můžeme také nastavit zástupce k dané položce pomocí ampersand před písmeno, které chcete použít jako klávesovou zkratku. Například, Exit možnost ve výchozím nastavení je již velmi dobře a Konec se zobrazí nabídka písmeno 'R' zdůraznil, že nám říká, že při použití klávesy ALT + R spouští Exit menu. V příkladu jsem se rozhodl otevřít Klienti a klienta pomocí klávesové zkratky Alt + C.
"Kopírovat / vložit / reset / upravit / změnit obrázek tlačítka" - tyto příkazy jsou používány k práci přesně obrazu, který chceme vidět u každé položky. Můžeme kopírovat a vložit obrázek pro použití v jiné položky, obnovit původní obrázek, upravte obraz a udělat ikonu editoru (pixel po pixelu) nebo vybrat obrázek k dispozici v nabídce změny.
Pak jsme si mohou vybrat aspekt tohoto bodu, tedy pokud chceme pouze text, nebo text a obrázek.
"Start skupinu" - slouží k oddělení položek podle hrazdou, nebo vytvářet skupiny položek.
"Odkaz grant" - přiřadit odkaz na jeden URL nebo jiného předmětu, v databázi.
"Vlastnosti" - zobrazí všechny vlastnosti položky.
9 - Teď, když máme nabídek jsme připraveni zavést. Za tímto účelem klikněte na zavírací tlačítko a přetáhněte naše menu na horní obrazovce, dokud si vložit na místo, kde je bar výchozí přístup.
10 - Chcete-li spustit panel otevřít databázi dát pokyn k zahájení při spuštění aplikace Access. Nechte 'Tools' a "Start" a "Menu Bar" vyberte jméno naší nabídce v tomto příkladu v menu ".
11 - Chcete-li změnit představy o jednotlivých položkách menu můžeme použít jiný způsob je vložit obrázek do stejné formě a kopie pro položku. To je:
- Vytvořit formulář v podobě struktury
- Jděte do nabídky Vložit a vyberte obrázek
- Vyberte si jakýkoliv obrázek a stiskněte Enter
- Vyberte image a pravým tlačítkem myši zvolte Kopírovat
- Jděte do nabídky Nástroje a zvolte možnost přizpůsobit
- Klepněte pravým tlačítkem myši na položku, kterou chcete změnit obrázek a zvolte tlačítko Vložit obrázek.
- Kliknutím na úzkou a dobrý přístup
- Spuštění databáze vidět výsledek
DŮLEŽITÉ UPOZORNĚNÍ: Při výměně panel nabídek, menu zmizí v databázi aplikace Access, se to dělá. Chcete-li provést změny v ní je nutné začít databáze klávesu SHIFT.
Moje nabídka vypadá takto:
Download: Menu Bar
Publikováno v Nezařazené | Uživatelské 9 komentářů »
Středa 20 květen 2009 |
Můžeme zabránit zprávu otevřenou, pokud nebudou údaje, které ukazují, ak tomu používají dva způsoby v závislosti na verzi Access:
1 - Všechny verze aplikace Access
Umístěte níže uvedený kód ve vlastnostech zprávy z akce čímž se umožní států
Pomocí událostí Povolení (Aktivovat) Zpráva:
Private Sub Report_Activate ()
Pokud DPOČET ("*", Me.RecordSource) = 0 Then
MsgBox "Žádné záznamy k zobrazení" vbDefaultButton1, "Chyba!"
AcReport DoCmd.Close, "Zpráva o jméno"
End If
End Sub
2 - Od verze 7 odst. Access 95) byla přidána akce ", pokud No Data ', pak můžeme urilizar následující kód:
Private Sub Report_NoData (Cancel As Integer)
MsgBox "Žádné údaje ve zprávě.", VbInformation, "Chyba!"
Storno = True
End Sub
Chcete-li vidět běžící stáhnout příklad: Zabránit úvodní zprávu
Publikováno v Nezařazené | Uživatelské 13 Komentáře »
