PDA

Visualizza versione completa : Gestione File Con Visual Basic


Cucciolo
27-06-2003, 15.46.44
Ciao Amci!!
Mi sapete dire come si fa a:
rinominare un file database
cancellare un file database
creare un file database
con visual basic 6?

{tipo le procedure Rewrite,rename,erase che ci sono in pascal}
grazie!

LoryOne
27-06-2003, 16.49.50
1: rinominare un file database
Name [vecchio database] As [nuovo database]

2:cancellare un file database
Kill [database]

3:creare un file database
metodo CreateDatabase dell'oggetto Database
oppure
Istruzione Open

Ciao :)

Cucciolo
27-06-2003, 17.09.00
ma quando lo devo ricreare, come faccio a dire al programma il nome del file su disco?

LoryOne
27-06-2003, 17.51.12
? :confused:

Intendi dire:
Come faccio a sapere qual'è il nome del database che ho creato ?

Se è così il nome lo sai a priori, visto che per crearlo gli hai dovuto dare un nome, comunque puoi sempre appoggiarti alle proprietà dell'oggetto Database.

Non capisco che vuoi dire.
Hai fatto un esempio citando alcune funzioni in Pascal.
Scrivi il codice di ciò che vorresti dire in Pascal e vediamo se si può tradurre in VB, ok ?

Ciao :)

LoryOne
27-06-2003, 17.54.46
Aspetta.
Tu vorresti ricreare un db con lo stesso nome di quello già presente sull 'HD ma non puoi perchè VB ti da un errore ?
Beh, devi prima assicurarti che il DB con quel nome non sia già presente, in questo caso lo devi prima eliminare.

SEI UNA MENTE CONTORTA LO SAI ? :D :D

Cucciolo
27-06-2003, 19.50.39
una cosa di questo genere, ma con visual basic:
assign(newfile,'c:\..\nomefile.est') //assegna il nuovo file
rewrite(newfile) //crea su disco il nuovo file
[...]
erase(file); //elimina il vecchio file
rename(newfile,'c:\...\nomefilecancellato.est); //rinomina il nuovo file con il nome di quello vecchio

Cucciolo
27-06-2003, 19.52.26
lo so che ho una mente contorta....
....ma e' anche geniale!! :D :D
....e nn solo... :D :D

LoryOne
28-06-2003, 10.38.24
...ti rimando al 2° post.
Avevo capito bene e ti avevo già risposto.

Assign e rewrite sono incluse nell' istruzione Open
Erase si chiama Kill
Rename si chiama Name

Ciao :)

Cucciolo
28-06-2003, 13.11.56
Grazie!
Ti posso chiedere anche un'altra cosetta?

Come si fa a creare un file di testo e a scriverci dentro?

Ciao

LoryOne
28-06-2003, 18.53.12
Istruzione Open
Istruzione Print #
Istruzione Close # o Reset

Ciao :)

Cucciolo
30-06-2003, 17.26.02
Cosi?

Open (CommonDialog1.FileName)

ma nn funziona :mad: :(

Cucciolo
30-06-2003, 18.06.39
Trovato!

:D :D :D
:p :p :p
:) :) :)
:eek: :eek: :eek:

Private Sub Command1_Click()
CommonDialog1.Filter = "Textfile (*.txt)|*.txt"
CommonDialog1.ShowSave
Open CommonDialog1.FileName For Output As #1
Write #1, "Ciao"
Close #1
End Sub

Cucciolo
30-06-2003, 18.16.34
pero' se faccio cosi, nel file mi scrive anche i doppi apicini...

anche se uso una variabile d'appoggio:

dim s as string
s="Ciao"
write #1, s
close #1

nn si puo' fare in modo di non scivere i doppi apici?

LoryOne
30-06-2003, 18.19.51
L'utilizzo di Write # è proprio quello di inserire anche i doppi apici.
L'istruzione Print # invece no.

Ciao :)

Cucciolo
01-07-2003, 10.30.30
Grazie! :)