Open App.Path & "\Summan.txt" For Output As #1 Ajjabajja. Inga korsreferenser. Blir spagettikod så småningom. Bra att veta, men som du antagligen redan visste om. HejSkriva till fil
Print #1, Text25.Text;"
Close #1
Detta går ju bra när det ligger i samma Form
Men om scriptet ligger i Form2 men text25 ligger i Form1
Hur gåra då?
SörenSv: Skriva till fil
Stoppa detta i en modul eller klass:
Public Sub WriteData(myText As String)
Open App.Path & "\Summan.txt" For Output As #1
Print #1, myText
Close #1
End Sub
och i form1:
WriteData form1.Textboxen
om du nödvändigtvis måste ha funktionen i form2, gör enligt inlägget ovan. Dock avråder jag dig från det. I stora projekt är sån kod kass!Sv: Skriva till fil
#1 är inte alltid 100% säker.
Kör istället:
Dim intFreeFile As Integer
intFreeFile = Freefile
och använd sedan #intFreeFile när du öppnar och stänger filen...Sv: Skriva till fil
>#1 är inte alltid 100% säker.
Det lönar sig inte ,anonyme Sören läser inte svaren
Har påpekat detta och mycket annat om att skriva till fil
många många ggr till just Sören.
Sören är det inte dags att skriva in dig som medlem. ?
mvh
Sven