Gestione File Con Visual Basic

[Cucciolo]

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]

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]

ma quando lo devo ricreare, come faccio a dire al programma il nome del file su disco?

[LoryOne]

?

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]

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 ?

[Cucciolo]

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]

lo so che ho una mente contorta....
....ma e' anche geniale!!
....e nn solo...

[LoryOne]

...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]

Grazie!
Ti posso chiedere anche un'altra cosetta?

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

Ciao

[LoryOne]

Istruzione Open
Istruzione Print #
Istruzione Close # o Reset

Ciao

[Cucciolo]

Cosi?

Open (CommonDialog1.FileName)

ma nn funziona

[Cucciolo]

Trovato!






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]

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]

L'utilizzo di Write # è proprio quello di inserire anche i doppi apici.
L'istruzione Print # invece no.

Ciao

[Cucciolo]

Grazie!