中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » [求助]怎样在文件中插入文本

作者:

标题: [求助]怎样在文件中插入文本

上一主题 | 下一主题

xing3019
初级用户

积分 33
发帖 13
注册 2007-10-26
状态离线

『楼主』: [求助]怎样在文件中插入文本

有这样１个ＡＳＰ（INC.ASP）文件内容: if IsObject(con) = false then Response.Write "未找到数据库连接对象！" Response.End end if if con.State = 0 then Response.Write "数据库无法打开！" Response.End end if 我想在第一个 end if　后加入　１些代码　如：x = GetSysConfigOption() 生成如下代码： if IsObject(con) = false then Response.Write "未找到数据库连接对象！" Response.End end if x = GetSysConfigOption() if con.State = 0 then Response.Write "数据库无法打开！" Response.End end if 请问如何实现？谢谢指点再问：如何同时把所有ＡＳＰ文件改成上面示例？（不用，纯想法） [ Last edited by xing3019 on 2007-10-26 at 01:13 PM ]

2007-10-26 13:09

查看资料发送邮件发短消息网志

xing3019
初级用户

积分 33
发帖 13
注册 2007-10-26
状态离线

『第 2 楼』:

谁能帮忙啊?? 要搜索第一次 end if 后添加 x = GetSysConfigOption() 指定行数没用 [ Last edited by xing3019 on 2007-10-26 at 07:51 PM ]

2007-10-26 19:50

查看资料发送邮件发短消息网志

abcd
银牌会员

积分 1436
发帖 739
注册 2007-10-11
状态离线

『第 3 楼』:

@echo off
for /f "delims=" %%i in (t.txt) do (
  set "str=%%i"
  echo %%i
  setlocal enabledelayedexpansion
  if "!str: =!"=="endif" set /a num+=1
  if !num!==1 if /i "!str: =!"=="endif" echo x = GetSysConfigOption()
  endlocal
)
pause

2007-10-26 20:05

查看资料发短消息网志 OICQ

(470237592)

xing3019
初级用户

积分 33
发帖 13
注册 2007-10-26
状态离线

『第 4 楼』:

谢谢但是　 if !num!==1 if /i "!str: =!"=="endif" echo x = GetSysConfigOption() 最后１个　) 有问题出现错误：已经达到最大的 setlocal 递归层。去掉 ) 后不报错　， if !num!==1 if /i "!str: =!"=="endif" echo x = GetSysConfigOption( 但是程序不完整 [ Last edited by xing3019 on 2007-10-26 at 10:39 PM ]

2007-10-26 22:13

查看资料发送邮件发短消息网志

abcd
银牌会员

积分 1436
发帖 739
注册 2007-10-11
状态离线

『第 5 楼』:

不能处理asp中都<% %>字符

2007-10-26 22:20

查看资料发短消息网志 OICQ

(470237592)

xing3019
初级用户

积分 33
发帖 13
注册 2007-10-26
状态离线

『第 6 楼』:

测试　<% %>　没问题，可以复制下来但是　 if !num!==1 if /i "!str: =!"=="endif" echo x = GetSysConfigOption() 最后１个　) 有问题出现错误：已经达到最大的 setlocal 递归层。去掉 ) 后不报错　， if !num!==1 if /i "!str: =!"=="endif" echo x = GetSysConfigOption( 可是程序不完整

2007-10-26 22:43

查看资料发送邮件发短消息网志

terse
银牌会员

积分 2404
发帖 946
注册 2005-9-8
状态离线

『第 7 楼』:

略去 endlocal @echo off for /f "delims=" %%i in (t.txt) do ( set "str=%%i" echo %%i setlocal enabledelayedexpansion if "!str!"=="end if" set /a num+=1 if !num!==1 if /i "!str!"=="end if" echo x = GetSysConfigOption(^) ) pause [ Last edited by terse on 2007-10-26 at 10:48 PM ]

2007-10-26 22:43

查看资料发送邮件发短消息网志

xing3019
初级用户

积分 33
发帖 13
注册 2007-10-26
状态离线

『第 8 楼』:

ＯＫ endlocal　需要，谢谢你了我参照提示多加了１条 @echo off for /f "delims=" %%i in (t.txt) do ( set "str=%%i" echo %%i setlocal enabledelayedexpansion if "!str: =!"=="endif" set /a num+=1 if !num!==1 if /i "!str: =!"=="endif" 　( echo x = GetSysConfigOption(^) echo Set obj = Nothing ) endlocal ) pause [ Last edited by xing3019 on 2007-10-26 at 10:53 PM ]

2007-10-26 22:51

查看资料发送邮件发短消息网志

terse
银牌会员

积分 2404
发帖 946
注册 2005-9-8
状态离线

『第 9 楼』:

Originally posted by xing3019 at 2007-10-26 22:51: ＯＫ endlocal　需要，谢谢你了我参照提示多加了１条 @echo off for /f "delims=" %%i in (t.txt) do ( set "str=%%i" echo %%i setlocal enabledelayede ...

那样的话第二个end if后面也ECHO？

2007-10-26 23:32

查看资料发送邮件发短消息网志

xing3019
初级用户

积分 33
发帖 13
注册 2007-10-26
状态离线

『第 10 楼』:

确实都+了，但　略去 endlocal 显示时出现：已经达到最大的 setlocal 递归层。 >>到文件没出现：　已经达到最大的 setlocal 递归层。什么原因？？？

2007-10-27 15:15

查看资料发送邮件发短消息网志

abcd
银牌会员

积分 1436
发帖 739
注册 2007-10-11
状态离线

『第 11 楼』:

不用setlocal 改用call会不会好点？？

2007-10-27 16:17

查看资料发短消息网志 OICQ

(470237592)

terse
银牌会员

积分 2404
发帖 946
注册 2005-9-8
状态离线

『第 12 楼』:

@echo off for /f "delims=" %%i in (t.txt) do ( echo %%i if "%%i"=="end if" call :stra ) pause goto :eof :stra set /a num+=1 if %num% equ 1 (echo x = GetSysConfigOption(^) echo Set obj = Nothing )

2007-10-27 20:57

查看资料发送邮件发短消息网志

abcd
银牌会员

积分 1436
发帖 739
注册 2007-10-11
状态离线

『第 13 楼』:

Originally posted by terse at 2007-10-27 08:57 PM: @echo off for /f "delims=" %%i in (t.txt) do ( echo %%i if "%%i"=="end if" call :stra ) pause goto :eof :stra set /a num+=1 if %num% equ 1 (echo x = GetSysC ...

如果end if的前后都有空格呢？？

2007-10-27 21:13

查看资料发短消息网志 OICQ

(470237592)

terse
银牌会员

积分 2404
发帖 946
注册 2005-9-8
状态离线

『第 14 楼』:

Originally posted by abcd at 2007-10-27 21:13: 如果end if的前后都有空格呢？？

那还是这样吧 if "!str: =!"=="endif" @echo off&setlocal enabledelayedexpansion for /f "delims=" %%i in (t.txt) do ( echo %%i set "str=%%i" if "!str: =!"=="endif" call :stra ) pause goto :eof :stra set /a num+=1 if !num! equ 1 (echo x = GetSysConfigOption(^) echo Set obj = Nothing ) [ Last edited by terse on 2007-10-28 at 12:20 AM ]

2007-10-27 21:15

查看资料发送邮件发短消息网志

xing3019
初级用户

积分 33
发帖 13
注册 2007-10-26
状态离线

『第 15 楼』:

感谢大家的帮助.

2007-10-28 13:45

查看资料发送邮件发短消息网志

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: