почему функция CHDIR не работает в сети?Qbasic BasicA - PullRequest
0 голосов
/ 12 декабря 2018

У меня есть файл .bas, который я запускаю с помощью GWBASIC.EXE

В файле .bas используются другие файлы, расположенные по пути: \ srv120 (T:) \ Basic

(GWBASIC.EXE и файл .bas также находятся в одном каталоге T \ Basic)

В каталоге T \ Basic я создал еще одну папку с именем "Calcultext" (T: \ Basic \ Calcultext)

Моя проблема:

Файл .bas содержит следующий код (это только часть файла)

1131 CHDIR " T:\Basic\Calcultext\ " 
1132 OPEN "Gisement.txt" FOR APPEND AS #2 
1133 PRINT #2, USING "* A=##### \        \ XA=#######.### YA=#######.###                                                        
*";I,NA$,XA#,YA# 
1134 CLOSE #2 
1135 CHDIR " T:\Basic\ "

Когда я запускаю программу, я получаю ошибкув строке 1131.

Если удалить строку 1131 (и 1135), все работает нормально, создается новый текстовый файл («Gisement.txt») по следующему пути: T: \ Basic

Однако мне не удается сменить каталог, чтобы сохранить текстовый файл в папке «Calcultext», расположенной в папке T: \ Basic.

Надеюсь, все достаточно ясно,

Спасибо за ваши ответы!

1 Ответ

0 голосов
/ 12 декабря 2018

Решение:

1131 CHDIR "T:\Basic\Calcultext\" 
1135 CHDIR "T:\Basic\"

вместо

1131 CHDIR " T:\Basic\Calcultext\ "
1135 CHDIR " T:\Basic\ "

Пробел до и после пути должен быть удален.

...