[sysrepos]

Как записать данные в файл (из таблицы) без ковычек? (с помощью МапБэйсика)
пробовал через Export table Type ASCII и Export table Type MIF, и просто запись в файл (write #1, str)
везде добавляются кавычки в начале и в конце строки, то есть вместо того чтобы в текстовом файле было записано:
значение1
получается
"значение1"
Подскажите как сделать? чтобы тескт в файл вставлялся без ковычек?

[thegeo]

Например так:

Include "mapbasic.def"
Declare Sub Main
Declare Sub writeFile()

Sub Main
call writeFile
end sub

sub writeFile()
dim n,m,i,j as integer
dim pp,sTb,sCol as string
dim aa as alias
n=SelectionInfo(SEL_INFO_NROWS)
if n=0 then exit sub end if
sTb=SelectionInfo(SEL_INFO_SELNAME)
m=TableInfo(sTb,TAB_INFO_NCOLS)
pp=FileSaveAsDlg("C:\","","TXT","Сохранить данные")
if Len(pp)=0 then Exit sub end if
OnError GoTo theError
Open File pp For Output Access Write as #1 CharSet "WindowsCyrillic"
for i=1 to n
Fetch Rec i From sTb
for j=1 to m
aa=sTb & ".Col" & j
sCol=sCol & aa & ","
next
sCol=left$(sCol,len(sCol)-1)
Print #1 , sCol
next
theError:
Close File #1
end sub

[sysrepos]

спасибо