@echo off
setlocal enableextensions enabledelayedexpansion
set len=15
set str=0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijkmnopqrstuvwxyz.@#$*()?/\{}[]
call :GetLength %str%
set /a n=0
:A
set /a rnd=%random% %% %i%+1
set out=!out!!str:~%rnd%,1!
set /a n+=1
if not %n%==%len% goto :A
echo !out!
pause && goto :EOF
:GetLength
set i=0
set arg=%1
:N
set T=!arg:~%i%,1!
if defined T (
set /a i+=1
goto :N
)