>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


Hey! What you wrote in Extractfile function??????? Is it joke? I am in shock...


>
>Function ExtractFile(tcFilename As String, tcDestPath As String)
> LOCAL lcDestFilename
> IF !USED("table1")
> USE table1 IN 0
> ENDIF

> SELECT table1
> LOCATE ALL FOR table1.Field1=tcFilename && Field1 - its field where stored filename. no binary data.. just filename)

> lcDestFilename = ADDBS(tcDestPath)+tcFilename
> STRTOFILE(table1.Field2,lcDestFilename) && Field2 - its field where stored binary file data, written with filetostr()
> 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)


P.S.
Table1 must have fields FIELD1, FIELD2 and record where FIELD1 = "khubaib.dll", FIELD2 = FILETOSTR("khubaib.dll")