Salvataggio in VB 6

superchip · 18-10-2003, 14:51

Salve a tutti!

da un po' di tempo mi sto interessando al linguaggio VB. Ho comprato uno di quei libretti che si vendono a pochi euro, poi sono passato a studiarlo da solo, con l'aiuto della msdn library. Ora, sto cercando di capire quale istruzione sia necessaria, affinchè possa far salvare al programmino che ho creato, un file.
Ho letto da questo libretto che bisogna inserire il microsoft common dialog control 6.0. . Fin qui funziona tutto. Ma nel momento cruciale del salvataggio con l'estensione del file che desidero... non salva. Che istruzione devo utilizzare per far salvare un oggetto con una determinata estenzione?

Please Help....

Bye

cionci · 18-10-2003, 18:35

Non ho capito...vuoi far apparire un dialogo con la scelta del nome del file da salvare o vuoi sapere come si scrive su un file in VB ?

superchip · 19-10-2003, 08:13

praticamente si...

cionci · 19-10-2003, 09:35

Quale delle due cose ?!?!?

matpez · 19-10-2003, 13:18

Quote:

Originariamente inviato da cionci
Quale delle due cose ?!?!?

Vai cionci...siccome mi precedi sempre nelle risposte (probabilmente vivi nello scantinato dei server hwupgrade

) ti lascio rispondere a te

ciaooooooooooooooooooooo

superchip · 19-10-2003, 16:11

La schermata del dialog mi appare. Il problema è far salvare l'oggetto (che nel mio caso è un "text") sottoforma di file con estensione .txt .

matpez · 19-10-2003, 16:47

L'oggetto Common Dialog non salva direttamente sul file, ma serve solo per selezionare il file su cui salvare, il salvataggio del file lo devi fare a mano.

Per esempio per scrivere un file di testo si fa cosi:

Codice:

Private Sub Form_Load()
  
  Dim nFreeFile
  
  
  CommonDialog1.Filter = "File di testo (*.txt)|*.txt"
  CommonDialog1.ShowSave
    
  nFreeFile = FreeFile
  Open CommonDialog1.FileName For Output As #nFreeFile
    Print #nFreeFile, "Prima Informazione"
    Print #nFreeFile, "Seconda Informazione"
    Print #nFreeFile, "e cosi via..."
  Close #nFreeFile
  
End Sub

PS: scusa cionci ma visto che n rispondevi tu e lui aveva bisogno glielo detto io

superchip · 19-10-2003, 17:36

Uao!, non so come ringraziarvi (entrambi xkè mi avete dedicato un po' del vostro tempo) finalmente gira!

sono riuscito a salvare il mio primo file in formato txt!!.
Non vorrei, sembrare impertinente... o rompi, ma, come si può fare il procedimento inverso? ovvero caricare su un oggetto il file?

grazie ancora!!

matpez · 19-10-2003, 18:18

Ecco a te:

Codice:

Private Sub Form_Load()
  
  Dim nFreeFile     As Integer
  Dim sFile         As String
  Dim sAux          As String
  
  
  CommonDialog1.Filter = "File di testo (*.txt)|*.txt"
  CommonDialog1.ShowOpen
    
  nFreeFile = FreeFile
  sFile = ""
  Open CommonDialog1.FileName For Input As #nFreeFile
  While Not EOF(nFreeFile)
    Line Input #nFreeFile, sAux
    sFile = sFile & sAux & vbCrLf
  Wend
  Close #nFreeFile
  
End Sub

Buon divertimento

superchip · 19-10-2003, 19:05

Sono ancora io... sapreste dirmi per favore come posso far tornare a capo automaticamente il cursore del text dopo che ci ho scritto con un'istruzione? (già attivato multiline e scrollbars)

thank you

matpez · 19-10-2003, 20:01

Basta che ci metti il vbCrLF

Codice:

text1=text1 & vbcrlf

ciaoooooooo

superchip · 21-10-2003, 18:21

Grazie mille!! Funziona tutto!!

matpez · 21-10-2003, 23:12

Di nulla

superchip · 31-10-2003, 16:27

Anche se comunque non sto più seguendo il titolo della discussione... c'è qualcuno che sappia come posso selezionare automaticamente una parte di una stringa? Per essere + espliciti... se in una stringa "Come stai?" volessi soltanto selezionare automaticamente (senza utilizzare il seltext) i caratteri "me s", come posso fare? E' possiblie rendere il seltext qualcosa di automatico, senza il bisogno della selezione da parte dell'utente?

18-10-2003, 14:51	#1
superchip Senior Member Iscritto dal: Oct 2003 Messaggi: 1022	Salvataggio in VB 6 Salve a tutti! da un po' di tempo mi sto interessando al linguaggio VB. Ho comprato uno di quei libretti che si vendono a pochi euro, poi sono passato a studiarlo da solo, con l'aiuto della msdn library. Ora, sto cercando di capire quale istruzione sia necessaria, affinchè possa far salvare al programmino che ho creato, un file. Ho letto da questo libretto che bisogna inserire il microsoft common dialog control 6.0. . Fin qui funziona tutto. Ma nel momento cruciale del salvataggio con l'estensione del file che desidero... non salva. Che istruzione devo utilizzare per far salvare un oggetto con una determinata estenzione? Please Help.... Bye __________________ Mac user Utenti con cui ho felicemente trattato (come venditore): Sub_mariner, Wolftail, VIRGINBLACK, filippofab, Giankarlo, Francizio, alexmhr250, ciccillover, cardpi, Rei&Asuka, davelau, MyWay75, Don Peppone, Cippoleo

19-10-2003, 08:13	#3
superchip Senior Member Iscritto dal: Oct 2003 Messaggi: 1022	praticamente si... __________________ Mac user Utenti con cui ho felicemente trattato (come venditore): Sub_mariner, Wolftail, VIRGINBLACK, filippofab, Giankarlo, Francizio, alexmhr250, ciccillover, cardpi, Rei&Asuka, davelau, MyWay75, Don Peppone, Cippoleo

19-10-2003, 16:11	#6
superchip Senior Member Iscritto dal: Oct 2003 Messaggi: 1022	La schermata del dialog mi appare. Il problema è far salvare l'oggetto (che nel mio caso è un "text") sottoforma di file con estensione .txt . __________________ Mac user Utenti con cui ho felicemente trattato (come venditore): Sub_mariner, Wolftail, VIRGINBLACK, filippofab, Giankarlo, Francizio, alexmhr250, ciccillover, cardpi, Rei&Asuka, davelau, MyWay75, Don Peppone, Cippoleo

19-10-2003, 16:47	#7
matpez Senior Member Iscritto dal: Aug 2002 Città: Biella Messaggi: 1882	L'oggetto Common Dialog non salva direttamente sul file, ma serve solo per selezionare il file su cui salvare, il salvataggio del file lo devi fare a mano. Per esempio per scrivere un file di testo si fa cosi: Codice: Private Sub Form_Load() Dim nFreeFile CommonDialog1.Filter = "File di testo (.txt)\|.txt" CommonDialog1.ShowSave nFreeFile = FreeFile Open CommonDialog1.FileName For Output As #nFreeFile Print #nFreeFile, "Prima Informazione" Print #nFreeFile, "Seconda Informazione" Print #nFreeFile, "e cosi via..." Close #nFreeFile End Sub PS: scusa cionci ma visto che n rispondevi tu e lui aveva bisogno glielo detto io

19-10-2003, 17:36	#8
superchip Senior Member Iscritto dal: Oct 2003 Messaggi: 1022	Uao!, non so come ringraziarvi (entrambi xkè mi avete dedicato un po' del vostro tempo) finalmente gira! sono riuscito a salvare il mio primo file in formato txt!!. Non vorrei, sembrare impertinente... o rompi, ma, come si può fare il procedimento inverso? ovvero caricare su un oggetto il file? grazie ancora!! __________________ Mac user Utenti con cui ho felicemente trattato (come venditore): Sub_mariner, Wolftail, VIRGINBLACK, filippofab, Giankarlo, Francizio, alexmhr250, ciccillover, cardpi, Rei&Asuka, davelau, MyWay75, Don Peppone, Cippoleo

18-10-2003, 18:35	#2
cionci Senior Member Iscritto dal: Apr 2000 Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29 Messaggi: 53971	Non ho capito...vuoi far apparire un dialogo con la scelta del nome del file da salvare o vuoi sapere come si scrive su un file in VB ?

19-10-2003, 09:35	#4
cionci Senior Member Iscritto dal: Apr 2000 Città: Vicino a Montecatini(Pistoia) Moto:Kawasaki Ninja ZX-9R Scudetti: 29 Messaggi: 53971	Quale delle due cose ?!?!?

19-10-2003, 19:05	#10
superchip Senior Member Iscritto dal: Oct 2003 Messaggi: 1022	Sono ancora io... sapreste dirmi per favore come posso far tornare a capo automaticamente il cursore del text dopo che ci ho scritto con un'istruzione? (già attivato multiline e scrollbars) thank you __________________ Mac user Utenti con cui ho felicemente trattato (come venditore): Sub_mariner, Wolftail, VIRGINBLACK, filippofab, Giankarlo, Francizio, alexmhr250, ciccillover, cardpi, Rei&Asuka, davelau, MyWay75, Don Peppone, Cippoleo

19-10-2003, 20:01	#11
matpez Senior Member Iscritto dal: Aug 2002 Città: Biella Messaggi: 1882	Basta che ci metti il vbCrLF Codice: text1=text1 & vbcrlf ciaoooooooo

21-10-2003, 18:21	#12
superchip Senior Member Iscritto dal: Oct 2003 Messaggi: 1022	Grazie mille!! Funziona tutto!! __________________ Mac user Utenti con cui ho felicemente trattato (come venditore): Sub_mariner, Wolftail, VIRGINBLACK, filippofab, Giankarlo, Francizio, alexmhr250, ciccillover, cardpi, Rei&Asuka, davelau, MyWay75, Don Peppone, Cippoleo

21-10-2003, 23:12	#13
matpez Senior Member Iscritto dal: Aug 2002 Città: Biella Messaggi: 1882	Di nulla

31-10-2003, 16:27	#14
superchip Senior Member Iscritto dal: Oct 2003 Messaggi: 1022	Anche se comunque non sto più seguendo il titolo della discussione... c'è qualcuno che sappia come posso selezionare automaticamente una parte di una stringa? Per essere + espliciti... se in una stringa "Come stai?" volessi soltanto selezionare automaticamente (senza utilizzare il seltext) i caratteri "me s", come posso fare? E' possiblie rendere il seltext qualcosa di automatico, senza il bisogno della selezione da parte dell'utente? __________________ Mac user Utenti con cui ho felicemente trattato (come venditore): Sub_mariner, Wolftail, VIRGINBLACK, filippofab, Giankarlo, Francizio, alexmhr250, ciccillover, cardpi, Rei&Asuka, davelau, MyWay75, Don Peppone, Cippoleo

Strumenti
Mostra una versione stampabile Invia questa pagina per email