VBS/WSH/JS - [решено] Перенос произвольного файла из папки

Foreigner · Отправлено: **18:01, 16-01-2012** | #2

XXXp, Обязательно VBS/WSH/JS ?

На всякий случай батник:

Код:

@echo off
setlocal

for /f "tokens=*" %%i in (' dir /b "c:\profiles\*.ini" ') do call:1 "%%i"
for /f "tokens=2 delims==" %%i in (' set ini_ ') do set "file=%%i"
copy /y "c:\profiles\%file%" c:\1.ini
goto:eof

:1
set "ini_%random%=%~1"

XXXp · Отправлено: **18:14, 16-01-2012** | #3

Нет, не обязательно vbs/wsh/js
бат вполне подойдет, спасибо!
Только произвольность файла плохо работает, возможно её немного улучшить? У меня 14 файлов .ini, я запустил батник 4 раза, из них 3 раза он попал на один и тот же файл .ini

А потом ещё 3 раза с интервалом секунда в 7 для проверки и все три раза попал в один файл

El Sanchez · Конфигурация компьютера

XXXp, а так?

Код:

@Echo Off
SetLocal
For %%A In ("C:\profiles\*.ini") Do Set /A Cnt+=1
Set /A Cnt=%RANDOM%*%cnt%/32768+1
For /F "Tokens=1* Delims=:" %%A In ('Dir /B /A-D "C:\profiles\*.ini"^|FindStr /n .') Do If %%A EQU %Cnt% Copy /Y "C:\profiles\%%B" "C:\1.ini"

XXXp · Отправлено: **18:31, 16-01-2012** | #5

Почему-то не работает...(

А нет, извиняюсь, работает, но рандомность вообще никакая, из 10 раз 9 попадает по одному файлу (при общем кол-ве 14)

Foreigner · Отправлено: **18:46, 16-01-2012** | #6

Цитата XXXp:

я запустил батник 4 раза, из них 3 раза он попал на один и тот же файл .ini »

Я попробовал, и у меня все отлично:

XXXp · Отправлено: **18:53, 16-01-2012** | #7

Наверное, вы правы, перепроверил, стало намного лучше, видимо случайно в первый раз так совпало)

XXXp · Отправлено: **21:29, 16-01-2012** | #8

Извините, хотел ещё вопрос узнать, как доработать данный бат файл
Появилась необходимость, одновременно с данным файлом ini из папки profiles, копировать из папки c:\profiles в папку C:\Users\user\ ОДНОИМЕННЫЙ файл .conf, т.е. имя полностью идентичное файлу *.ini, только расширение файла .conf, при этом этот файл также нужно переменовать(с заменой) в user.conf
Подскажите пожалуйста, как это сделать, буду очень благодарен

XXXp · Отправлено: **22:02, 16-01-2012** | #9

Чтобы было понятнее, есть много файлов .ini и точно такое же кол-во файлов с аналогичными названиями .conf
необходимо, чтоб допустим файл 43252.ini был рандомно выбран из всех файлов из папки c:\profiles и скопирован с заменой на c:\, затем переименован в 1.ini
А одноименный файл 43252.conf был скопирован из этой же папки (c:\profiles), скопирован в папку c:\Users\user и переименован в user.conf
Спасибо заранее большое!

Foreigner · Отправлено: **23:38, 16-01-2012** | #10

Код:

@echo off
setlocal

for /f "tokens=*" %%i in (' dir /b "c:\profiles\*.ini" ') do call:1 "%%i"
for /f "tokens=2 delims==" %%i in (' set ini_ ') do set "file=%%i"

copy /y "c:\profiles\%file%.ini" "c:\1.ini"
copy /y "c:\profiles\%file%.conf" "c:\users\user\user.conf"

goto:eof

:1
set "ini_%random%=%~n1"