سوال: يك دستور براي خواندن فايل [بایگانی]

View Full Version : سوال: يك دستور براي خواندن فايل

xxxxx_xxxxx

سه شنبه 07 خرداد 1387, 17:32 عصر

كسي در مورد قسمت Bold شده اين دستور چيزي مي دونه؟
براي خواندن كل فايل به صورت باينري استفاده مي شود

Open "C:\a.exe" For Binary As #1
src = Input(LOF(1), 1)
Close #1
و LOF مخفف چيست؟

اوبالیت به بو

سه شنبه 07 خرداد 1387, 18:02 عصر

تابع LOF (Long Of File) سايز فايل رو برمي گردونه. شماره فايل رو به عنوان پارامتر دريافت مي كنه و اندازه فايل رو برحسب بايت به عنوان خروجي تحويل مي ده
در اينجا LOF(1),1 عبارت قرمز شده شماره فايل هستش.

xxxxx_xxxxx

سه شنبه 07 خرداد 1387, 18:08 عصر

تابع LOF (Long Of File) سايز فايل رو برمي گردونه.

ولی در متغیر src محتویات فایل a.exe به صورت باینری قرار می گیرد

vbhamed

سه شنبه 07 خرداد 1387, 18:59 عصر

سلام

پارامتر اول تابع Input مقدار بايتي هست كه از فايل بايد خونده بشه و پارامتر دوم شماره فايلي كه بايد از اون خونده بشه
پارامتر تابع Lof هم شماره فايلي هست كه بايد طول اون فايل محاسبه بشه
اين دستور با تابع Lof طول فايل رو محاسبه مي كنه و با تابع Input به مقدار طول فايل مي خونه