VB中得到当前目录API定义 (转)[@more@]在
程序中,为了得到当前工作目录,使用了
api函数GetCurrentDirectory,使用工具API Text Viewer中定义:
Public Declare Function GetCurrentDirectory Lib "kernel32" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
结果在程序出现 “实时错误‘453’,找不到DLL入口点 GetCurrentDirectory in kernel32 ",标准定认也会出错,当时也不相信,并且此函数刚在编的VC程序中
调用。于是用VC所带具DEPENDS.EXE打开kernel32.dll
文件,查找入口函数,发现有GetCurrentDirectoryA和GetCurrentDirectoryW两个函数,更改函数定义为:
Public Declare Function GetCurrentDirectoryA Lib "kernel32" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
程序通过。
注:操作
系统为98第二版
来自 “ ITPUB博客 ” ,链接:https://blog.itpub.net/10748419/viewspace-1006890/
,如需转载,请注明出处,否则将追究法律责任。