|
of_getcurrentdirectory
|
|
Full name
|
pfc_n_cst_filesrvwin32.of_getcurrentdirectory
|
Access
|
public
|
Extend of
|
string
|
Return value
|
string
|
Prototype
|
public function string of_getcurrentdirectory()
|
Name
|
Datatype
|
ls_CurrentDir
|
string
|
lul_Rc
|
ulong
|
lul_size
|
ulong
|
public function string of_getcurrentdirectory ();//////////////////////////////////////////////////////////////////////////////
// Public Function: of_GetCurrentDirectory
// Arguments: None
// Returns: string The current working directory, "" if error
// Description: Return the current working directory
//////////////////////////////////////////////////////////////////////////////
// Rev. History: Version
// 5.0 Initial version
// 5.0.03 Changed Uint variables to Ulong for NT4.0 compatibility
//////////////////////////////////////////////////////////////////////////////
// Copyright © 1996-1999 Sybase, Inc. and its subsidiaries. All rights reserved. Any distribution of the
// PowerBuilder Foundation Classes (PFC) source code by other than Sybase, Inc. and its subsidiaries is prohibited.
//////////////////////////////////////////////////////////////////////////////
ulong lul_size = 260 // MAX_PATH
ulong lul_Rc
string ls_CurrentDir
ls_CurrentDir = Space (lul_size)
lul_rc = GetCurrentDirectoryA(lul_size, ls_CurrentDir)
if lul_rc > 0 THEN
return ls_CurrentDir
else
return ""
end if
end function