Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Copy from exe to windows
Message
From
16/07/2004 04:24:11
 
 
To
15/07/2004 14:18:07
General information
Forum:
Visual FoxPro
Category:
Installation, Setup and Configuration
Miscellaneous
Thread ID:
00921092
Message ID:
00925062
Views:
40
Am i going to wrong.

I replace i file name"khubaib.dll in table name"table1"
i thing i am missing something or any mistake.
I am not getting file "khubaib.dll in windows\system32

pls help me more

Function ExtractFile(khubaib.dll As String, tcDestPath As String)
LOCAL lcDestFilename
IF !USED("table1")
USE table1 IN 0
ENDIF
*SELECT curFileStore
SELECT table1
LOCATE ALL FOR khubaib.dll=tcFilename
lcDestFilename = ADDBS(tcDestPath)+tcFilename
STRTOFILE(table1.khubaib.dll,lcDestFilename)
Return(FILE(lcDestFilename))
Endfunc
Declare Integer GetSystemDirectory In Kernel32.Dll ;
STRING @lpBuffer, Integer lnSize

lcFolder = Space(255)
lnLength = GetSystemDirectory(@lcFolder,255)
If lnLength>0
lcFolder = Left(lcFolder,lnLength)
Endif

ExtractFile("khubaib.dll",lcFolder)
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform