WEBSHELL批量查询目录读写权限

.如果真 (超级列表框1.取标题 (i － 1, 4) ≠ “未找到可写目录!”)
写到文件 (通用对话框1.文件名, 到字节集 (超级列表框1.取标题 (i － 1, 1) ＋ “|” ＋ 超级列表框1.取标题 (i － 1, 2)))