Käytän tällaista tallennusta ohjelmassa/pelissäni
Private Sub save_Click() Dim minne As String minne = InputBox("Kirjoita tiedostonimi?") Open App.Path & "\pelit\tallennus.amp" For Binary As #1 Put #1, , Pelaaja Put #1, , Sukset Put #1, , Monot Put #1, , Divisioona Close #1 End Sub
Olen löytänyt tämän haulla ja haluaisin lisätä tähän että miten voi itse määritellä tiedoston nimen
P.S. .amp = ampumahiihto :D
sori.. ratkaisin ongelman jo
Private Sub save_Click() Dim minne As String minne = InputBox("Kirjoita tiedostonimi?") Open App.Path & "\pelit\" & minne & ".amp" For Binary As #1 Put #1, , Pelaaja Put #1, , Sukset Put #1, , Monot Put #1, , Divisioona Close #1 End Sub
Aihe on jo aika vanha, joten et voi enää vastata siihen.