我正在尝试创建一个批处理文件来读取 Microsoft Access .ldb 锁定文件。锁定文件包含计算机名和用户名的列表。我想提取计算机名称并最终针对外部命令运行它们。
批处理文件的格式是单行,其中 (1) 计算机名称 (2) NULL 字符 (Hex 00) (3) 大约 20 个空格 (4) 用户名 (5) NULL 字符 (6) 大约 20空格重复。
Notepad++ 中(NUL)
表示 Hex 00 的示例:
COMPUTER0123(NUL) 管理员(NUL) COMPUTER0507(NUL) 管理员(NUL)
我尝试了几种方法FOR
来读取文件,但无法通过第一个计算机名称。
setlocal EnableDelayedExpansion 设置文件=database.ldb for /F %%a in ('type %file%') do ( 回声 %%a )
对于我的大多数 Access 数据库,文件中的用户名是Admin
. 我已经能够FIND
告诉我文件中出现了多少“管理员”(加 1)。
for /f "delims=" %%n in ('find /c /v "Admin" %file%') do set "len=%%n"
set "len=!len:*:=!"
echo %len% (minus 1) computer names to process
<%file% (
for /l %%l in (1 1 !len!) do (
set "line="
set /p "line="
echo(!line!)
)
)
遍历找到的行不起作用,可能是因为文件中只有一行(没有回车)。
我想找到一个适用于 Windows XP 标准安装的解决方案。
收到接受的答案后,我将其合并到我在下面发布的批处理文件中。我命名了该文件ShowUsersInLDB.bat
并将其放在我的SendTo文件夹中。
@echo off
::===================================================================
:: Put this in your SendTo folder and it will let you right-click
:: on an Access .ldb/.laccdb lock file and tell you the computer
:: names that have opened the database.
::
:: After the computer names are shown, this will prompt you to
:: search for the user names associated with each computer. This
:: depends upon finding a 3rd party file named NetUsers.exe in
:: the user profile folder. Feel free to change the path if you
:: want to store the file in another location.
::
:: NetUsers.exe can be downloaded from here: http://www.optimumx.com/downloads.html#NetUsers
::
:: Notes:
:: 1) Keep in mind that sometimes after people leave the database
:: the lock file still shows their computer name. Don't jump
:: to conclusions.
:: 2) NetUsers.exe seems to report all users who have logged on
:: to the computer and not logged off, including services.
:: If you aren't familiar with your user names or your users are
:: sharing remote desktops/Citrix/Terminal Services, you may have
:: to guess who might have created the lock entry.
::
:: Installation:
:: You may find a batch file named Install_UsersInLDB.bat that will
:: copy this file to the SendTo folder and the NetUsers.exe file to
:: the user profile (or a place you define).
::
:: Ben Sacherich - March 2014
:: Please let me know if you have any ideas for improvements.
::===================================================================
setlocal
set file="%1"
:: Make sure the file has a compatible extension.
if "%~x1"==".ldb" goto :ExtensionIsValid
if "%~x1"==".laccdb" goto :ExtensionIsValid
echo.
echo "%~n1%~x1" is not the correct file type.
echo.
pause
goto :End
:ExtensionIsValid
echo The Access "%~n1%~x1" file contains
echo the following computer names:
echo.
set "compNameLine=1"
for /f %%A in ('more "%file%"') do (
if defined compNameLine (
echo %%A
set "compNameLine="
) else set "compNameLine=1"
)
echo.
echo Are you ready to look up the user names on each computer?
pause
set "compNameLine=1"
for /f %%A in ('more "%file%"') do (
if defined compNameLine (
::echo %%A
"%userprofile%\netusers" \\%%A
set "compNameLine="
) else set "compNameLine=1"
)
echo.
echo -- Validation finished at %time%
pause
:End
exit