Oldal: 1 / 1
aktuális idő hozzáadása
Elküldve: 2009. május 12., kedd 14:51
Szerző: villanyos
sziasztok !
A problémám a következö lenne .
Szeretném ha az adatbázis feltöltésekor a dátum mezőben mindig az aktuális nap dátuma és az órája lenne látható.
Még nem találtam sehol infót hozzá.
admin: leválasztottam, mert az eredeti témától független a kérdés, legközelebb légyszíves indíts új témát
Re: aktuális idő hozzáadása
Elküldve: 2009. május 12., kedd 15:52
Szerző: r4zoli
Ha csak az új rekord hozzáadásakor lényeges, akkor az Eszközök>SQL... alatt elérhető parancsablakban megadni:
Dátum formátumú mező esetében:
Kód: Egész kijelölése
ALTER TABLE "tabla" ALTER COLUMN "datum" DATE DEFAULT CURRENT_DATE;
Ha dátum/idő a mező formátum:
Kód: Egész kijelölése
ALTER TABLE "tabla" ALTER COLUMN "datum_ido" TIMESTAMP DEFAULT CURRENT_TIMESTAMP;
Az űrlapnál ekkor ezt a mezőt nem kell hozzáadni, vagy a Szerkesztés>Adatbázis>Speciális beállítások alatt a "Űrlap adatbeviteli ellenőrzések " opciót ki kell kapcsolni, de ennek hatását a többi mezőre nem szabad figyelmen kívül hagyni.
Ha a rekordok módosítása is érdekes, akkor az
itt megtalálható makrót kell alkalmazni.
Kód: Egész kijelölése
Sub onUpdateRecord( oEvent as object )
dim oDataForm as variant
dim oStatement as variant
dim oResultSet as variant
if oEvent.Source.SupportsService( "com.sun.star.form.component.DataForm" ) then
if oEvent.Action = com.sun.star.sdbc.ChangeAction.UPDATE then
oDataForm = oEvent.Source
oStatement = oDataForm.ActiveConnection.CreateStatement
oStatement.EscapeProcessing = False
oResultSet = oStatement.executequery( "CALL CURRENT_TIMESTAMP" )
oResultSet.next
oDataForm.updateTimeStamp( oDataForm.FindColumn( "datum_ido" ), oResultSet.getTimestamp( 1 ) )
end if
end if
End Sub
A makrót az űrlap MainForm/Tulajdonságok/Események lap/"Rekord művelet előtt" tulajdonságához kell hozzárendelni.
Mindenhol értelem szerűen a "datum" és a "datum_ido" mezőnevek helyett (a makróban is), a saját mezőneveket kell használni.
Re: aktuális idő hozzáadása
Elküldve: 2009. május 13., szerda 13:11
Szerző: villanyos
Köszönöm
Re: aktuális idő hozzáadása
Elküldve: 2013. december 10., kedd 22:59
Szerző: mytom
Üdvözlet mindenkinek!
Kipróbáltam a 4.1.3 Libre Office-t és a következőbe futottam bele:
MySQL adatbázisban van egy timestamp mező, és ha BASE-el nativ kapcsolat segítségével bemegyek az adatbázisba,
megnyitom a táblát, össze vissza írogat minden féléket a mezőre.
Ezzel kapcsolatban tud valaki segíteni?