PDA

Visualizza la versione completa : [VB] FileSystem Object


coniglio
30-10-2002, 17:55
Ciao
Scusate se è banale....
E' normale pur settando il File Sistem Object in questo modo
Set fso = CreateObject("Scripting.FileSystemObject")
non mi restituisca le proprietà di fso?
ES
Se scrivo
Dim OggFolder, origine
origine = "c:\prova"
Set fso = CreateObject("Scripting.FileSystemObject")
Set OggFolder = fso._______Non mi restituisce il menu delle proprietà!
:bhò:

amodio
30-10-2002, 18:34
sai una cosa neanche a me
pero se lo scrivi tu il codice
funziona!!!
prova oh beh a me andava bene
anche se uso la semplice istruzione open per aprire file in quanto
filesystem obujec mi da errore sul norton antivirus

coniglio
31-10-2002, 09:37
Ora provo grazie!
Ma come lo devo settare?
grazie:adhone:

maleresidente
31-10-2002, 10:36
ma stai lavorando in visual basic o in vbscript?

se in visual basic hai messo nei riferimenti la libreria "Microsoft scripting runtime"?

questo è un esempio che funziona:

Dim fso As Scripting.FileSystemObject
Dim myFolder As String
Set fso = CreateObject("Scripting.FileSystemObject")
fso.GetFolder (myFolder)

ciao.

coniglio
31-10-2002, 14:56
Si ma così uso il fileSystem Object.....
Comunque grazie.
Visto che sono agli inizi mi spieghi a cosa servono i riferimenti di "Microsoft scripting runtime"?
Mi spiegate anche come potrei fare per aggiungere righe ad un file di testo senza cancellare il resto del testo?
Grazie mille:fagiano:

maleresidente
31-10-2002, 15:42
Originariamente inviato da coniglio
Si ma così uso il fileSystem Object.....
Comunque grazie.
Visto che sono agli inizi mi spieghi a cosa servono i riferimenti di "Microsoft scripting runtime"?
Mi spiegate anche come potrei fare per aggiungere righe ad un file di testo senza cancellare il resto del testo?
Grazie mille:fagiano:

Allora quando usi un riferimento significa che includi nel tuo progetto una libreria di funzioni, in realtà in vb si chiamano metodi, proprietà e eventi. per vedere proprietà e metodi di un oggetto devi aprire il visualizz. oggetti con F2

per aggiungere righe ad un file devi aprire tale file in modalita APPEND:
es.
Dim sMyFile As String
Dim iNumFile As Integer
Dim sBuff As String
sMyFile = "c:\temp\prova.txt"

iNumFile = FreeFile
sBuff = "ciao ciao"
Open sMyFile For Append As iNumFile
Write #iNumFile, sBuff
Close iNumFile


ciao.

coniglio
04-11-2002, 09:45
Graxie!
Funziona perfettamente ma scusa se ti rompo ancora un po le palle.....
Come funziona?
Me lo spiegheresti?:confused:

maleresidente
04-11-2002, 10:09
come funziona cosa?

coniglio
04-11-2002, 10:19
Voglio dire:
Capisco più o meno tutto ma in che cosa consiste il metodo For Append?
E poi che cosa fai con iNumFile = FreeFile?
E anche non capisco come mai mi aggiunge la riga contenuta nella stringa sBuff ma con le virgolette prima e dopo.
Es
Se io scrivo
sBuff = "prova"
Open sMyFile For Append As iNumFile
Write #iNumFile, sBuff

lui mi scrive nel file

"prova"

e non

prova

Come mai?

maleresidente
04-11-2002, 12:27
Originariamente inviato da coniglio
Voglio dire:
Capisco più o meno tutto ma in che cosa consiste il metodo For Append?
E poi che cosa fai con iNumFile = FreeFile?
E anche non capisco come mai mi aggiunge la riga contenuta nella stringa sBuff ma con le virgolette prima e dopo.
Es
Se io scrivo
sBuff = "prova"
Open sMyFile For Append As iNumFile
Write #iNumFile, sBuff

lui mi scrive nel file

"prova"

e non

prova

Come mai?


allora quando apri un file in modalità append vb ti permette di accodare le successive scritture sul file, tutti le altre modalità
non te lo permettono.

la funzione freefile ti restituisce il primo canale I/O libero che trova.

il fatto che ti tenga le virgolette sulla stringa è dovuto all'istruzione Write, prova a usare la Print
es: print #iNumFile, sBuff

ciao

Loading