| |
|
|
Muemmelmann | ¡Hola, encima zwei Jahre ging alles bien, nu braucht Yo otra vez veces Ayuda, Yo Kriegs no hin si wohl lo pipieinfach es :
habe una Datum en el Form "24.12.2016" y el heutige Datum en gleicher Form y möchte gerne ausgeben, como viele Tage zwischen esta beiden Tagen mentira...
vielen Dank una vez más y no lachen!!!
Saludo Uwe |
|
|
| |
|
|
|
Muemmelmann | así, Foro ha ya geholfen, ahora Yo lo, war sí simplemente
Conjunto("ErrorLevel", 0) declarar Datum1$,Datum2$,Diff% 'Eingelesene Werte zB Datum1$=20161001 Datum2$=20161030 '+----------------------------------------------
Proc DeltaTage_DB_Format
'+---------------------------------------------- 'Berechnet Anzahl de Tagen zwischen 2 Datumswerten 'Parameter: Anfang, Ende en Datenbankformat 'Rückgabe Differenz Tage Integer Parámetros Von$,Bis$ Volver dt("DaysBetween", dt("setdate",DToC$(Von$)), dt("setdate",DToC$(Bis$)))
endproc'DeltaTage_DB_Format
' Hauptprogramm Diff% = DeltaTage_DB_Format(Datum1$,Datum2$) messagebox(str$(diff%),"Differenz-Tage",0) |
|
|
| |
|
|