求教批处理代码提取ip字段，生成文本

woonew · 发表于 2022-4-19 10:53:12

例如本机ip为192.168.25.3

如何获取本机ip地址，并取ip后面数值，去掉点，不足3位的前面补0，得6位值025003，生成个iD=下方6位id
将下方字段生成个123.txt文件。abc为固定值。

{
"ID": "6位id",
"Host": "abc"
}

求批处理代码，谢谢。

lihui612ld · 发表于 2022-4-19 16:04:56

本帖最后由 lihui612ld 于 2022-4-19 16:47 编辑

@echo off&setlocal enabledelayedexpansion
del 123.txt
set flag1=0
set flag2=0
for /f "tokens=2 delims=:" %%i in ('ipconfig ^|find "IPv4 地址"') do (
for /f "tokens=3,4 delims=." %%a in ('echo %%i') do (echo %%a %%b
set flag1=%%a
set flag2=%%b
)
)
set str=!flag1!
set StrMAX=1000
for /l %%a in (0,1,%StrMAX%) do if "!str:~%%a,1!"=="" set num=%%a&goto :ok
:ok
if !num!==1 (set var=00!flag1!)
if !num!==2 (set var=0!flag1!)
if !num!==3 (set var=!flag1!)
set str=!flag2!
set StrMAX=1000
for /l %%a in (0,1,%StrMAX%) do if "!str:~%%a,1!"=="" set num=%%a&goto :ok1
:ok1
if !num!==1 (set var1=00!flag2!)
if !num!==2 (set var1=0!flag2!)
if !num!==3 (set var1=!flag2!)
set pp=!var!!var1!
echo "ID":"!pp!">123.txt
echo "Host":"abc">>123.txt
pause

复制代码

试下这个

woonew · 发表于 2022-4-24 09:08:58

回复 2# lihui612ld

有用，十分感谢

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

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

[文本处理] 求教批处理代码提取ip字段，生成文本