ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Копирование
20 сообщений из 20, страница 1 из 1
Копирование
    #32443411
_Mikle_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Mikle_
Участник
Хочу скопировать базы в каталог по умолчанию, но чего-то не получается :

_disk=left(sys(16),rat('\',sys(16)))
set defa to left(sys(16),rat('\',sys(16)))
*rat() - последний встечающийся символ "\" в переменной _disk
*SYS(16) returns a path with the program name
например, d:\normo_chas
copy file c:\nk1_1\dbf\nk_otz.dbf to ...
пробовал и (_disk), и left(sys(16),rat('\',sys(16))), и &_disk .

Что я не то делаю ?
Заранее спасибо.
...
Рейтинг: 0 / 0
16.03.2004, 13:12
| Ответить | Цитировать | Написать  
Копирование
    #32443436
Urri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Urri
Участник
Вообще-то, каталог по-умолчанию - это sys(5)+sys(2003)

А функция sys(16) возвращает, во-первых, не каталог по-умолчанию, а каталог запуска , разные вещи в зависимости от способа запуска программы. Поэтому надо ее обрабатывать более тщательно, чем просто откусывая правый символ. Кажется, в примерах или в tastrade есть функция корректной обработки возвращаемой этой функцией строки.
...
Рейтинг: 0 / 0
16.03.2004, 13:21
| Ответить | Цитировать | Написать  
Копирование
    #32443439
Фотография NNN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
NNN
Участник
Похоже ты имя файла не указываешь
Код: plaintext
COPY FILE c:\nk1_1\dbf\nk_otz.dbf to (FULLPATH(CURDIR())+'*.*')
...
Рейтинг: 0 / 0
16.03.2004, 13:21
| Ответить | Цитировать | Написать  
Копирование
    #32443446
_Mikle_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Mikle_
Участник
Сорру, закралась неточность
путь формировался d:\normo_chas\
и вот в этом-то последнем слеше и было дело.
_disk=left(sys(16),rat('\',sys(16))) && _disk=d:\normo_chas\
_d=rat("\",_disk)
_dd=substr(_disk,1,_d-1) && _dd=d:\normo_chas
set defa to left(sys(16),rat('\',sys(16)))
copy file c:\nk1_1\dbf\nk_otz.dbf to (_dd) и полетели...
...
Рейтинг: 0 / 0
16.03.2004, 13:24
| Ответить | Цитировать | Написать  
Копирование
    #32443456
IgorProgrammer
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
IgorProgrammer
Гость
my_file_copy = '"c:\nk1_1\dbf\nk_otz.dbf"'
sys(5) - показывает текущих каталог где прога
my_file_paste = '"' + sys(5) + '\nk_otz.dbf"'
copy file &my_file_copy to &my_file_paste
...
Рейтинг: 0 / 0
16.03.2004, 13:26
| Ответить | Цитировать | Написать  
Копирование
    #32443466
Urri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Urri
Участник
Поторопился ;-)
Читать так:

Вообще-то, каталог по-умолчанию - это sys(5)+sys(2003)

А функция sys(16) возвращает, во-первых, не каталог по-умолчанию, а каталог запуска , а во-вторых, возвращает разные вещи в зависимости от способа запуска программы. Поэтому надо ее обрабатывать более тщательно, чем просто откусывая (правый символ) имя файла до правого символа "\". Кажется, в примерах или в tastrade есть функция корректной обработки возвращаемой этой функцией строки.
...
Рейтинг: 0 / 0
16.03.2004, 13:28
| Ответить | Цитировать | Написать  
Копирование
    #32443505
_Mikle_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Mikle_
Участник
Мне как раз и нужен каталог запуска
...
Рейтинг: 0 / 0
16.03.2004, 13:39
| Ответить | Цитировать | Написать  
Копирование
    #32443513
Urri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Urri
Участник
Добавь в свою программу строку
?sys(16)
А строку
copy file...
закомментируй.

Возможно, наведет на мысли ... ;-)
...
Рейтинг: 0 / 0
16.03.2004, 13:42
| Ответить | Цитировать | Написать  
Копирование
    #32443534
Urri
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Urri
Участник
Кстати, Веселову привет передавай, если знаком ;-)
В какой организации работаешь, если не секрет? ;-)
...
Рейтинг: 0 / 0
16.03.2004, 13:49
| Ответить | Цитировать | Написать  
Копирование
    #32443630
Denis_Alekseevich
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Denis_Alekseevich
Гость
Миха не парь мозги честным юзерам идика проспись хочет он че то скопировать. Уже все скопировано до тебя 100000000 раз.
привет ВЦ контакта (если ты еще не понял от кого то это я Денис Алексеевич Петров) про справку и диск не забудь пиши куда нить
...
Рейтинг: 0 / 0
16.03.2004, 14:23
| Ответить | Цитировать | Написать  
Копирование
    #32443662
Denis_Alekseevich
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Denis_Alekseevich
Гость
балин тут касяк какой то с логином и именем все местами поменяли теперь я привычней Михон все тока для тя :-))))0
...
Рейтинг: 0 / 0
16.03.2004, 14:38
| Ответить | Цитировать | Написать  
Копирование
    #32443777
_Mikle_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Mikle_
Участник
2 Urri :ЗАО "Электроконтакт" г. Кинешма
Веселов в соседнем доме живет, но лично не знаком, а работает он на Автоагрегате. Могу подкинуть телефончик :-)

2Denis_Alekseevich : люди работают, занимаются самосовершенствованием, а ты...
...
Рейтинг: 0 / 0
16.03.2004, 15:16
| Ответить | Цитировать | Написать  
Копирование
    #32443870
Denis_Alekseevich
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Denis_Alekseevich
Гость
рад Микле что откликнулся нужна помощь подкинь несколько сайтов для начинающих :-) ПРОГРАММИСТОВ :-(((( (вроде меня) по фоксу да и кще как отиндексировать таблицу по двум полям синтаксис через + два поля?
...
Рейтинг: 0 / 0
16.03.2004, 15:47
| Ответить | Цитировать | Написать  
Копирование
    #32443905
_Mikle_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Mikle_
Участник
www.firststeps.ru

USE NK_OTZ
index on nnom+str(nop,3,0) to nkn_z

*NOP - числовое
use nzti
index on nnom+nnomi+str(zenai,8,2) to nzt_n

*ZENAI - числовое

P.S. от Юли - Денис, надумаешь вернуться - поможем ОТиндексировать не только по 2 полям - мы всегда рады тебе.

P.S. Дали денег нам ...
...
Рейтинг: 0 / 0
16.03.2004, 15:59
| Ответить | Цитировать | Написать  
Копирование
    #32443918
Фотография ВладимирМ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ВладимирМ
Участник
Для начинающих посмотри еще здесь

http://www.foxclub.ru/kb/index.php?sid=28601&aktion=anzeigen&rubrik=004
...
Рейтинг: 0 / 0
16.03.2004, 16:03
| Ответить | Цитировать | Написать  
Копирование
    #32443937
Denis_Alekseevich
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Denis_Alekseevich
Гость
Юле от меня персональный !СЕНКС! остальным хай и Михону и Володе тоже СПАСИБУЛЕЧКИ за сайты а с индексом я уже допетрил (я не тормоз я медленный газ) но все рано спасииииииибо!


P.S. смайлик ткнул но ты его не увидишь а он то тебя .... ух...
...
Рейтинг: 0 / 0
16.03.2004, 16:09
| Ответить | Цитировать | Написать  
Копирование
    #32443969
Denis_Alekseevich
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Denis_Alekseevich
Гость
слушай народ там про денги поподробнее...
новая фишка
есть несколько таблиц отдельных как связать их у них ключевое поле есть "kod" называется ?????
...
Рейтинг: 0 / 0
16.03.2004, 16:18
| Ответить | Цитировать | Написать  
Копирование
    #32443995
_Mikle_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Mikle_
Участник
поле "Kod" в главной таблице должно быть уникальным, проиндексируй таблицу по нему - тип индекса Primary Key; далее в подчиненной таблице (думаю, отношение один ко многим ??) создай такое же поле, также проиндексируй таблицу по нему - тип индекса Candidate Key; открой Database Designer и перетащи ключ с главной на подчиненную и будет тебе счастье.
...
Рейтинг: 0 / 0
16.03.2004, 16:27
| Ответить | Цитировать | Написать  
Копирование
    #32444000
Фотография Hel!Riser
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Hel!Riser
Участник
выставить у тех таблиц ордер на kod, а потом
Код: plaintext
1.
2.
3.
4.
SELECT родителя
SET RELATION TO kod INTO Child1 ADDITIVE
SET RELATION TO kod INTO Child2 ADDITIVE
* SET RELATION TO kod INTO Child2, kod INTO Child2 && одно и тоже
..
...
Рейтинг: 0 / 0
16.03.2004, 16:29
| Ответить | Цитировать | Написать  
Копирование
    #32444023
Denis_Alekseevich
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Denis_Alekseevich
Гость
Миха я седня не приду простыл я балин весь день как под стаканом все кружится но ты диск забери и че за денги дали то ?
К О М У ???????????????????????????????
...
Рейтинг: 0 / 0
16.03.2004, 16:35
| Ответить | Цитировать | Написать  
20 сообщений из 20, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Копирование
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]