ThaiPBL.com

PowerBuilder Library Thailand

อีเมล พิมพ์ PDF

เรื่องของ API

สวัสดีครับ ช่วงนี้ก็มีแต่เรื่องของ API เยอะหน่อยนะคงไม่เบื่อนะครับ วันนี้เราจะมาดูเรื่องของการอ่านไฟล์และวันเวลาที่บันทึกไฟล์นั้นๆกัน เหมือนเดิมครับ เปิด วินโดวส์เพนเตอร์กันเลยครับ
บทความมาจาก www.soopawat.com

 แล้วก็วาง object sle 2 อัน กับ commandbutton หนึ่งอันดังรูปครับ บทความมาจาก www.soopawat.com



ที่ cb_1 ให้วางสคริปต์ลงไปที่ clicked event ดังนี้ครับ string ls_pathname, ls_filename
WIN32_Find_DataA lfd_lpFindFileData, lfd_lpFindFileData_Local
SystemTime lst_lpSystemTime

if GetFileOpenName ("Pick Any File", ls_pathname, ls_filename) > 0 then
sle_filename.Text = ls_pathname
FindFirstFile (ls_pathname, lfd_lpFindFileData)
FileTimeToLocalFileTime(lfd_lpFindFileData.ftlastwritetime, lfd_lpFindFileData_Local.ftlastwritetime)
if FileTimeToSystemTime (lfd_lpFindFileData_Local.ftlastwritetime, lst_lpSystemTime) then
sle_timestamp.Text = string (datetime(date(lst_lpSystemTime.wyear, &
lst_lpSystemTime.wmonth, lst_lpSystemTime.wday),time(lst_lpSystemTime.whour, &
lst_lpSystemTime.wminute, lst_lpSystemTime.wsecond)), "mm/dd/yyyy hh:mm:ss")
end if
end if จากนั้นก็ทำการ save และรันดูนะครับ ไม่ยากใช่มั๊ยครับ ลองทำดูแล้วจะรู้ครับ หรือถ้าขี้เกียจพิมพ์ก็ Download ไฟล์ไปเลยก็ได้ครับ