 |
|
 |
 | Folosirea fisierelor in Visual Basic |  |
Trimis: 07/07/2007 22:12 |
|
|
| CrIstY |
| Moderator |

 |
 |
| Data inscrierii: 06/Iul/2007 |
| Mesaje: 7 |
|
|
|
 |
 |
 |
|
Pentru deschiderea acestora se foloseste comanda OPEN astfel:
| Citat: |
Open "cale" For Atribut As #numar
|
,unde "cale" este este calea catre fisier, "atribut" este descriptorul operatiilor pe care le putem face.El poate lua urmatoarele valori:
--> Input -- pentru citire.Neexistenta fisierului duce la mesaj de eroare.
-->Output -- pentru scriere.Neexistenta fisierului duce la creearea acestuia.
-->Append -- pentru adaugarea de date la sfarsitul fisierului
-->Binary -- pentru deschiderea fisierului in mod binar
Pentru numar este recomandata utilizarea procedurii FreeFile() care returneaza primul numar disponibil.
Exemple:
| Citat: |
Dim ff As Byte
ff=FreeFile()
Open "c:\autoexec.bat" For Input As ff
|
Scrierea intr-un fisier se poate face cu ajutorul urmatoarelor functii:
-->Write -- se foloseste dupa urmatoarea sintaxa :
| Citat: |
Write #numar, continutul ce se doreste a fi scris
|
-->Print -- se foloseste dupa aceiasi sintaxa ca si Write
-->Put -- se foloseste in cazul fisierelor deschise in mod binar conform sintaxei:
| Citat: |
Put #numar, ,continutul ce se doreste a fi scris
|
Exemple:
| Citat: |
..
Dim s as String
s="test"
Print #ff, s
Write #ff, s
Put #ff, , s
..
|
Citirea dintr-un fisier se poate face cu ajutorul urmatoarelor functii:
-->Input -- se foloseste dupa sintaxa
| Citat: |
Input #numar , sir de variabile sau variabila
|
-->Get -- se foloseste in cazul fisierelor deschise in mod binar conform sintaxei:
| Citat: |
Get #numãr,, variabilã
|
Inchiderea unui fisier se face cu ajutorul comenzii CLOSE astfel :
Pentru ca lucrul cu fisiere si directoare sa fie facil Microsoft$ a creat o multime de functii si procedurii utile.Mai jos se afla o scurta enumerare a lor impreuna cu o descriere:
---> Name As --> redenumeste un fisier sau ii schimba locatia.Se foloseste sub forma :
| Citat: |
Name cale1 As cale2
Name "c:\test.in" As "c:\tset.ni"
Name "c:\test.in" As "d:\test\test.in"
---> FileCopy --> copiaza un fisier.Se foloseste sub forma :
|
FileCopy locatie1, locatie2
FileCopy "c:\test.in", "c:\test\test.in"
---> Kill --> sterge unul sau mai multe fisiere(suporta '*' si '?').Se foloseste sub forma :
| Citat: |
Kill cale
Kill "c:\windows\temp\*.*"
|
---> CurDir$ --> returneaza directorul curent
---> ChDrive --> altera drive-ul\partitia curent\a.Se foloseste sub forma :
ChDrive drive\partitie
ChDrive "D:"
---> ChDir --> schimba directorul curent.Se foloseste sub forma :
| Citat: |
ChDir director
ChDir "c:\windows"
|
---> MkDir --> creaza un director.Se foloseste sub forma :
| Citat: |
MkDir nume_director
MkDir "c:\test"
|
---> RmDir --> sterge un director.Se foloseste sub forma :
| Citat: |
RmDir director
RmDir "c:\test"
|
---> LOF --> returneaza marimea fisierului in octeti.Se foloseste sub forma :
---> EOF --> returneaza "True" in cazul in care s-a atins sfarsitul fisierului.Se foloseste sub forma :
Made by Trimbitas Sorin |
|
_________________ "Remember my name... You'll be screaming it later!!" <a href="http://no-coment.ro">My Site </a>
[/URL]
Shot at 2007-07-06 |
|
|
|
|
|
Fa-ti si tu propriul forum GRATUIT, pe www.myforum.ro
|
|