Sub CreateFile() Dim fso, tf Set fso = Server.CreateObject(\"Scripting.FileSystemObject\") Set tf = fso.CreateTextFile(\"c:\\testfile.txt\", True) \' Write a line with a newline character. tf.WriteLine(\"Testing 1, 2, 3.\") \' Write three newline characters to the file. tf.WriteBlankLines(3) \' Write a line. tf.Write (\"This is a test.\") tf.Close End Sub
ikke helt det jeg ledte efter, men jeg har selv fundet ud af det... ellers tak :O)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.