zoukankan
html css js c++ java
[转] csv文件的读写
Dim
fso
As
New
FileSystemObject
Dim
fil
As
File
Dim
ts
As
TextStream
Set
fso
=
CreateObject
(
"
Scripting.filesystemobject
"
)
Dim
yy, y1, y2, y3
y1
=
fil_path
'
这里取得ASP里面传递的文件名
yy
=
"
.\text.csv
"
fso.CreateTextFile (yy)
Set
fil
=
fso.GetFile(yy)
Set
ts
=
fil.OpenAsTextStream(ForWriting)
'
数组参数传递
ts.Write (yy)
ts.WriteBlankLines (
1
)
ts.Write (yy)
ts.WriteBlankLines (
1
)
ts.Write (bol_end)
ts.WriteBlankLines (
1
)
ts.Write (sum_a2)
ts.WriteBlankLines (
1
)
查看全文
相关阅读:
androidlayout_weight的使用
软件开发中的真理.
apk,task,android:process与android:sharedUserId的区别
WIFI连接
go simple web server
echo命令
shell if
linux grep命令(包括正则)
make命令和Makefile文件
linux中grep命令的用法
原文地址:https://www.cnblogs.com/temptation/p/887818.html
最新文章
SQL Server 灾难恢复31天之第4天:备份
DBMIRROR_DBM_EVENT
4.0 Query Parameterization
MEMORYCLERK_SQLOPTIMIZER占用内存过高带来的性能问题
How can I bring mirror database online after principal server is down ?
SQL Server 2008 SP3 已经发布
SQL Server 通过界面生成修改列类型脚本时的一个风险(或Bug)
是什么引起执行计划变得极其糟糕? 应该使用更新统计信息来解决它吗?
如何完整的修改一个数据库的名称
【深度学习】沐神领读论文:ResNet
热门文章
【python】多重继承
【深度学习】沐神论文领读:Alexnet
【torch】dataset, dataloader, sampler
【深度学习】RNN论文合集
【python】迭代器与可迭代对象
【linux】加密/认证 & SSH
开始使用Mac OS X——写给Mac新人
snake与LunarLander源代码分析
从高考落榜生到网络专家
网址收集
Copyright © 2011-2022 走看看