发信人: lidux()
整理人: leitiger(2002-06-05 23:49:05), 站内信件
|
【 在 pucj (木头) 的大作中提到: 】
在下愿给你提供一些帮助：用API,下附函数原形：
Function ulong GetDriveTypeA (string drive) library "KERNEL32.DLL"
Function boolean CreateDirectoryA (ref string directoryname, ref os_se
curityattributes secattr) library "KERNEL32.DLL"
Function boolean RemoveDirectoryA (ref string directoryname) library "
KERNEL32.DLL"
Function ulong GetCurrentDirectoryA (ulong textlen, ref string dirtext
) library "KERNEL32.DLL"
Function boolean SetCurrentDirectoryA (ref string directoryname ) libr
ary "KERNEL32.DLL"
Function ulong GetFileAttributesA (ref string filename) library "KERNE
L32.DLL"
Function boolean SetFileAttributesA (ref string filename, ulong attrib
) library "KERNEL32.DLL"
Function boolean MoveFileA (ref string oldfile, ref string newfile) li
brary "KERNEL32.DLL"
Function long FindFirstFileA (ref string filename, ref os_finddata fin
dfiledata) library "KERNEL32.DLL"
Function boolean FindNextFileA (ulong handle, ref os_finddata findfile
data) library "KERNEL32.DLL"
Function boolean FindClose (ulong handle) library "KERNEL32.DLL"
Function boolean GetDiskFreeSpaceA (string drive, ref long sectperclus
ter, ref long bytespersect, ref long freeclusters, ref long totalclust
ers) library "KERNEL32.DLL"
Function ulong GetLastError() library "KERNEL32.DLL"
--
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 202.102.228.36]
|
|