Open Statement
Daatu chanele fananno.
Open FileName As String [For Mode] [Access IOMode] [Protected] As [#]FileNumber As Integer [Len = DatasetLength]i37502
FileName: Name and path of the file to open. If you try to read a file that does not exist (Access = Read), an error message appears. If you try to write to a file that does not exist (Access = Write), a new file is created.
Gara: Faylete gara badanno qaraqaale. Addimmo hornyuwa: Maxxagisi (aantete faylera maxxagisi), Laminaate (daatu haare woratenni bayitetenni injeessamanno), Eo (nabbawate daatu chanele fananno), Guma(borreessate daatu chanele fananno), hattono Hedeweelcho(riletive faylla muccisanno).
IoGara: Injo dana tiranno qaraqaale. Addimmo hornyo: Nabbawi(nabbawa calla), Borreessi(Borreessa calla), Nabbawanna Borreessa(lamenka).
Gargaraminoha: fayle fanihu gedensaanni gargarooshshu deerra tiranno qaraqaale. Addimmo Hornyuwa: Guatamme(kayle wole loosansiisonni fa'nama dandiitanno), Nabbawa Wawaansi(fayle nabbawatenni gargarantino), Borreessa Waawaansa( fayle borreessatenni gargarantino),Nabbawa Borreessa Waawaansa(faylete injo diloossanno).
FayleteKiiro: Fano daati chaanale leellishanno 0nni 511 geeshsha noo intijerete handaara. Fayle injeessate hajajo daatu chanale widoonni sayisa daandaatto. Faylete kiiro Fano fooliishsho albanni FanoFayle assishshinni tirama hasiisannosi.
DaatuqinooSeendille: Hedeweelchu injo faylaa, maareekkote seendille qineessi.
Fani fooliishshonni fa'nantino faylete amado calla soorra dandaatto. Balaxxe fa'nantino fayle fanate wo'naalittoro, so'ro sokka leellitanno.
Sub ExampleWorkWithAFile
Dim iNumber As Integer
Dim sLine As String
Dim aFile As String
Dim sMsg As String
aFile = "c:\data.txt"
iNumber = Freefile
Open aFile For Output As #iNumber
#ikiiro attami, "Kuni borrote xuruuraati"
#ikiiro attami, "Kuni wole borrote xuruuraati"
Close #iNumber
iNumber = Freefile
Open aFile For Input As iNumber
While Not eof(iNumber)
Line Input #iNumber, sLine
If sLine <>"" Then
sMsg = sMsg & sLine & chr(13)
End If
Wend
Close #iNumber
MsgBox sMsg
End Sub