Re: Jaka funkcja

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

Article #12

Back to pl.comp.bazy-danych.msaccess Previous Next

#12

From: Alek Dmowski
Date: Tue, 27 Oct 1998 05:56

25 lines
1223 bytes

Siemanko !


Możesz w zdarzeniu "przy bieżącym" wpisać coś takiego:

If IsNull(Me![NazwaPolaZdatą]) Then
    Me![NazwaPolaztekstem]="brak danych"
else
    If DateDiff("m",Me![NazwaPolaZdatą],Date()) > 2 then
        Me![NazwaPolaztekstem]="Album"
    Else
        Me![NazwaPolaztekstem]="Nowość"
    End If
end if

W zdarzeniu "przy wyjściu" pola z datą dajesz:

    Me.Refresh

Pole z tekstem możesz dać zablokowane albo wyłączone.

Pozdrowionka
Alek Dmowski

Ps. gdyby coś nie tak z tym co napisałem (jest 7 rano) to napisz

Technical Details

Message-ID: <713nou$rtp@cu2000.cuprum.com.pl>

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!news.icm.edu.pl!news.nask.pl!news.cuprum.com.pl!news

References: <36350c64.0@news.vogel.pl>

Show Full Headers

Complete Article Headers

Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!news.icm.edu.pl!news.nask.pl!news.cuprum.com.pl!news
From: "Alek Dmowski" <alekd@zgrudna.kghm.com.pl>
Newsgroups: pl.comp.bazy-danych,pl.comp.bazy-danych.msaccess
Subject: Re: Jaka funkcja
Date: Tue, 27 Oct 1998 06:56:32 +0100
Organization: Cuprum 2000
Lines: 28
Message-ID: <713nou$rtp@cu2000.cuprum.com.pl>
References: <36350c64.0@news.vogel.pl>
NNTP-Posting-Host: pomor.zgrudna.kghm.com.pl
X-Newsreader: Microsoft Outlook Express 4.72.2106.4
X-MimeOLE: Produced By Microsoft MimeOLE V4.72.2106.4
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

Reply to Parent Message