شئ Stream در ADO

Save and restore data in files with the SaveToFileand LoadFromFile methods.

Stream.LoadFromFile FileName

Stream.SaveToFile FileName,SaveOptions

داکیومنت دو مورد بالا با نوشتاری آنها و آرگومانشان ارائه شده که قبلش حتما باید Stream را فراخوانی کنید بعد از متد Open استفاده کنید.

در لینک زیر متدها و ویژگیها را می توانید ببینید

learn.microsoft.com

ویژگی Type فقط زمانی خواندنی / نوشتنی می شود که موقعیت فعلی در ابتدای Stream باشد (     Position = پوزیشن 0   ) و در هر موقعیت دیگری فقط خواندنی است.این ویژگی تعیین می کند که کدام متدها باید برای خواندن و نوشتن Stream استفاده شوند.برای Stream های متنی از ReadText و WriteText استفاده نُمائید . برای باینری ها از  Read و Write استفاده کنید.

String = Stream.ReadText ( NumChars)

Stream.WriteText Data, Options

Set oStream = CreateObject("ADODB.Stream")
oStream.Open
oStream.Type = 1 'binary type

یک جریان متن یا Text Stream از یک یا چند خط متن تشکیل شده است که می توان آنها را روی یک صفحه نمایش متن محورنوشت تا بتوان آنها را خواند.وقتی آن از یک جریان متنی می خواند، برنامه یک خط جدید در انتهای هر خط 

شئ TextStream برای دسترسی به محتوای فایل های متنی استفاده می شود.("!f.WriteLine("Hello World برای ساختن نمونه ای از شئ TextStream می توان از CreateTextFile یا OpenTextFile متدهای شئ FileSystemObject یا از متد شئ File یعنی OpenAsTextStream استفاده کرد.

مرجع برای استاندارد برنامه نویسی در اکسس البته موارد بالا جزء آموزش اکسس نیست ،  کتابش گرونه ولی مفید

ACCESS  2019 PROGRAMMING : 

• Teaches you how to programmatically create and access database tables and fields.
• Shows you how to insert, update, and delete data via programming code using various data access techniques.
• Gets you proficient creating and running simple and parameterized queries against your Access databases.
• Gets you comfortable using external data sources with Access (Excel, Word, flat files, XML, and SQL Server).
• Teaches you how to take control of your forms and reports by writing programming code known as event procedures.
• Shows you how to use various types of macros and templates.

دیماه ۱۴۰۱ ... اتفاق نادر در مهر آباد :

این فرد گفت: پس از دو ساعت معطلی در داخل هواپیما و گلایه از بابت تأخیر پیش آمده مهمانداران اعلام کردند که به گفته خلبان وزن هواپیما سنگین‌تر از حد مجاز است.

وی ادامه داد: مهمانداران مدعی شدند وزن هواپیما ۱۵۰ کیلوگرم بیشتر از وزنی است که پرواز بتواند در ایمنی کامل و در شرایط آب و هوایی خرم آباد بر زمین بنشیند.

معتمدآریا

قطار یخ زده مشهد ( زائرین امام هشتم و معصومه ) دیماه ۱۴۰۱

این مسافر قطار قم ـ مشهد عنوان کرد: خدمت رسانی، پاسخگویی بسیار ضعیف است حتی به مسافران آب، چای و یا نانی در این ساعات داده نشده است و ما با توجه به اینکه به اردو میرفتیم مواد غذایی که برای اردو تهیه کرده بودیم را بین مردم توزیع کردیم و پس از این اقدام ما تازه خدمه قطار کیک و آبمیوه بین مردم توزیع کردند.

خبرآنلاین: سید علی خان محمدی سخنگوی ستاد امر به معروف و نهی از منکر از امضای تفاهم نامه ای بین این ستاد و قوه قضاییه و بسیج خبرداده تا در هر محله «مساجد» محور اقدامات در حوزه «آسیب‌های اجتماعی» قرار گیرند.

بازدید بانوان شهر تهران به مدت سه روز در روزهای شنبه، یکشنبه و دوشنبه هفته آینده (۲۴ الی ۲۶ دی ماه ۱۴۰۱ ) از ساعت ۹ الی ۱۵ از مجموعه میلاد بازدید کنند.

بانوان علاقه مندان می‌توانند برای بازدید از برج میلاد، در سامانه miladticket.com ثبت نام کرده و روز و ساعت بازدید خود را رزرو کنند.

شرکت بیمه پاسارگاد از سال ۱۳۹۳ تا کنون نسبت به اعطای پوشش هزینه های بیمارستانی (بستری و جراحی) به بیمه شدگان بیمه نامه های عمر و تأمین آتیه اقدام نموده است. چنانچه ذخیره ریاضی (ارزش بازخرید) بیمه نامه به حدنصاب ۲۰,۰۰۰,۰۰۰ ریال رسیده باشد و از تاریخ شروع یا تاریخ تغییرات مالی در بیمه نامه مدت شش ماه سپری شده باشد، این پوشش فعال می شود. سقف پوشش هزینه های بیمارستانی (درمان تکمیلی) در حال حاضر ۳۰۰,۰۰۰,۰۰۰ ریال است.

روش OpenAsTextStream برای باز کردن فایل Text بعلاوه نوشتن و خواندن در آن

به اسناد Office مراجعه کنید.

مثل  روش OpenTextFile از FileSystemObject است بعلاوه روش OpenAsTextStream می تواند برای نوشتن یک فایل نیز استفاده شود.

object.OpenAsTextStream ([ iomode, [ format ]])

imode حالت ورودی و خروجی که عدد 1 برای خواندن 2  نوشتن و 8  اضافه کردن ، format هم باز کردن فایل طبق پیش فرض سیستم یا باز کردن  در حالت Unicode یا Ascii است  اعداد 2-  ، 1 و 0

یا : 

object.OpenTextFile (filename, [ iomode, [ create, [ format ]]])

Set fso=CreateObject("Scripting.FileSystemObject")

Set sFile=fso.OpenTextFile(FileName,ForReadimg,False)

Do While sFile.AtEndOfStream<>True

.

.

Wend

sFile.Colse ' Needs

.CreateObject("Scripting.FileSystemObject")

.CreateTextFile

.GetFile

شئ TextStream برای دسترسی به محتویات فایل های متنی استفاده می شود. از متدهاش می توان به Close ، Read ، ReadAll ، ReadLine و WriteLine اشاره کرد. همچنین دارای خصوصیات یا ویژگیهایی مثل AtEndOfLine و AtEndOfStream است.

Search String :

FileSystemObject ( fso variable )

fso.OpenTextFile

TextStream ( ts variable )

String=ts.ReadAll ' ( Properties )

Str=Instr(1,String,SearchString)

'OpenTextFile ... Using TextStream

With strTextFile

Do Until .AtEndOfStream

Debug.Print .Line & "..." & .ReadLine

Loop

.Close

End With

TextStream

تسهیل دسترسی متوالی به فایل 

Methods of the TextStream Object

Property	Description
Close	Closes an open TextStream file.
Read	Reads a specified number of characters from a TextStream file and returns the resulting string.
ReadAll	Reads an entire TextStream file and returns the resulting string.
ReadLine	Reads an entire line (up to, but not including, the newline character) from a TextStream file and returns the resulting string.
Skip	Skips a specified number of characters when reading a TextStream file.
SkipLine	Skips the next line when reading a TextStream file.
Write	Writes a specified string to a TextStream file.
WriteLine	Writes a specified string and newline character to a TextStream file.
WriteBlankLines	Writes a specified number of newline characters to a TextStream file.

Properties of the TextStream Object

Property	Description
AtEndOfLine	A Boolean indicating whether or not the file pointer is at the end of a line in the text file (used when reading character by character).
AtEndOfStream	A Boolean indicating whether or not the file pointer is at the end of file (used when reading line by line).
Column	The column number of the current character position in a TextStream file.
Line	The current line number in a TextStream file.