如何在lotus script里面读一个文本文件的第一行?

melia melia 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
我放在domino的文件夹下的一个文本文件里第一行的数据我要在代理中取得,代码只写了一点,后面找不到lotus script里面能用的方法了,就没贴出来,谁用lotus读过文本文件数据的请帮个忙,看看怎么写。
Sub Initialize
Dim session As New notessession
Dim curdb As notesdatabase
Dim doc As notesdocument
Dim curdoc As notesdocument

'Set curdoc=s.documentcontext
'Set curdb=s.currentdatabase

Msgbox "-----------------------getprogrampath start ------------------------------"
On Error Goto esub
Dim pathName As String
Dim pathstr As pathclass
syspath=session.getenvironmentString("Directory",True)
Chdir(syspath)
fileName$="getpmpath.txt"
fileNum% = Freefile()

Open fileName$ For Random Access Read As fileNum%
Msgbox fileName$
'Seek fileNum%, 1
'Get #fileNum%,,pathstr
。。。。。。省略
Close fileNum%
Msgbox path.name
Exit Sub
esub:
Msgbox "-----------------------del error ------------------------------"
Exit Sub
End Sub
...全文
评论 3
收藏 已收藏
分享
返回顶部
melia
消息协作 536 成员 39,094 内容