读文脚本
⑴ 怎么利用VBS脚本来逐行读取文本内容并复制，注意不是VB，是VBS脚本，哪位大能来帮帮小弟！
Dim n
Dim s
If Dir("c:\2.txt") <> "" Then
Open "c:\2.txt" For Input As #1 '保存上一次读的行数文件
Line Input #1, s
Close #1
n = CInt(s)
Else
n = 1
End If
s = ""
Open "c:\1.txt" For Input As #1 '要读的目标文件
Dim b As Long
For b = 1 To n
If Not EOF(1) Then
Line Input #1, s
End If
Next b
MsgBox (s)
n = n + 1
If Dir("c:\2.txt") <> "" Then Kill "c:\2.txt" '保存本次读的行数
Open "c:\2.txt" For Append As #2
Print #2, n
Close #2
Close #1
⑵ 求linux 读文件 脚本
不要用管道读文件，bash会用子shell执行管道两边的命令。子shell里的任何改动都无法影响父shell。
改成:
while read line
do
...
done < your_file_name
⑶ perl脚本读文件最优方法请教
你的代码一下子把所有行都读到@Contant里了，自然耗内存。
这种情况要用while循环一行一行地读，参见下面的改法。
my ($filename) = "text.unl";
unless (open (RDH,$filename))
{
print "File open failed.";
}
while (my $line = <RDH>) {
push @a, $line if /aaa/;
push @b, $line if /bbb/;
push @c, $line if /ccc/;
}
close RDH or die "Cannot close $filename:$!";
⑷ 怎么利用VBS脚本来逐行读取文本内容并复制，注意不是VB，是VBS脚本!
下面代码是第一次运行时读取复制是第一行内容，再一次运行就是第二行的
FileName="c:\123.txt" '修改成你要复制字符到剪切板的文件
Set fso=CreateObject("scripting.filesystemobject")
set ws=createobject("wscript.shell")
configPath=ws.ExpandEnvironmentStrings("%systemroot%") & "\~!filetmp"
set confObject=fso.opentextfile(configPath,1,1)
FignNum=""
if not confObject.atendofstream then FignNum=confObject.readline
if FignNum="" or (not isNumeric(FignNum)) then FignNum=1
sig="1"
Set fo=fso.OpenTextFile(FileName,1,1)
while not fo.atendofstream
text=fo.readline
if cint(sig)=cint(FignNum) then
Set Form = CreateObject("Forms.Form.1")
Set TextBox = Form.Controls.Add("Forms.TextBox.1").Object
TextBox.MultiLine = True
TextBox.Text = text
TextBox.SelStart = 0
TextBox.SelLength = TextBox.TextLength
TextBox.Copy
writefileAdd FignNum
wscript.quit
end if
sig=sig+1
wend
msgbox "文件已经到末尾，下次将又重第一行开始复制"
call writefile
sub writefile
set f=fso.opentextfile(configPath,2,1)
f.writeline "1"
f.close
end sub
sub writefileAdd(value)
set f=fso.opentextfile(configPath,2,1)
f.writeline value+1
f.close
end sub
⑸ 用python读取文本文件，对读出的每一行进行操作，这个怎么写
用python读取文本文件，对读出的每一行进行操作，写法如下：
f=open("test.txt","r")
whileTrue:
line=f.readline()
ifline:
pass#dosomethinghere
line=line.strip()
p=line.rfind('.')
filename=line[0:p]
print"create%s"%line
else:
break
f.close()
⑹ 如何用VBS脚本程序读取文本文件
ReadLine 方法
从 TextStream 文件中读入一整行字符（直到下一行，但不包括下一行字符），并返回结果字符串。
object.ReadLine
object 应为 TextStream 对象的名称。
说明
下面例子说明如何使用 ReadLine 方法从 TextStream 文件中读取字符并返回字符串:
Function ReadLineTextFile
Const ForReading = 1, ForWriting = 2
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
MyFile.WriteLine "Hello world!"
MyFile.WriteLine "The quick brown fox"
MyFile.Close
Set MyFile = fso.OpenTextFile("c:\testfile.txt", ForReading)
ReadLineTextFile = MyFile.ReadLine ' Returns "Hello world!"
End Function
⑺ 帮我改个读取文本的shell脚本
我也刚刚学， 目前只能看出来你的错误
你用 awk '{print $1}'这个命令单独试试看就知道了
我正在想办法 稍等
终于想到了一个办法 不用写脚本了完成你上述功能只用一条命令
cat data.txt | awk '{system("bash tmp.sh"" "$1" "$2)}'
你先随便写个tmp.sh脚本 试试看能不能用， 不行我在想办法
⑻ 中华经典美文诵读文字脚本怎样写
翡冷翠山居闲话
作者：徐志摩
徐志摩（1896—1931），浙江海宁人，诗人。着有诗集《志摩的诗》、《猛虎集》，散文集《落叶》、《巴黎的鳞爪》，短篇小说集《轮盘》等。
在这里出门散步去，上山或是下山，在一个晴好的五月的向晚，正像是去赴一个美的宴会，比如去一个果子园，那边每株树上都是满挂着诗情最秀逸的果实，假如你单是站着看还不满意时，只要你一伸手就可以采取，可以恣尝鲜味，足够你性灵的迷醉。阳光正好暖和，决不过暖；风息是温驯的，而且往往因为他是从繁花的山林里吹度过来并带来一股幽远的澹香，连着一息滋润的水气，摩挲着你的颜面，轻绕着你的肩腰，就这单纯的呼吸已是无穷的愉快；空气总是明净的，近谷内不生烟，远山上不起霭，那美秀风景的全部正像画片似的展露在你的眼前，供你闲暇时鉴赏。
作客山中的妙处，尤在你永不须踌躇你的服色与体态；你不妨摇曳着一头的蓬草，不妨纵容你满腮的苔藓；你爱穿什么就穿什么；扮一个牧童，扮一个渔翁，装一个农夫，装一个走江湖的吉卜赛，装一个猎户；你再不必提心去整理你的领结，你尽可以不用领结，给你的颈根与胸膛一半日的自由，你可以拿一条这边艳色的长巾包在你的头上，学一个太平军的头目，或是拜伦那埃及装的姿态；但最要紧的是穿上你最旧的旧鞋，别管他模样不佳，他们是顶可爱的好友，他们承着你的体重，却不叫你记起你还有一双脚在你的底下。
这样的玩顶好是不要约伴，我竟想严格的取缔，只许你独身，因为有了伴多少总得叫你分心，尤其是年轻的女伴，那是最危险最专制不过的旅伴，你应得躲避她像你躲避青草里一条美丽的花蛇!平常我们从自己家里走到朋友家里，或是我们执事的地方，那无非是在同一个大牢里从一间狱室移到另一狱室去，拘束永远跟着我们，自由永远寻不到我们；但在这春夏间美秀的山中或乡间，你要是有机会独身闲逛时，那才是你福星高照的时候，那才是你实际领受，亲口尝味，自由与自在的时候，那才是你肉体与灵魂行动一致的时候；朋友们，我们多长一岁年纪，往往只是加重我们头上的枷，加紧我们脚胫上的链，我们见小孩子在草里在沙堆里在浅水里打滚作乐，或是看见小猫追他自己的尾巴，何尝没有羡慕的时候。但我们的枷，我们的链，永远是制定我们行动的上司!所以只有你单身奔赴大自然的怀抱时，像一个裸体的小孩扑入他母亲的怀抱时，你才知道灵魂的愉快是怎样的，单是活着的快乐是怎样的，单就呼吸单就走道单就张眼看耸耳听的幸福是怎样的。因此你得严格的为己，极端的自私，只许你，体魄与性灵，与自然同在一个脉搏里动跳，同在一个音波里起伏，同在一个神奇的宇宙里自得。我们浑朴的天真是像含羞草似柔娇的，一经同伴的抵触，他就卷了起来，但在澄静的日光下，和风中，他的姿态是自然的，他的生活是无阻碍的。
你一个人漫游的时候，你就会在青草里坐坐，仰卧，甚至有时打滚，因为草的和暖的颜色，自然的唤起你童稚的活泼；在静僻的道上你就会不自主的狂舞，看着你自己的身影幻出种种诡异的变相，因为道旁树木的阴影在他们于徐的婆娑里暗示你舞蹈的快乐；你也会得信口的歌唱，偶尔记起断片的童调，与你自己随口的小曲，因为树林中的莺燕告诉你春光是应得赞美的；更不必说你的胸襟自然会跟着漫长的山径开拓，你的心地会看着澄蓝的天空静定，你的思想和着山壑间的水声，山罅里的泉响，有时一澄到底的清澈；有时激起成章的波动，流，流，流入凉爽的橄榄林中，流入妩媚的阿诺河去……
并且你不但不须游伴，每逢这样的游行，你也不必带书。书是理想的伴侣，但你应得带书，是在火车上，在你住处的客室里，不是在你独身漫步的时候，什么伟大的深沉的鼓舞的清明的优美的思想的根源不是可以在风籁中，云彩里，山势与地形的起伏里，花草的颜色与香气里寻得?自然是最伟大的一部书，歌德说，在他每一页的字句里，我们读得最深奥的消息。并且这书上的文字是人人懂得的，阿尔卑斯与五老峰，西西里与普陀山，莱因河与扬子江，梨梦湖与西子湖，建兰和琼花，杭州西湖的芦雪与威尼斯夕照的红潮，百灵与夜莺，更不提一般紫的黄麦，一般黄的紫藤一般青的青草，同在大地上生长，同在和风中波动——他们应用的符号是永远一致的，他们的意义是永远明显的，只要你自己性灵上不长疮瘢，眼不盲，耳不塞，这无形迹的最高等教育便远是你的名分，这不取费的最珍贵的补剂便永远供你的受用；只要你认识了这一部书，你在这世界上寂寞时便不寂寞，穷困
⑼ lua脚本读入文本文件以及删除第一行文本
f=io.open ("youfile.txt","r") --打开你的输入文件 名称为youfile.txt
f:read("*l") --读取一行，但是不保存
s=f:read("*a") --读取剩下的所有，保存到变量
f:close() --关闭文件
f=io.open(youfile.txt","w") --打开输出文件youfile.txt
f:write(s) --将上面保存的剩下所有的内容写入到输出文件
f:close() --关闭
--这样会损坏你的输入文件，请自行备份
--这种方法不建议打开太大的文件（>10M) 速度会很慢。
⑽ vbs脚本读文本内容作参数
测试成功 看代码:
set fso=createobject("scripting.filesystemobject")
set file=fso.opentextfile("a.txt",1)'"a.txt"要改为其绝对路径
do while file.atendofstream<>-1
str=str&file.readline&","
loop
path=split(str,",")
for i=0 to ubound(path) - 1
fso.file path(i),"f:\back\"
next