Имя: Пароль:
1C
1C 7.7
v7: Имя файла - константа
,
0 Christina_
 
16.10.12
12:26
У меня есть константа, ИмяФайла, для которой задано значение - путь к файлу. Мне нужен другой файл, но менять значение константы я не могу, добавлять новую нельзя. Могу ли я в обработке, переменной, например ФайлКредит, как-то присвоить путь к файлу?
1 Godofsin
 
16.10.12
12:27
Можешь!
2 2S
 
16.10.12
12:28
разрешаю
3 Эльниньо
 
16.10.12
12:39
// КудаПокласть = Константа.ИмяФайла;
КудаПокласть = КудаЯХочу;
4 Christina_
 
16.10.12
12:44
ФайлКредитСчет = "\\tsclient\G\BSClnt396\SUBSYS\EXPORT\dExport\out\2120082393098.974";


верна будет такая запись?
5 Godofsin
 
16.10.12
12:45
да
6 Christina_
 
16.10.12
12:47
спасибо! я думала, все сложнее должно быть) спасибо!
7 Эльниньо
 
16.10.12
12:49
(6) Обломись.
8 пипец
 
16.10.12
12:54
BSClnt396 банк клиент ггыгыгы
ЗЫ кто то куда то бабло пересылает
9 Эльниньо
 
16.10.12
13:35
+(7)
СтрДлина( "\\tsclient\G\BSClnt396\SUBSYS\EXPORT\dExport\out\2120082393098.974") = 66
10 1Сергей
 
16.10.12
13:38
(9) и чо?
11 Christina_
 
24.10.12
15:01
возвращаюсь к своему вопросу...
ФайлКредитСчет = "\\tsclient\G\BSClnt396\SUBSYS\EXPORT\dExport\out\2120082393098.974";
                   Чсл=СокрЛП(ДатаЧисло(ДатаДок));
                   Чсл=?(СтрДлина(Чсл)<2,"0"+Чсл,Чсл);
                   Мес=ДатаМесяц(ДатаДок);
                   Мес=?(Мес<10,СокрЛП(Мес),?(Мес=10,"A",?(Мес=11,"B","C")));
                   ФайлВыписки=СтрЗаменить(СтрЗаменить(СокрЛП(ФайлКредитСчет),"ДД",Чсл),"М",Мес);
///////
   УстФайла(ФайлСубконто,Константа.ИмяФайлаСубконто);
                   УстФайла(ФайлПроводок,Константа.ИмяФайлаПроводок);
                   УстФайла(ФайлВыписки, ФайлКредитСчет);

Выдает ошибку...
Ошибка доступа к файлу "\\tsclient\G\BSClnt396\SUBSYS\EXPORT\dExport\out\2120082393098.974" !
Действие не выполнено


я, видимо..не так что-то присваиваю...
12 Mikeware
 
24.10.12
15:10
(11) а у вас что, программистов совсем-совсем не существует?
13 Повелитель
 
24.10.12
15:11
(4) Спасибо за инфу, я уже с вашего счета себе пару платежей перевел ))
14 Christina_
 
24.10.12
15:15
(13) да ладно? с несуществующего счета?)
15 Christina_
 
24.10.12
15:17
(12) на данный момент не существует
16 Надсмотрщик
 
24.10.12
15:20
(15) И как долго?
17 Надсмотрщик
 
24.10.12
15:21
+(16) я бы поработал, особенно с Christina_              :-)
18 Christina_
 
24.10.12
15:24
ошибка доступа к файлу..может быть что файл просто переместили? или..переименовали, так ведь? т.к. ФайлКредитСчет = "\\tsclient\G\BSClnt396\SUBSYS\EXPORT\dExport\out\2120082393098.974"; если эта строка верна..ошибки вроде не должно быть, нет?
19 Надсмотрщик
 
24.10.12
15:29
(18) А просто выбрать файл?
ФС.ВыбратьФайл(<?>,,,,)
Синтаксис:
ВыбратьФайл(<ТипДиалога>,<ИмяФайла>,<ИмяНачКаталога>,<ЗаголовокОкна>,<Фильтр>,<Расширение>,<Таймаут>)
Назначение:
Открывает окно диалога выбора/сохранения файла.
Возвращает: 0 - если в окне диалога нажата кнопка 'Отмена', 1 - если нажата кнопка 'ОК'.
Параметры:
<ТипДиалога> -: 0 - диалог типа <открыть>, 1 - диалог типа <сохранить>;
<ИмяФайла> - переменная, содержащая на входе строку с именем файла, а на выходе - имя выбранного файла;
<ИмяНачКаталога> - переменная, содержащая на входе строку с  начальным каталогом, а на выходе - имя выбранного каталога;
<ЗаголовокОкна> - строка с заголовком окна;
<Фильтр> - строка с фильтром отбора файлов (например: 'Все файлы (*.*) |*.*');
<Расширение> - строка с расширением файла по умолчанию;
<Таймаут> - время ожидания отклика пользователя в секундах (необязателен).
Подробнее см. в документации, глава 'Работа с Файлами'
20 Christina_
 
24.10.12
15:42
(19) я пробовала сразу так сделать, но запуталась с параметром ИмяНачКаталога.

\\tsclient\G\BSClnt396\SUBSYS\EXPORT\dExport\out\ - это же не будет моим каталогом, так ведь?
21 Christina_
 
24.10.12
15:46
я понимаю, что это для вас всех очень глупые вопросы. но тем не менее.
22 Mikeware
 
24.10.12
15:48
(21) УстФайла() - эт чо?
23 Christina_
 
24.10.12
15:50
устанавливает ФайлуВыписки значение ФайлКрдитСчета, если я правильно поняла
Процедура УстФайла(Реквизит,Значение)
   Если ПустаяСтрока(Реквизит)=1 Тогда
       Реквизит=Значение;
24 Mikeware
 
24.10.12
16:18
(23) "это просто праздник какой-то..."©
25 чеширский кот
 
24.10.12
16:23
в первую очередь сделайте проверку на существование файла
26 Надсмотрщик
 
24.10.12
16:32
(20) Зови спеца, пока ВСЕ НЕ УГРОБИЛА!!!
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший