Opslaan bestand

[ardkapteijn]

hallo,

ik ben voor school een programma aan het schrijven voor het berekenen van een afsluiter, gaat allemaal goed tot het opslaan.

met een dirbox heb ik de locatie aangewezen en deze samengevoegd met het bestand.. alleen nu wil die hem niet op slaan op deze locatie... Wat doe ik nu verkeerd?

of heeft iemand een voorbeeldje hoe je heel simpel een textbestand kan aan maken en opslaan? of zelfs printen?


Public Sub cmdPrint_Click()
Dim bestandsnaam As String
Dim locatie As String

bestandsnaam = "RSBV_calculations.txt"
locatie = Dir1 + bestandsnaam
Open locatie For Output As #1
MsgBox ("Information wil be stored ad:" & locatie)
cmdPrint.Enabled = False

End Sub

groeten,

Ard

 

[Tardis]

Hallo Ard,

je hebt het zo te zien over VBA, niet over VB
Je code is in ieder geval niet jofel.
Wat je code dan wel moet zijn is uit je vraagstelling niet af te leiden.

Dat programma, waarmee maak je dat, MS Access?
Het tekstbestand, waar komt dat juist vandaan?

Even wat meer en duidelijke info.

Groet,

Tardis

 

[ardkapteijn]

Hallo Ard,

je hebt het zo te zien over VBA, niet over VB
Je code is in ieder geval niet jofel.
Wat je code dan wel moet zijn is uit je vraagstelling niet af te leiden.

Dat programma, waarmee maak je dat, MS Access?
Het tekstbestand, waar komt dat juist vandaan?

Even wat meer en duidelijke info.

Groet,

Tardis

Dat mijn code niet helemaal jofel is weet ik, dit is de basis, maar omdat ik niet verderkom heb ik het nog niet netjes gemaakt.

Gaat mij erom om van de uitkomsten die in een textbox staan op de kunnen slaan in een nieuw aan te maken tekstbestand, op een locatie door de gebruiker aangewezen word.