Chấm Hỏi - Cộng đồng hỏi đáp
Đặt câu hỏi
Đăng nhập
Hỏi về cách tìm số Serial ổ đĩa cứng trong Viual Foxpro?
Asked
Apr-15-2016
by
Thảo Lem
Mình viết một phần mềm về quản lý bằng Visual FoxPro có bạn nào biết cách lấy số Serial ổ đĩa cứng chỉ mình với. Cảm ơn nhiều.
Follow
0
View
6090
Answer
2
Rosy Nguyễn
answered
Apr-15-2016
Lâu quá không xài, tôi chỉ bạn cách thức thôi nhé, còn câu lệnh chính xác thì quên rồi, bạn mày mò tiếp thử xem. 1- đọc trực tiếp thì không được, chi bằng đi đường tắt để đọc được ser-ial bằng lệnh "VOL" của DOS. câu lệnh: RUN VOL C: >testfile.txt && lưu kết quả lệnh VOL vào file tên là testfile.txt 2- dùng các lệnh mở/ đọc file rồi lấy chi tiết tại 1 vị trí cố định trong file text. Cách này dùng từ VFP 5 khá hiệu quả. Bạn thử tìm xem vị trí ser-ial number trong file text. Bây giờ VFP 9 có lệnh nào nhanh hơn/ trực tiếp hơn không thì tôi không biết, chỉ biết kiểu ... nhà quê này thôi
Chi Thùy
answered
Apr-15-2016
Bạn dùng code này xem: LOCAL lcRootPathName , lcVolumeNameBuffer , lnVolumeNameSize , ; lnVolumeSerialNumber , lnMaximumComponentLength, lnFileSystemFlags , ; lcFileSystemNameBuffer, lnFileSystemNameSize , lcVolname DECLARE INTEGER GetVolumeInformation IN WIN32API ; STRING lpRootPathName,; STRING @lpVolumeNameBuffer,; INTEGER nVolumeNameSize,; INTEGER @lpVolumeSerialNumber,; INTEGER @lpMaximumComponentLength,; INTEGER @lpFlags,; STRING @lpFileSystemNameBuffer,; INTEGER nFileSystemNameSize lcRootPathName = "C:\" lcVolumeNameBuffer = SPACE(256) lnVolumeNameSize = 256 lnVolumeSerialNumber = 0 lnMaximumComponentLength = 256 lnFileSystemFlags = 0 lcFileSystemNameBuffer = SPACE(256) lnFileSystemNameSize = 256 =GetVolumeInformation(@lcRootPathName , @lcVolumeNameBuffer , ; lnVolumeNameSize , @lnVolumeSerialNumber, ; @lnMaximumComponentLength, @lnFileSystemFlags , ; @lcFileSystemNameBuffer , lnFileSystemNameSize ) lcMess=TRANSFORM(lnVolumeSerialNumber) ?lcMess
Câu hỏi liên quan
Hỏi về cách tìm số Serial ổ đĩa cứng trong Viual Foxpro?
Hỏi về cách di chuyển giữa một số địa điểm ở Bali Indonesia?
Chào các chị ạ. Hiện nay ở việt nam hàng fake tràn lan quá. Em mua cũng thấy sợ.Cho em hỏi có ai biết cách ord hãng về k?
Xóa 1 file nặng hơn thùng rác cho phép nhưng không tìm thấy trong thùng rác, vậy file đó ở đâu, còn trong ổ cứng không ?
Cho em hỏi chút. Có cách nào bỏ chữ số trong 1 ô excel. Em cám ơn ?
Hỏi cách phân biệt cách phát âm của "số 8" và "chữ H" trong tiếng Anh?