ich versuche gerade CLICK! zum Laufen zu bringen.
Leider erhalten ich einen Fehle:
Code: Alles auswählen
Xbase++ Version : Xbase++ (R) Version 1.90.355
Betriebssystem : Windows Vista 06.01 Build 07601 Service Pack 1
-----------------------------------------------------------------------
oError:args :
-> VALTYPE: C VALUE: ▬\»×╚☺
-> VALTYPE: D VALUE: 19800101
oError:canDefault : N
oError:canRetry : N
oError:canSubstitute: J
oError:cargo : NIL
oError:description : Parameter hat falschen Typ
oError:filename :
oError:genCode : 2
oError:operation : < ▬\»×╚☺> - <19800101>
oError:osCode : 0
oError:severity : 2
oError:subCode : 3
oError:subSystem : BASE
oError:thread : 1
oError:tries : 0
-----------------------------------------------------------------------
CALLSTACK:
-----------------------------------------------------------------------
Aufgerufen von TD2JUL(48)
Aufgerufen von MAIN(450)
Code: Alles auswählen
FUNCTION GetFileTime(cFile)
LOCAL cCreation := SPACE(8), cAccess := SPACE(8), cWrite := SPACE(8)
LOCAL nKernel32Dll:=DllLoad("Kernel32.dll")
LOCAL nH := FOPEN(cFile, FO_READ+FO_SHARED )
LOCAL aTime := {}
If nKernel32Dll > 0 .AND. nH # -1
IF DllCall(nKernel32Dll, DLL_STDCALL, 'GetFileTime', nH, @cCreation, @cAccess, @cWrite) # 0
AADD( aTime, cCreation )
AADD( aTime, cAccess )
AADD( aTime, cWrite )
ENDIF
DllUnload(nKernel32Dll)
EndIf
IF nH # -1
FCLOSE(nH)
ENDIF
Return aTime
Könnte das evtl. mit dem verwendeten Windows 7 64 Bit zusammen hängen?
Habe leider momentan keinen Plan, deswegen bitte ich Euch um Unterstützung.
Danke
Gruß aus Hessen
Frank