批处理随机选中当前文件夹中7个文件，复制到目标文件夹？

swanseabrian · 发表于 2022-9-14 13:53:08

随机选中当前文件夹中7个文件，复制到目标文件夹

如何随机选中当前文件夹中7个文件？

这个要怎么操作呢
谢谢

qixiaobin0715 · 发表于 2022-9-14 14:52:06

@echo off
setlocal enabledelayedexpansion
for %%a in (*.*) do (
if "%~xa" neq ".bat" (
set _!random!=%%a
)
)
for /f "tokens=1* delims==" %%i in ('set _') do (
set /a n+=1
copy "%%j" "指定路径"
if !n! equ 7 goto :eof
)

复制代码

flashercs · 发表于 2022-9-14 16:38:52

回复 2# qixiaobin0715

两个 !random! 可能重复吧

qixiaobin0715 · 发表于 2022-9-14 16:46:04

回复 3# flashercs
重复可能性会有，后面的会覆盖前面变量，这也算一种随机吧。关键是文件太多后，代码可能会出问题，变量应当有个极限数，不是太理想。

swanseabrian · 发表于 2022-9-14 18:09:03

回复 4# qixiaobin0715

批处理参数替换中的路径运算符的下列用法无效: %~xa" neq ".bat" (

有关有效格式，请键入 CALL /? 或 FOR /?
命令语法不正确。

报错，请问怎么改一下呀，
谢谢

swanseabrian · 发表于 2022-9-14 18:19:08

回复 4# qixiaobin0715

Microsoft Windows [版本 6.1.7601]
版权所有 (c) 2009 Microsoft Corporation。保留所有权利。

D:\石景山小学\石景山小学>D:\石景山小学\石景山小学\新建文本文档.bat
批处理参数替换中的路径运算符的下列用法无效: %~xa" neq ".bat" (

有关有效格式，请键入 CALL /? 或 FOR /?
命令语法不正确。

D:\石景山小学\石景山小学>D:\石景山小学\石景山小学\新建文本文档.bat
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。
系统找不到指定的文件。

刚才那个错误解决了，找不到指定文件，这个怎么解决呀
谢谢

swanseabrian · 发表于 2022-9-14 18:23:02

回复 2# qixiaobin0715

主要是有点看不懂这个意思是啥
有点不会改
请指教

谢谢

flashercs · 发表于 2022-9-14 21:40:26

@echo off
cd /d %~dp0
setlocal enabledelayedexpansion
for %%a in (*.*) do (
if "%%~xa" neq ".bat" (
set _!random!=%%a
)
)
for /f "tokens=1* delims==" %%i in ('set _') do (
set /a n+=1
copy "%%j" "指定路径"
if !n! equ 7 goto :eof
)
endlocal
pause

复制代码

swanseabrian · 发表于 2022-9-15 06:59:02

回复 8# flashercs

copy "%%j" "指定路径"
我以为 %%j" "是写错了，我改成了
%%i"

qixiaobin0715 · 发表于 2022-9-15 16:06:24

本帖最后由 qixiaobin0715 于 2022-9-15 16:22 编辑

@echo off
setlocal enabledelayedexpansion
for /f %%i in ('dir /b /a-d ^| find /c /v ".bat"') do set n=%%i
set /a x=0,y=0
for /l %%i in (1,1,20) do (
set /a m=!random!%%n
if !x! lss 7 (
if not defined _!m! (
set _!m!=true
set /a x+=1
)
)
)
for /f "delims=" %%i in ('dir /b /a-d^|find /v ".bat"') do (
set /a y+=1
if defined _!y! copy "%%i" "指定路径"
)
pause

复制代码

这样应当也行，未测试

swanseabrian · 发表于 2022-9-15 17:53:09

回复 10# qixiaobin0715

随机参数没研究过

谢谢了

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[文件操作] 批处理随机选中当前文件夹中7个文件，复制到目标文件夹？