Докато оправиш едно, друго се появява. Сега пък има проблем при експорта на таблица или Query в MS-Dos txt файл. Предполагам, че е проблем на кирилизатора, ама да попитам...

Май ще трябва да конвертираш стринговете от ascii в ansi. Пробвай това
function AsciiToAnsii(byval S as string) as string
dim Rez$,i%,Code
Rez=""
for i=1 to len(s)
code=asc(mid(S,i,1))
if code>127 and code<=191 then rez=rez & chr(code+64) else rez=rez & chr(code)
next i
AsciiToAnsii=Rez
End Function