楼主这些有问题
:: 去除表情页上方banner
Set D=%AllUsersProfile%\Documents\Tencent\QQ\UserDataInfo.ini
If Exist %~dp0Users Set UserDataSavePath=%~dp0Users&Goto Write
FOR /F "tokens=1,2,*" %%I IN ('REG QUERY "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v "Personal"') DO (
If "%%I"=="Personal" SET UserDataSavePath=%%K\Tencent Files&Goto Write)
For /F "usebackq tokens=1,2 delims==" %%I In ("%D%") DO (
If "%%I" == "UserDataSavePath" (Set UserDataSavePath=%%J&Goto Write)
)