WriteBlankLines

WriteBlankLines 'TextStream yöntemi bir dosya TextStream boş satır belirli sayıda yazar.

WriteBlankLines tek bir parametre kabul eder, vuotye eklemek için satır sayısını yani. İşte bir örnek:

 dim fs, f









 'Ben FSO bir örneğini oluşturmak







 Fs = Server.CreateObject ("Scripting.FileSystemObject") Set

 







 'Ben dosyayı açın







 Set F = fs.CreateTextFile ("c: \ test.txt", true)









 'Ben bir metin satırı yazmak ...







 f.WriteLine ("Merhaba!")









 'Iki boş satır ekleyin ...







 f.WriteBlankLines (2)









 'Ben metni satırı yazmak







 f.WriteLine ("How are you?")









 'Kapat







 f.close









 'Ben temizlenir







 F = Nothing Set







 Fs = Nothing Set

Dosya test.txt Yukarıdaki kodu çalıştırdıktan sonra aşağıdaki gibi görünecektir:

 



 Merhaba!











 Nasılsın?