Вопрос по Register Table

[Annushka]

Всем привет! Хочу использовать оператор Register Table для открытия таблицы в txt-файле. Вопрос мой таков - какой синтаксис нужно применить, чтобы открывался диалог, где можно было бы выбрать имя исходного файла?

[ginpetr]

Если правильно понял задачу, сначала нужно выполнить fileopendlg(), чтоб выбрать файл на диске. Он возвращает полный путь и имя файла.

[Annushka]

Спасибо, по крайней мере открыть пытается. А как теперь передать полученное имя (переменная String) оператору Register Table?

[ginpetr]

str=fileopendlg(...)
register table str ...

так не выходит?

[Annushka]

Dim s_filename As str
str = FileOpenDlg("","Table","TXT","")
Register Table "str" TYPE ASCII Delimiter 9 Titles



получаю Variable String not defined

[ginpetr]

Dim s_filename As string
s_filename = FileOpenDlg("","Table","TXT","")
Register Table "s_filename" TYPE ASCII Delimiter 9 Titles
...вот так
правильность register table не проверял- справка Вам в помощь