11-03-2019, 01:17 PM
كود :
oFSO := CreateoleObject('Scripting.FileSystemObject') ;
//هنا الخطا oFile := oFSO.GetFile(filename) ;
oStream := oFile.OpenAsTextStream(1) ;
sSourceFile:=oStream.ReadAll ;
oStream.Close ;11-03-2019, 01:17 PM