Евгений
Постоянный посетитель
Всего сообщений: 78
Дата регистрации: 15.08.2013
|
Создано:
14.04.2020 13:20:52
|
Добрый день.
Нужно сделать выгрузку ветвей в csv из большого количества файлов Rastr.
Подскажите как в макросе сделать так, чтобы названия файлов CSV макрос брал из названия режима, который сейчас загружен.
По примеру в справке получается название файла будет "а":
file = "c:\tmp\a.csv"
Set tvetv=Rastr.Tables("vetv")
tvetv.SetSel "sta"
tvetv.WriteCSV 1, file, "ip,iq,nameu", ";"
|
Станислав Богданов
Модератор
Всего сообщений: 61
Дата регистрации: 11.10.2012
|
Создано:
15.04.2020 12:19:55
|
Если макрос запускается в Rastr, то:
path = rastr.SendCommandMain(6, "режим.rg2", "", 0)
Set fso = CreateObject("Scripting.FileSystemObject")
fileName = fso.GetBaseName(path)
rastr.printp fileName
|