Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: Jak zrobić w Accesie
anonim




Typ: Nie zarejestrowany
Jak zrobić w Accesie

Jak to zrobić aby automatycznie dodawać nr umowy np 1/2004 przy następnej umowie 2/2004 itd
czy jest prosty sposób zrobienia tego w polu tabeli lub kwerendy

26-02-2004 11:40
  
losmac
"profesorek"




Typ: neutral
Postów: 758
Zarejestrowany: May 2003

Jest sposób!

Musisz mieć 2 pola, np.:
NumerFaktury - typu liczbowego,
DataWystawieniaFaktury - typu data

'funkcja ta pobiera z pola tabeli max. wartosc numeryczną porównując rok z daty i w nowym roku numeruje od początku

Function NastepnyNumer(jakasData as Date) As Long
NastepnyNumer = Nz(Dmax("NumerFaktury","Faktury","Year(DataWystawienia) = " & Year(jakasData)& ",0)+1
End Function

w polu kwerendy lub fomularza łączysz 2 wyrażenia:
pole = NastepnyNumer & "/" & Year([DataWystawienia])

I wszystko gra!


_____________________________________________
POSTULATY STARUSZKA:
1) Ludzie, dbajcie o polszczyznę!!!
2) Ludzie, zadawajcie kompletne pytania, a nie rzucacie ochłapy i trzeba się domyślać o co chodzi!!!

Powodzenia
Maciej Łoś

26-02-2004 21:28
Pokaż profil losmac  Wyślij email do losmac   Odwiedź stronę losmac  
Wszystkich odpowiedzi: 1 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1