Alexanbar писал(а):CommonDialog1.InitDir = "c:"
CommonDialog1.Filter = "Текстовые файлы(*.txt)|*.txt|Все файлы|*.*"
With dlgMain
.InitDir = "d:\temp"
.Filter = "Файлы (*.bat;*.txt;*.htm)|*.bat;*.txt;*.htm|"
.ShowOpen
End With
Сейчас этот форум просматривают: Google-бот, Yandex-бот и гости: 164