Sane

That piece of code there does absolutely zip. Nadda. You are telling it to reassign its value to itself. In other words, x = x.

You don't seem to be using the right code for writing files. At least according to this thread. You might want to use the second example ("An example of writing a file").

Edit: Oh, you're using a newer version of VB that doesn't support this? Hmph.
Try Write(adminsundaycpaTextBox.Text).