中国DOS联盟论坛 - Powered by Discuz! Board

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

作者: xing3019 时间: 2007-10-26 13:09 标题: [求助]怎样在文件中插入文本

有这样１个ＡＳＰ（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 ]

作者: xing3019 时间: 2007-10-26 19:50

谁能帮忙啊??
要搜索第一次 end if 后添加
x = GetSysConfigOption()
指定行数没用

Last edited by xing3019 on 2007-10-26 at 07:51 PM ]

作者: abcd 时间: 2007-10-26 20:05

@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

作者: xing3019 时间: 2007-10-26 22:13

谢谢

但是　

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 ]

作者: abcd 时间: 2007-10-26 22:20

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

作者: xing3019 时间: 2007-10-26 22:43

测试　<% %>　没问题，可以复制下来
但是　

if !num!==1 if /i "!str: =!"=="endif" echo x = GetSysConfigOption()

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

作者: terse 时间: 2007-10-26 22:43

略去 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 ]

作者: xing3019 时间: 2007-10-26 22:51

ＯＫ
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 ]

作者: terse 时间: 2007-10-26 23:32

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？

作者: xing3019 时间: 2007-10-27 15:15

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

作者: abcd 时间: 2007-10-27 16:17

不用setlocal

改用call会不会好点？？

作者: terse 时间: 2007-10-27 20:57

@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
)

作者: abcd 时间: 2007-10-27 21: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的前后都有空格呢？？

作者: terse 时间: 2007-10-27 21:15

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 ]

作者: xing3019 时间: 2007-10-28 13:45

感谢大家的帮助.