خواندن فایل مخفی

[mehrdadtk]

دوستان سلام برنامه من ،با دستور زیر فایل رو باز می کنه و محتویات رو می خوانه و بعدشم می بنده :


FileOpen(1, "passvausersabtefaktorvaresidha.ini", OpenMode.Input)
Input(1, s)
a = (s)
FileClose()

حالا می خوام محتویات فایل مخفی رو بخونه.میخوام طوری باشه که کاربر بهش دسترسی نداشته باشه.لطفا کمک کنید.
ممنونم.

[ROSTAM2]

FileOpen(1, "passvausersabtefaktorvaresidha.ini", OpenMode.Input)

Input(1, s)

a = (s)

FileClose()

مطمئنی که این دستور درست عمل می کنه؟ :متفکر:

Dim length As Long = FileIO.FileSystem.GetFileInfo(FileName).Length
Dim fo As Integer = 0
fo = IO.File.Open(FileName, IO.FileMode.OpenOrCreate).Read(file, 0, length)
FileClose(fo)

[mehrdadtk]

بله دوست عزیز دارم در حال حاضر با این دستور کار می کنم و کاملا مقدار یک فایل هم می تونم عوض کنم.
دوست عزیز من آدرس فایل رو کجا باید وارد کنم ؟
بجای file چی بنویسم ؟

[ROSTAM2]

دستور پستشماره 2 واسه خوندن فایل بصورت باینریه
file یه آرایه است که مقدار ورودی byref تابع read رو می گیره که همون اطلاعات فایل خونده شده است

اگه برای خوندن و نوشتن رو فایل متنی می خوای ایناهاش

واسه خوندن فایل متنی البته نوع فایل default باسه اگه default ذخیره شده باشه
txt = FileIO.FileSystem.ReadAllText(My.Application.Info. DirectoryPath + "\DirectoryManagementList.dml", System.Text.Encoding.UTF7)

واسه نوشتن تو فایل

FileIO.FileSystem.WriteAllText(FilePath, Text, False/True)