读指定几行的文本，怎样写？

2006-04-19 09:38:34 162 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

深入理解HTTPS：从SSLHandshakeException到证书链验证的完整解析本文深入解析了HTTPS握手过程中常见的SSLHandshakeException异常，特别是由证书链验证失败引发的CertPathValidatorException。文章从TLS握手流程、证书链验证的数学原理出发，详细剖析了Java中TrustManager的工作机制，并提供了针对证书链不完整、自签名证书等典型问题的系统化排查流程与实战解决方案。阅读详情

1234
12341 12314 123
123123123111111111111111111111111111
111111111111111111111111111111111111
111111111111111111111111111111111111
111111111111111111111111111111111111

1234

类似这样的，只读中间的四行，跳过前两行和第四行后面的

如何写呀？很简单的问题，高手帮忙，谢谢拉！！！

...全文

当KCF遇见卡尔曼滤波：视觉跟随算法的动态优化实战本文探讨了KCF算法与卡尔曼滤波在视觉跟随算法中的动态优化实践，通过深度融合策略提升目标跟踪的鲁棒性和实时性。特别针对机器人应用场景，详细解析了在Jetson等嵌入式平台上的优化技巧，包括计算图优化、内存访问优化和多线程流水线设计，实现了30FPS@1080p的稳定跟踪性能。阅读详情

beyondhell

ASP 28,401 成员 356,940 内容

+ 关注 + 加入社区

切换为时间正序

dragonhell 2007-01-08

打赏
举报

SKIPLINE?//

笨笨兔兔兔兔兔 2006-04-19

打赏
举报

skipline

beyondhell 2006-04-19

打赏
举报

icrosoft VBScript 编译器错误 (0x800A0414)
调用子程序时不能使用括号
/2.ASP, line 29, column 24
FSOlinedit (fname,"3,4")

晕，实在不会写呀，哪位大哥给写个完整点的。

荣之梦 2006-04-19

打赏
举报

函数可以补全一点。

FSOlinedit(filename,"2-3")
FSOlinedit(filename,"2,5,7")
FSOlinedit(filename,2)
进行判断提取，

sky0120 2006-04-19

打赏
举报

dim filename
filename="1.txt"
response.write FSOlinedit(filename,3)
response.write FSOlinedit(filename,4)

jay_lishijie 2006-04-19

打赏
举报

<%
Set AFileSystemObject = CreateObject("Scripting.FileSystemObject")
Set ATextStream = AFileSystemObject.OpenTextFile("C:\test.txt")
%>
<h3>第一行的内容：</h3>
<% = ATextStream.ReadLine %>
<h3>第二行的内容：</h3>
<% = ATextStream.ReadLine %>
...
---------------------------------------------------------------

<%
Set MyFileObject=Server.CreateObject(“Scripting.FileSystemObject”)
Set MyTextFile=MyFileObject.OpenTextFile(“c:\test.txt”)
While not MyTextFile.AtEndOfStream
Response.Write(MyTextFile.ReadLine)
Wend
MyTextFile.Close
%>

intereye 2006-04-19

打赏
举报

''''''使用FSO读取文件某一行的函数
function FSOlinedit(filename,lineNum)
if linenum < 1 then exit function
dim fso,f,temparray,tempcnt
set fso = server.CreateObject("scripting.filesystemobject")
if not fso.fileExists(server.mappath(filename)) then exit function
set f = fso.opentextfile(server.mappath(filename),1)
if not f.AtEndofStream then
tempcnt = f.readall
f.close
set f = nothing
temparray = split(tempcnt,chr(13)&chr(10))
if lineNum>ubound(temparray)+1 then
exit function
else
FSOlinedit = temparray(lineNum-1)
end if
end if
end function

beyondhell 2006-04-19

打赏
举报

顶下。

读指定几行的文本，怎样写？

相关推荐