Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];

Вниз

Нужен BAT-ник   Найти похожие ветки 

 
ruslan_as   (2002-04-18 11:17) [0]

Выручайте! Нужет BAT-ник, в котором сравниваються два файла C:\ASU\version.txt и W:\ASU\version.txt и если они оличаются то вытереть все файлы из C:\ASU\version.txt и скопировать туда все файлы из W:\ASU\version.txt.


 
PVOzerski   (2002-04-18 11:42) [1]

Непонятна постановка вопроса.
>вытереть все файлы из C:\ASU\version.txt
Как это - файл с файлами?
Если имеется в виду, что файл version.txt содержит имена неких файлов,
то почему нельзя просто заменить C:\ASU\version.txt на W:\ASU\version.txt
методом простого копирования (притом, по идее, даже предварительное сравнение
файлов может быть излишним).


 
Anatoly Podgoretsky   (2002-04-18 12:00) [2]

Нормальные герои всегда идут в обход


 
ruslan_as   (2002-04-18 12:36) [3]

Может я не верно выразился - извините. У меня у каждого клиента установлена моя программа, которая (как всегда) имеет свойство обновляться. Я хочу поместить на сервер W:\ASU\version.txt, в котором я изменяю номер версии. У клиента есть файл C:\ASU\version.txt. Хочу установить BAT-ник в автозагрузку, который сверяет C:\ASU\version.txt и W:\ASU\version.txt и если в файле клиента содержимое (т.е. номер версии) совпадает с содержимым то копирования не происходит, иначе удаляются все файлы в каталоге C:\ASU и копируются все файлы из W:\ASU.
Это мое решение и возможно оно не самое лудшее, поэтому подскажите как еще можно решить проблему с обновлением версий у многих (к тому же бестолковых) клиентов. Понятие копирования у них порой сложнее высшей математики, а учить их наше начальство не спешит.


 
fliz   (2002-04-18 12:45) [4]

у меня на работе идет бесусловное копирование :
при запуске проги сначала BAT-ником копирую
EXE-шник с сервера к клиенту на машину.
размер файла небольшой, поэтому подобные
проверки здесь излишни.

имхо, в твоем случае я бы написал (на Дельфи, а не БАТник)
простую запускалку, которая проверяла бы должным образом
информационные файлы и копировала бы прогу с сервера.
2-3 часа работы наверное на это дело можно найти,
а подобная запускалка потом может расширятся.
например вести отчеты и запуске программы и т.д.


 
Anatoly Podgoretsky   (2002-04-18 12:48) [5]

При указанной постановке написение каких лиюо программ лишнее, просто сразу копировать


 
ruslan_as   (2002-04-18 13:20) [6]

>Anatoly Podgoretsky Слишком громоздкая а машины слабые, долго грузяться. Возможно >fliz и прав - прийдется посидеть над программой. К стати, как вытащить содержимое txt-файла, если можно с кодом.


 
PVOzerski   (2002-04-18 15:56) [7]

Ой, что-то вы мудрите... Отдельный файл с версией завели...

Вариант проверялки на TP7:

program dt;
uses
dos;
function fTime(const s:string):longint;
var
t:longint;
f:file;
begin
assign(f,s);
reset(f,1);
getFtime(f,t);
fTime:=t;
close(f);
end;
procedure Compare(a,b:word);
begin
if a>b then
halt(1)
else if a<b then
halt(2);
end;
var
s,d:longint;
sdt,ddt:DateTime;
begin
s:=fTime(paramstr(1));
d:=fTime(paramstr(2));
unpacktime(s,sdt);
unpacktime(d,ddt);
compare(sdt.Year,ddt.Year);
compare(sdt.Month,ddt.Month);
compare(sdt.Day,ddt.Day);
compare(sdt.Hour,ddt.Hour);
compare(sdt.Min,ddt.Min);
compare(sdt.Sec,ddt.Sec);
end.

Прилагаемый батник (точнее, его заготовка):

DTEST.EXE %1 %2
if errorlevel 2 goto l2
if errorlevel 1 goto l1
goto l3
:l1
echo %1 новее %2
goto l3
:l2
echo %1 старше %2
:l3


 
ruslan_as   (2002-04-18 17:18) [8]

>PVOzerski А что такое getFtime(f,t) и как его перевести в Delphi.


 
PVOzerski   (2002-04-18 17:42) [9]

GetFtime - процедура для определения времени создания файла. Ближайший аналог -
FileGetDate из SysUtils. Оттуда же понадобится function FileDateToDateTime вместо unpacktime.


 
Sergey13   (2002-04-19 10:41) [10]

2ruslan_as © (18.04.02 11:17)
&
2all
Не мучайтесь - скачайте и пользуйтесь. Все очень симпатично и просто. К тому же бесплатно.
http://polesoft.narod.ru/Products/Starter/starter.html


 
fliz   (2002-04-19 12:00) [11]

2 Sergey13 © (19.04.02 10:41)
разрубил гордиев узел :-).
фенкс, тулза пожалуй пригодится.




Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2002.05.27;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.006 c
14-88631
Iris
2002-04-07 11:46
2002.05.27
установка новых компонентов


1-88442
Саша
2002-05-17 12:21
2002.05.27
Обновление окнон программы при выполнении длинной операции.


3-88338
Cranium
2002-04-30 12:39
2002.05.27
Запрет UPDATE для столбцов в InterBase


1-88520
Andrew_A
2002-05-15 22:06
2002.05.27
не могу разобраться, помогите...


14-88601
lipskiy
2002-04-18 01:29
2002.05.27
Начат сбор данных для базы процедур и функций сайта delphi.mastak





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский