SAS INNOVA 6.8 thì chịu nhưng bản cũ 2.2 hồi mới có 200x thì vẫn dùng để học tập đựoc
FUNCTION CheckImage
PRIVATE _check
_check = 1
...
fso = CREATEOBJECT("scripting.FileSystemObject")
IF .NOT. fso.fileexists("..\Pict\sasAbout.jpg")
_check = 0
ELSE
txtfile1 = fso.getfile("..\Pict\sasAbout.jpg")
IF txtfile1.size > 100000
_check = 0
ENDIF
IF txtfile1.size < 99900
_check = 0
ENDIF
ENDIF
[=========> Bổ sung bài viết <=========]
Quote:
Được gửi bởi 10phut
Hi, chào bạn !!!
Các pro có thể dịch lại file này dùm được không.
link :
You must be registered for see links
thanks các pa rất nhiều !!!
email: [email protected]
|
tệp này tương tự hệt bản fast2006.f nhưng sửa lại thành ITG
i:\itg_project_backup\itg-nexe\fxp\smstartup.fxp
trong tệp này có dòng thông báo như dưới đây
"Xin hay lien he voi cong ty ITG, dien thoai: (04) 782 0155 - (04) 212 9985"