[ bobiris @ 12.02.2005. 13:11 ] @
| E, pa ovo je nemoguce!
Ili sam nedaj boze skrenuo s pameti, ili imam dva zarazena racunara, trece nema:
Otvorim blank bazu (Office 2003), napravim jednu tabelu:
Datum (tip ShortDate)
Naziv (tekst)
Iznos (Curency, Euro)
Unesem tri zapisa:
08-01-2004, kamata, 100Eu
10-01-2004, kamata, 50Eu
17-01-2004, kamata, 120Eu
Pomocu carobnjaka napravim dve iste forme na bazi ove jedine tabele u bazi: Form i Form1.
Otvorim Form1 i opet pomocu carobnjaka dodam cmdDugme "openForm", sa parametrima "datum=datum".
Kliknem na to dugme, form1 se otvori, sve prazno
pomerim na drugi zapis (10-01-2004), kliknem, opet sve prazno
pomerim na treci zapis (17-01-2004), kliknem, sve u redu!!
Isprobam sledece datume:
01-01-2004 ne radi
02-01-2004 ne radi
..........
.......... sve do
17-01-2004 RADI!
28-01-2004 ne radi!
17-01-2005 ne radi!
opet se vratim na 17-01-2004 RADI!
akam se od jutros sa ovim problemom i mojom bazom toliko da sam na kraju napravio novu, blank bazu, kako je gore opisano, da bu se uverio da nisam lud.
I OPET NE RADI.
Otvorio sam bazu i na drugom kompjuteru, opet ne radi!
Ima li neko predstavu sta bi moglo da bude? |
[ bobiris @ 12.02.2005. 16:43 ] @
U međuvremenu sam oktrio uzrok, ali ne znam rešenje.
Na kompjuteru imam XP servicepack2. RegionalSetting mi stoji na SerbianCyrilic, datum sam podesio na dd-mm-yyyy. Kada umesto SerbianCyrilic uzmem English-US, bez obzira koji Date separator uzmem ("\" ili "-"), svi datumi funkcionisu kako treba, tj. forma "Form" poziva formu "Form1" i prikazuje datum na kom sam se nalazio u "Form" kada sam pritisnuo dugme za otvaranje Form1.
Probao sam sada da uzmem neki drugi RegionalSettings, na primer "German-Austrija", za ne poverovati da opet ne radi! Samo datum 17-1-2004 radi uvek, bez obzira sta je podeseno u RegionalSetting-u. Da li jos neko hoce da proba, i da li neko zna uzrok zbog cega je to tako? Zašto 17-01-2004 datum radi, a drugi ne?
[ izonic @ 12.02.2005. 22:56 ] @
Private Sub Command6_Click()
On Error GoTo Err_Command6_Click
Dim stDocName As String
Dim stLinkCriteria As String
Dim Dat
Dim SQL As String
Dat = Me.Datum
Dat = "#" & Month(Dat) & "/" & Day(Dat) & "/" & Year(Dat) & "#" 'ovo ce da radi na bilo kom racunaru
SQL = "SELECT Table1.Datum, * FROM Table1 " _
& "WHERE Datum=" & Dat
'M0že i na drugi način a to je da query1 postaviš na recordsource table2
DoCmd.OpenForm "Table2"
Forms!Table2.RecordSource = SQL
Exit_Command6_Click:
Exit Sub
Err_Command6_Click:
MsgBox Err.Description
Resume Exit_Command6_Click
End Sub
Query:::::
SELECT *
FROM Table1
WHERE (((Table1.Datum)=[Forms]![Table1]![Datum]));
[ bobiris @ 16.02.2005. 07:23 ] @
Hvala Izonic, bio sam odsutan. a problem sam bio resio drugacije, kako sam opisao u temi "od datuma do datuma".
pozdrav
Copyright (C) 2001-2025 by www.elitesecurity.org. All rights reserved.