|
liu3157551
中级用户
  
积分 259
发帖 164
注册 2006-9-21
状态 离线
|
|
2010-1-5 18:39 |
|
|
liu3157551
中级用户
  
积分 259
发帖 164
注册 2006-9-21
状态 离线
|
『第 17 楼』:
使用 LLM 解释/回答一下
不知道你去哪了,说一下情况吧?能解决还是不?
I don't know where you went, tell me the situation? Can it be solved or not?
|
|
2010-1-5 19:39 |
|
|
qinchun36
高级用户
    据说是李先生
积分 609
发帖 400
注册 2008-4-23
状态 离线
|
『第 18 楼』:
使用 LLM 解释/回答一下
。。。
编码问题,中文才会出间题,你那文件好像要用unicode保存,不然就要加上xml头,手机上的没法搞
...
Coding problem, only Chinese will have issues. Your file seems to need to be saved in Unicode, otherwise you need to add an XML header. Can't do it on a mobile phone.
|

┏━━━━━━┓
┃据说是李先生┃
┠──────┨
┃*ntRSS┃
┗━━━━━━┛ |
|
2010-1-5 20:00 |
|
|
liu3157551
中级用户
  
积分 259
发帖 164
注册 2006-9-21
状态 离线
|
『第 19 楼』:
使用 LLM 解释/回答一下
哦。经查看是UTF8编码,那只好等明天了。谢谢你了辛苦了
Last edited by liu3157551 on 2010-1-5 at 20:49 ]
Oh. After checking, it's UTF8 encoding, so I'll just have to wait until tomorrow. Thank you, you've worked hard.
Last edited by liu3157551 on 2010-1-5 at 20:49 ]
|
|
2010-1-5 20:10 |
|
|
qinchun36
高级用户
    据说是李先生
积分 609
发帖 400
注册 2008-4-23
状态 离线
|
『第 20 楼』:
使用 LLM 解释/回答一下
如果还有问题就自己解决了。
fileName = "5.txt"
head = "<qsed version=""3.0.0.57"">" & vbCrLf & vbTab & "<entry>" & vbCrLf & vbTab & vbTab & "<ref href="""
tail = vbCrLf & """/>" & vbCrLf & vbTab & "</entry>" & vbCrLf & "</qsed>"
Set fso = WScript.Createobject("Scripting.FileSystemObject")
With fso.OpenTextFile(fileName, 1)
While Not .AtEndOfStream
qsed = .ReadLine
tempArr = Split(qsed, "|")
tempStr = tempArr(UBound(tempArr) - 1)
fso.CreateTextFile(tempStr & ".qsed", True, True).Write head & qsed & tail
WEnd
End With
If there are still problems, solve them by yourself.
fileName = "5.txt"
head = "<qsed version=""3.0.0.57"">" & vbCrLf & vbTab & "<entry>" & vbCrLf & vbTab & vbTab & "<ref href="""
tail = vbCrLf & """/>" & vbCrLf & vbTab & "</entry>" & vbCrLf & "</qsed>"
Set fso = WScript.Createobject("Scripting.FileSystemObject")
With fso.OpenTextFile(fileName, 1)
While Not .AtEndOfStream
qsed = .ReadLine
tempArr = Split(qsed, "|")
tempStr = tempArr(UBound(tempArr) - 1)
fso.CreateTextFile(tempStr & ".qsed", True, True).Write head & qsed & tail
WEnd
End With
|

┏━━━━━━┓
┃据说是李先生┃
┠──────┨
┃*ntRSS┃
┗━━━━━━┛ |
|
2010-1-6 10:13 |
|
|
liu3157551
中级用户
  
积分 259
发帖 164
注册 2006-9-21
状态 离线
|
|
2010-4-14 12:34 |
|
|
yonghu111
初级用户
 
积分 90
发帖 57
注册 2010-4-12
状态 离线
|
|
2010-4-14 12:57 |
|
|
qinchun36
高级用户
    据说是李先生
积分 609
发帖 400
注册 2008-4-23
状态 离线
|
|
2010-4-14 13:25 |
|
|
liu3157551
中级用户
  
积分 259
发帖 164
注册 2006-9-21
状态 离线
|
『第 24 楼』:
使用 LLM 解释/回答一下
没有比李先生还要灵的人了^_^
一说就帮,真是好人一个
There is no one more capable than Mr. Li ^_^. As soon as I mentioned it, he helped, really a good person
|
|
2010-4-14 14:03 |
|
|
my7698
新手上路

积分 1
发帖 1
注册 2010-4-8
状态 离线
|
|
2010-7-8 18:31 |
|