ВритеБланкЛинес

Начин ТектСтреам ВритеБланкЛинес "пише одређени број празних редова у фајлу ТектСтреам.

ВритеБланкЛинес прихвата један параметар, односно број линија да додате вуотие. Ево једног примера:

 Дим фс, Ф









 'Да направим инстанцу СЗС







 Поставите ФС = Сервер.ЦреатеОбјецт ("Сцриптинг.ФилеСистемОбјецт")

 







 "Ја отворите датотеку







 Сет: Ф = фс.ЦреатеТектФиле ("Ц: \ тест.ткт", труе)









 "Пишем ред текста ...







 ф.ВритеЛине ("Здраво!")









 'Додај две празне линије ...







 ф.ВритеБланкЛинес (2)









 "Пишем још један ред текста







 ф.ВритеЛине ("Како сте?")









 'Затвори







 ф.цлосе









 "Ја очишћене







 Сет Ф = Ништа







 Поставите фс = Ништа

Фајл тест.ткт ће изгледати овако Након покретања код изнад:

 



 Поздрав!











 Како си?