Keskustelu: Ohjelmointikysymykset: [VB6] Listbox -> teksti -> tallennus

Miten voin tallentaa listboxissa olevan listan tekstinä ?

https://www.ohjelmointiputka.net/keskustelu/8543-list-tallenus-tiedotoon

Käyt loopissa läpi sen listan ja keräät kaikki ne kohdat johonkin muuttujaan. Sitten avaat tiedoston ja kirjoitat sen muuttujan sinne.

Dim muuttuja As String

For i = 0 To List1.ListCount - 1
    muuttuja = muuttuja & vbCrLf & List1.List(i)
Next i

Tuosta on varmaan hyvä jatkaa

Ei onnistu, menee virheeeseen.
Tollanen kansio on olemassa. VB sanoo tosta: "Bad filename or number". Mitä vikaa?

Private Sub ccXPButton2_Click()
Dim i As Integer
On Error GoTo virheee
Dim TallennusKansio As String
TallennusKansio = App.Path & "/Ajat" & nimi21.Caption & " " & Form3.rataboxi.Text & " " & Str(Date) & "" & timee.Caption
Open TallennusKansio For Output As #1
   For i = 0 To lista.ListCount - 1
      Print #1, lista.List(i)
   Next i
Close #1
virheee:
MsgBox "Tallennus ei onnistu.", vbCritical
End Sub

Mistä rivistä valittaa?

Uskoisin, että TallennusKansio -muuttujan sisältö ei täsmää siihen mihin sen pitäisi viitata.

Ennenkuin avaat tiedoston, pisteles: msgbox TallennusKansio
ja vertaa sitä siihen, mihin toi pitäisi viitata.

Esimerkiksi: miksi tämmöinen löytyy tuolta:

& "" &

:)

lainaus:

Esimerkiksi: miksi tämmöinen löytyy tuolta:

& "" &

Toi kuuluu siihen tiedostonimeen.
Tiedoston nimi voi olla esim. "Jussi B-Rata 8.1.2006 14:59:32".
Ai niin nimessähän ei saa olla kaksoispisteitä?
Ja tosta puuttuu myös tiedostopääte näköjään. =P
Mä laitoin sen nyt näin, ei tule virhettä, mutta tiedostoa ei tule. Miksi?

Private Sub ccXPButton2_Click()
Dim i As Integer
Dim TallennusKansio As String
TallennusKansio = App.Path & "/Ajat" & nimi21.Caption & Form3.rataboxi.Text & Str(Date) & ".txt"
Open TallennusKansio For Output As #1
   For i = 0 To lista.ListCount - 1
      Print #1, lista.List(i)
   Next i
Close #1
End Sub

Sinulla on taas se kauttaviiva eikä kenoviivaa. "/" on aivan eri asia kuin "\".

Merri kirjoitti:

Sinulla on taas se kauttaviiva eikä kenoviivaa. "/" on aivan eri asia kuin "\".

Vaihdoin sen ja silti ohjelma ei tee mitään. =(

EDIT
Nyt toimii:

 "/ajat" ->  "/ajat/"

=P