Schreibschutz bei TextDateien

[Mailyn]

Hi!

Also, habe mit

Open App.Path & "\Text.txt" For Output As 1 
			 Print #1, Form1.Text1.Text			 
			 Close #1 
			Form1.Text1.Text = variable

eine TextDatei angelegt, nun will ich die durch Schreibschutz vor Veränderungen schützen... WIE?

Ps: Hab auch schon die Forumssuche benutzt, konnte mir aber nich wirklich was helfen!

 

[zioProduct]

Gibts in VisualBasic nicht
TextBox1.enabled = false

Maybe täusche ich mich auch

Mfg
ziop

 

[Shakie]

@zioProduct: Es handelt sich um eine Datei, nicht um eine Textbox.
@Mailyn: Natürlich kann man bei Dateien den Schreibschutz aktivieren:

VBA.SetAttr "D:\Test.txt", vbReadOnly

@zioProduct: Bei einer Textbox geht es übrigens auch, nämlich über die "Locked"-Eigenschaft.

 

[zioProduct]

Huch, Morgenstund hat Gold im Mund, aber nicht in den Augen
Aja genau Locked war das
thx